DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦2105a3922⟧

    Length: 9216 (0x2400)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6148f2

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦this⟧ 

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0ce0       |    |		.CONST	0x0ce0								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 0008       |    |		.CONST	0x0008								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0146       | F  |		.CONST	0x0146								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0032       | 2  |		.CONST	0x0032								; Number of locals
000b			INIT_0008:
000b 029a 014b  |   K|		Declare_Subprogram	INIT_0148,For_Outer_Call,Visible,Unelaborated
000d 029a 015b  |   [|		Declare_Subprogram	INIT_0158,For_Outer_Call,Visible,Unelaborated
000f 029a 0173  |   s|		Declare_Subprogram	INIT_0170,For_Outer_Call,Visible,Unelaborated
0011 029a 018b  |    |		Declare_Subprogram	INIT_0188,For_Outer_Call,Visible,Unelaborated
0013 029a 019b  |    |		Declare_Subprogram	INIT_0198,For_Outer_Call,Visible,Unelaborated
0015 029a 01ab  |    |		Declare_Subprogram	INIT_01a8,For_Outer_Call,Visible,Unelaborated
0017 029a 028b  |    |		Declare_Subprogram	INIT_0288,For_Outer_Call,Visible,Unelaborated
0019 029a 02a3  |    |		Declare_Subprogram	INIT_02a0,For_Outer_Call,Visible,Unelaborated
001b 029a 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Outer_Call,Visible,Unelaborated
001d 029a 02c3  |    |		Declare_Subprogram	INIT_02c0,For_Outer_Call,Visible,Unelaborated
001f 029a 02e3  |    |		Declare_Subprogram	INIT_02e0,For_Outer_Call,Visible,Unelaborated
0021 029a 0303  |    |		Declare_Subprogram	INIT_0300,For_Outer_Call,Visible,Unelaborated
0023 029a 0323  |   #|		Declare_Subprogram	INIT_0320,For_Outer_Call,Visible,Unelaborated
0025 029a 0353  |   S|		Declare_Subprogram	INIT_0350,For_Outer_Call,Visible,Unelaborated
0027 029a 0363  |   c|		Declare_Subprogram	INIT_0360,For_Outer_Call,Visible,Unelaborated
0029 029a 0373  |   s|		Declare_Subprogram	INIT_0370,For_Outer_Call,Visible,Unelaborated
002b 029a 0393  |    |		Declare_Subprogram	INIT_0390,For_Outer_Call,Visible,Unelaborated
002d 029a 03b3  |    |		Declare_Subprogram	INIT_03b0,For_Outer_Call,Visible,Unelaborated
002f 029a 03d3  |    |		Declare_Subprogram	INIT_03d0,For_Outer_Call,Visible,Unelaborated
0031 029a 03f3  |    |		Declare_Subprogram	INIT_03f0,For_Outer_Call,Visible,Unelaborated
0033 029a 0413  |    |		Declare_Subprogram	INIT_0410,For_Outer_Call,Visible,Unelaborated
0035 029a 0433  |   3|		Declare_Subprogram	INIT_0430,For_Outer_Call,Visible,Unelaborated
0037 029a 047b  |   {|		Declare_Subprogram	INIT_0478,For_Outer_Call,Visible,Unelaborated
0039 029a 049b  |    |		Declare_Subprogram	INIT_0498,For_Outer_Call,Visible,Unelaborated
003b 029a 04e3  |    |		Declare_Subprogram	INIT_04e0,For_Outer_Call,Visible,Unelaborated
003d 029a 04f3  |    |		Declare_Subprogram	INIT_04f0,For_Outer_Call,Visible,Unelaborated
003f 029a 0513  |    |		Declare_Subprogram	INIT_0510,For_Outer_Call,Visible,Unelaborated
0041 029a 052b  |   +|		Declare_Subprogram	INIT_0528,For_Outer_Call,Visible,Unelaborated
0043 029a 055b  |   [|		Declare_Subprogram	INIT_0558,For_Outer_Call,Visible,Unelaborated
0045 00bf       |    |		Action	Accept_Activation
0046 e002       |    |		Load	0x0,0x2
0047 0322       | "  |		Declare_Variable	Record
0048 4803       |H   |		Short_Literal	0x3
0049 00d9       |    |		Load_Top	At_Offset_1
004a 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
004b 4fff       |O   |		Short_Literal	-0x1
004c 00d9       |    |		Load_Top	At_Offset_1
004d 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
004e 4800       |H   |		Short_Literal	0x0
004f 00d9       |    |		Load_Top	At_Offset_1
0050 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0051 4801       |H   |		Short_Literal	0x1
0052 00d9       |    |		Load_Top	At_Offset_1
0053 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0054 4800       |H   |		Short_Literal	0x0
0055 00d9       |    |		Load_Top	At_Offset_1
0056 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0057 4800       |H   |		Short_Literal	0x0
0058 00d9       |    |		Load_Top	At_Offset_1
0059 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
005a 4801       |H   |		Short_Literal	0x1
005b 00d9       |    |		Load_Top	At_Offset_1
005c 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
005d 4800       |H   |		Short_Literal	0x0
005e 00d9       |    |		Load_Top	At_Offset_1
005f 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
0060 4800       |H   |		Short_Literal	0x0
0061 00d9       |    |		Load_Top	At_Offset_1
0062 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
0063 4800       |H   |		Short_Literal	0x0
0064 00d9       |    |		Load_Top	At_Offset_1
0065 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
0066 4801       |H   |		Short_Literal	0x1
0067 00d9       |    |		Load_Top	At_Offset_1
0068 380a       |8   |		Execute	Record,Field_Write,Field_Number 0xa
0069 00d8       |    |		Load_Top	At_Offset_0
006a 340b       |4   |		Execute	Record,Field_Reference,Field_Number 0xb
006b 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
006c 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
006d 4fff       |O   |		Short_Literal	-0x1
006e 00d0       |    |		Action	Swap_Control
006f 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0070 00d8       |    |		Load_Top	At_Offset_0
0071 340c       |4   |		Execute	Record,Field_Reference,Field_Number 0xc
0072 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0073 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0074 4fff       |O   |		Short_Literal	-0x1
0075 00d0       |    |		Action	Swap_Control
0076 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0077 4800       |H   |		Short_Literal	0x0
0078 00d9       |    |		Load_Top	At_Offset_1
0079 380d       |8   |		Execute	Record,Field_Write,Field_Number 0xd
007a 4800       |H   |		Short_Literal	0x0
007b 00d9       |    |		Load_Top	At_Offset_1
007c 380e       |8   |		Execute	Record,Field_Write,Field_Number 0xe
007d 00d8       |    |		Load_Top	At_Offset_0
007e 340f       |4   |		Execute	Record,Field_Reference,Field_Number 0xf
007f 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0080 4fff       |O   |		Short_Literal	-0x1
0081 00d0       |    |		Action	Swap_Control
0082 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0083 4800       |H   |		Short_Literal	0x0
0084 00d9       |    |		Load_Top	At_Offset_1
0085 3810       |8   |		Execute	Record,Field_Write,Field_Number 0x10
0086 4801       |H   |		Short_Literal	0x1
0087 00d9       |    |		Load_Top	At_Offset_1
0088 3811       |8   |		Execute	Record,Field_Write,Field_Number 0x11
0089 4800       |H   |		Short_Literal	0x0
008a 00d9       |    |		Load_Top	At_Offset_1
008b 3812       |8   |		Execute	Record,Field_Write,Field_Number 0x12
008c 4800       |H   |		Short_Literal	0x0
008d 00d9       |    |		Load_Top	At_Offset_1
008e 3813       |8   |		Execute	Record,Field_Write,Field_Number 0x13
008f e003       |    |		Load	0x0,0x3
0090 00d9       |    |		Load_Top	At_Offset_1
0091 3814       |8   |		Execute	Record,Field_Write,Field_Number 0x14
0092 4800       |H   |		Short_Literal	0x0
0093 00d9       |    |		Load_Top	At_Offset_1
0094 3815       |8   |		Execute	Record,Field_Write,Field_Number 0x15
0095 4804       |H   |		Short_Literal	0x4
0096 00d9       |    |		Load_Top	At_Offset_1
0097 3816       |8   |		Execute	Record,Field_Write,Field_Number 0x16
0098 e004       |    |		Load	0x0,0x4
0099 0337       | 7  |		Declare_Variable	Array
009a 4801       |H   |		Short_Literal	0x1
009b 481f       |H   |		Short_Literal	0x1f
009c 00da       |    |		Load_Top	At_Offset_2
009d 01d6       |    |		Execute	Vector,Field_Write
009e 4801       |H   |		Short_Literal	0x1
009f 481e       |H   |		Short_Literal	0x1e
00a0 00da       |    |		Load_Top	At_Offset_2
00a1 01d6       |    |		Execute	Vector,Field_Write
00a2 4801       |H   |		Short_Literal	0x1
00a3 481d       |H   |		Short_Literal	0x1d
00a4 00da       |    |		Load_Top	At_Offset_2
00a5 01d6       |    |		Execute	Vector,Field_Write
00a6 4801       |H   |		Short_Literal	0x1
00a7 481c       |H   |		Short_Literal	0x1c
00a8 00da       |    |		Load_Top	At_Offset_2
00a9 01d6       |    |		Execute	Vector,Field_Write
00aa 4801       |H   |		Short_Literal	0x1
00ab 481b       |H   |		Short_Literal	0x1b
00ac 00da       |    |		Load_Top	At_Offset_2
00ad 01d6       |    |		Execute	Vector,Field_Write
00ae 4801       |H   |		Short_Literal	0x1
00af 481a       |H   |		Short_Literal	0x1a
00b0 00da       |    |		Load_Top	At_Offset_2
00b1 01d6       |    |		Execute	Vector,Field_Write
00b2 4801       |H   |		Short_Literal	0x1
00b3 4819       |H   |		Short_Literal	0x19
00b4 00da       |    |		Load_Top	At_Offset_2
00b5 01d6       |    |		Execute	Vector,Field_Write
00b6 4801       |H   |		Short_Literal	0x1
00b7 4818       |H   |		Short_Literal	0x18
00b8 00da       |    |		Load_Top	At_Offset_2
00b9 01d6       |    |		Execute	Vector,Field_Write
00ba 4801       |H   |		Short_Literal	0x1
00bb 4817       |H   |		Short_Literal	0x17
00bc 00da       |    |		Load_Top	At_Offset_2
00bd 01d6       |    |		Execute	Vector,Field_Write
00be 4801       |H   |		Short_Literal	0x1
00bf 4816       |H   |		Short_Literal	0x16
00c0 00da       |    |		Load_Top	At_Offset_2
00c1 01d6       |    |		Execute	Vector,Field_Write
00c2 4801       |H   |		Short_Literal	0x1
00c3 4815       |H   |		Short_Literal	0x15
00c4 00da       |    |		Load_Top	At_Offset_2
00c5 01d6       |    |		Execute	Vector,Field_Write
00c6 4801       |H   |		Short_Literal	0x1
00c7 4814       |H   |		Short_Literal	0x14
00c8 00da       |    |		Load_Top	At_Offset_2
00c9 01d6       |    |		Execute	Vector,Field_Write
00ca 4801       |H   |		Short_Literal	0x1
00cb 4813       |H   |		Short_Literal	0x13
00cc 00da       |    |		Load_Top	At_Offset_2
00cd 01d6       |    |		Execute	Vector,Field_Write
00ce 4801       |H   |		Short_Literal	0x1
00cf 4812       |H   |		Short_Literal	0x12
00d0 00da       |    |		Load_Top	At_Offset_2
00d1 01d6       |    |		Execute	Vector,Field_Write
00d2 4801       |H   |		Short_Literal	0x1
00d3 4811       |H   |		Short_Literal	0x11
00d4 00da       |    |		Load_Top	At_Offset_2
00d5 01d6       |    |		Execute	Vector,Field_Write
00d6 4801       |H   |		Short_Literal	0x1
00d7 4810       |H   |		Short_Literal	0x10
00d8 00da       |    |		Load_Top	At_Offset_2
00d9 01d6       |    |		Execute	Vector,Field_Write
00da 4801       |H   |		Short_Literal	0x1
00db 480f       |H   |		Short_Literal	0xf
00dc 00da       |    |		Load_Top	At_Offset_2
00dd 01d6       |    |		Execute	Vector,Field_Write
00de 4801       |H   |		Short_Literal	0x1
00df 480e       |H   |		Short_Literal	0xe
00e0 00da       |    |		Load_Top	At_Offset_2
00e1 01d6       |    |		Execute	Vector,Field_Write
00e2 4801       |H   |		Short_Literal	0x1
00e3 480d       |H   |		Short_Literal	0xd
00e4 00da       |    |		Load_Top	At_Offset_2
00e5 01d6       |    |		Execute	Vector,Field_Write
00e6 4801       |H   |		Short_Literal	0x1
00e7 480b       |H   |		Short_Literal	0xb
00e8 00da       |    |		Load_Top	At_Offset_2
00e9 01d6       |    |		Execute	Vector,Field_Write
00ea 4801       |H   |		Short_Literal	0x1
00eb 4809       |H   |		Short_Literal	0x9
00ec 00da       |    |		Load_Top	At_Offset_2
00ed 01d6       |    |		Execute	Vector,Field_Write
00ee 4808       |H   |		Short_Literal	0x8
00ef 4800       |H   |		Short_Literal	0x0
00f0 4800       |H   |		Short_Literal	0x0
00f1 00d9       |    |		Load_Top	At_Offset_1
00f2 e22b       | +  |		Load	0x1,0x2b
00f3 01d6       |    |		Execute	Vector,Field_Write
00f4 3ffb       |?   |		Loop_Increasing	0xf0
00f5 4800       |H   |		Short_Literal	0x0
00f6 480a       |H   |		Short_Literal	0xa
00f7 00da       |    |		Load_Top	At_Offset_2
00f8 01d6       |    |		Execute	Vector,Field_Write
00f9 4800       |H   |		Short_Literal	0x0
00fa 480c       |H   |		Short_Literal	0xc
00fb 00da       |    |		Load_Top	At_Offset_2
00fc 01d6       |    |		Execute	Vector,Field_Write
00fd e004       |    |		Load	0x0,0x4
00fe 01c3       |    |		Execute	Vector,Check_In_Type
00ff 0007       |    |		Action	Break_Optional
0100 a005       |    |		Store_Unchecked	0x0,0x5
0101 00c6       |    |		Action	Check_Subprogram_Elaborated
0102 e006       |    |		Load	0x0,0x6
0103 e007       |    |		Load	0x0,0x7
0104 e008       |    |		Load	0x0,0x8
0105 e009       |    |		Load	0x0,0x9
0106 4800       |H   |		Short_Literal	0x0
0107 0007       |    |		Action	Break_Optional
0108 029d 05d3  |    |		Declare_Subprogram	INIT_05d0,For_Outer_Call
010a 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
010b 00c7       |    |		Action	Elaborate_Subprogram
010c 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
010d 00c7       |    |		Action	Elaborate_Subprogram
010e 029d 07a3  |    |		Declare_Subprogram	INIT_07a0,For_Outer_Call
0110 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0111 00c7       |    |		Action	Elaborate_Subprogram
0112 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0113 00c7       |    |		Action	Elaborate_Subprogram
0114 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0115 00c7       |    |		Action	Elaborate_Subprogram
0116 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0117 00c7       |    |		Action	Elaborate_Subprogram
0118 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0119 00c7       |    |		Action	Elaborate_Subprogram
011a 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
011b 00c7       |    |		Action	Elaborate_Subprogram
011c 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
011d 00c7       |    |		Action	Elaborate_Subprogram
011e 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
011f 00c7       |    |		Action	Elaborate_Subprogram
0120 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
0121 00c7       |    |		Action	Elaborate_Subprogram
0122 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
0123 00c7       |    |		Action	Elaborate_Subprogram
0124 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
0125 00c7       |    |		Action	Elaborate_Subprogram
0126 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
0127 00c7       |    |		Action	Elaborate_Subprogram
0128 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
0129 00c7       |    |		Action	Elaborate_Subprogram
012a 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
012b 00c7       |    |		Action	Elaborate_Subprogram
012c 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
012d 00c7       |    |		Action	Elaborate_Subprogram
012e 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
012f 00c7       |    |		Action	Elaborate_Subprogram
0130 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
0131 00c7       |    |		Action	Elaborate_Subprogram
0132 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
0133 00c7       |    |		Action	Elaborate_Subprogram
0134 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
0135 00c7       |    |		Action	Elaborate_Subprogram
0136 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22
0137 00c7       |    |		Action	Elaborate_Subprogram
0138 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
0139 00c7       |    |		Action	Elaborate_Subprogram
013a 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
013b 00c7       |    |		Action	Elaborate_Subprogram
013c 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25
013d 00c7       |    |		Action	Elaborate_Subprogram
013e 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26
013f 00c7       |    |		Action	Elaborate_Subprogram
0140 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
0141 00c7       |    |		Action	Elaborate_Subprogram
0142 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
0143 00c7       |    |		Action	Elaborate_Subprogram
0144 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29
0145 00c7       |    |		Action	Elaborate_Subprogram
0146			BODY_0008:
0146 00bc       |    |		Action	Signal_Activated
0147 00bb       |    |		Action	Signal_Completion
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 0150       | P  |		.CONST	0x0150								; Address of begin
0149 0004       |    |		.CONST	0x0004								; Address of exception handler
014a 0003       |    |		.CONST	0x0003								; Number of locals
014b			INIT_0148:
014b e5fd       |    |		Load	0x2,-0x3
014c e00a       |    |		Load	0x0,0xa
014d 01d3       |    |		Execute	Vector,And
014e 029f 090b  |    |		Declare_Subprogram	INIT_0908,For_Call
0150			BODY_0148:
0150 00d9       |    |		Load_Top	At_Offset_1
0151 e00b       |    |		Load	0x0,0xb
0152 01df       |    |		Execute	Vector,Equal
0153 7003       |p   |		Jump_Nonzero	0x157
0154 e5ff       |    |		Load	0x2,-0x1
0155 800c       |    |		Call	0x0,0xc
0156 8403       |    |		Call	0x2,0x3
0157 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 016a       | j  |		.CONST	0x016a								; Address of begin
0159 0004       |    |		.CONST	0x0004								; Address of exception handler
015a 0006       |    |		.CONST	0x0006								; Number of locals
015b			INIT_0158:
015b e5fc       |    |		Load	0x2,-0x4
015c 0227       | '  |		Execute	Access,All_Reference
015d 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
015e 0007       |    |		Action	Break_Optional
015f e5fe       |    |		Load	0x2,-0x2
0160 0227       | '  |		Execute	Access,All_Reference
0161 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0162 0007       |    |		Action	Break_Optional
0163 e00d       |    |		Load	0x0,0xd
0164 0007       |    |		Action	Break_Optional
0165 e5fd       |    |		Load	0x2,-0x3
0166 e00a       |    |		Load	0x0,0xa
0167 01d3       |    |		Execute	Vector,And
0168 029f 0953  |   S|		Declare_Subprogram	INIT_0950,For_Call
016a			BODY_0158:
016a e5ff       |    |		Load	0x2,-0x1
016b 800c       |    |		Call	0x0,0xc
016c 8406       |    |		Call	0x2,0x6
016d 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
016e 0000 0000  |    |		.XXX[0x2]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 017e       | ~  |		.CONST	0x017e								; Address of begin
0171 0004       |    |		.CONST	0x0004								; Address of exception handler
0172 0006       |    |		.CONST	0x0006								; Number of locals
0173			INIT_0170:
0173 e007       |    |		Load	0x0,0x7
0174 0007       |    |		Action	Break_Optional
0175 e00d       |    |		Load	0x0,0xd
0176 0007       |    |		Action	Break_Optional
0177 e00e       |    |		Load	0x0,0xe
0178 0007       |    |		Action	Break_Optional
0179 e5fd       |    |		Load	0x2,-0x3
017a e00a       |    |		Load	0x0,0xa
017b 01d3       |    |		Execute	Vector,And
017c 029f 0a7b  |   {|		Declare_Subprogram	INIT_0a78,For_Call
017e			BODY_0170:
017e e5ff       |    |		Load	0x2,-0x1
017f 800c       |    |		Call	0x0,0xc
0180 8406       |    |		Call	0x2,0x6
0181 0831       | 1  |		Execute_Immediate	Raise,0x31
0182 0000 0000  |    |		.BLANK	0000[0x6]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 018e       |    |		.CONST	0x018e								; Address of begin
0189 0004       |    |		.CONST	0x0004								; Address of exception handler
018a 0003       |    |		.CONST	0x0003								; Number of locals
018b			INIT_0188:
018b e00d       |    |		Load	0x0,0xd
018c 029f 0b3b  |   ;|		Declare_Subprogram	INIT_0b38,For_Call
018e			BODY_0188:
018e e5fe       |    |		Load	0x2,-0x2
018f e007       |    |		Load	0x0,0x7
0190 022f       | /  |		Execute	Access,Equal
0191 6801       |h   |		Jump_Zero	0x193
0192 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0193 e5ff       |    |		Load	0x2,-0x1
0194 800c       |    |		Call	0x0,0xc
0195 8403       |    |		Call	0x2,0x3
0196 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0197 0000       |    |		.XXX[0x1]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019b       |    |		.CONST	0x019b								; Address of begin
0199 0004       |    |		.CONST	0x0004								; Address of exception handler
019a 0001       |    |		.CONST	0x0001								; Number of locals
019b			BODY_0198:
019b			INIT_0198:
019b 00da       |    |		Load_Top	At_Offset_2
019c 0227       | '  |		Execute	Access,All_Reference
019d 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
019e 0320       |    |		Declare_Variable	Record,Duplicate
019f 00cd       |    |		Action	Spare6_Action
01a0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01a1 0000 0000  |    |		.BLANK	0000[0x7]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ab       |    |		.CONST	0x01ab								; Address of begin
01a9 0004       |    |		.CONST	0x0004								; Address of exception handler
01aa 0001       |    |		.CONST	0x0001								; Number of locals
01ab			BODY_01a8:
01ab			INIT_01a8:
01ab e5fd       |    |		Load	0x2,-0x3
01ac e22b       | +  |		Load	0x1,0x2b
01ad 01d3       |    |		Execute	Vector,And
01ae e5fd       |    |		Load	0x2,-0x3
01af 01df       |    |		Execute	Vector,Equal
01b0 7002       |p   |		Jump_Nonzero	0x1b3
01b1 4800       |H   |		Short_Literal	0x0
01b2 a5fb       |    |		Store_Unchecked	0x2,-0x5
01b3 481f       |H   |		Short_Literal	0x1f
01b4 e5fd       |    |		Load	0x2,-0x3
01b5 01d7       |    |		Execute	Vector,Field_Read
01b6 6806       |h   |		Jump_Zero	0x1bd
01b7 00db       |    |		Load_Top	At_Offset_3
01b8 0227       | '  |		Execute	Access,All_Reference
01b9 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
01ba 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01bb e5fc       |    |		Load	0x2,-0x4
01bc 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01bd 481e       |H   |		Short_Literal	0x1e
01be e5fd       |    |		Load	0x2,-0x3
01bf 01d7       |    |		Execute	Vector,Field_Read
01c0 6806       |h   |		Jump_Zero	0x1c7
01c1 00db       |    |		Load_Top	At_Offset_3
01c2 0227       | '  |		Execute	Access,All_Reference
01c3 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
01c4 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
01c5 e5fc       |    |		Load	0x2,-0x4
01c6 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01c7 481d       |H   |		Short_Literal	0x1d
01c8 e5fd       |    |		Load	0x2,-0x3
01c9 01d7       |    |		Execute	Vector,Field_Read
01ca 6806       |h   |		Jump_Zero	0x1d1
01cb 00db       |    |		Load_Top	At_Offset_3
01cc 0227       | '  |		Execute	Access,All_Reference
01cd 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
01ce 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
01cf e5fc       |    |		Load	0x2,-0x4
01d0 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
01d1 481c       |H   |		Short_Literal	0x1c
01d2 e5fd       |    |		Load	0x2,-0x3
01d3 01d7       |    |		Execute	Vector,Field_Read
01d4 6806       |h   |		Jump_Zero	0x1db
01d5 00db       |    |		Load_Top	At_Offset_3
01d6 0227       | '  |		Execute	Access,All_Reference
01d7 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
01d8 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
01d9 e5fc       |    |		Load	0x2,-0x4
01da 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
01db 481b       |H   |		Short_Literal	0x1b
01dc e5fd       |    |		Load	0x2,-0x3
01dd 01d7       |    |		Execute	Vector,Field_Read
01de 6806       |h   |		Jump_Zero	0x1e5
01df 00db       |    |		Load_Top	At_Offset_3
01e0 0227       | '  |		Execute	Access,All_Reference
01e1 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
01e2 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
01e3 e5fc       |    |		Load	0x2,-0x4
01e4 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
01e5 481a       |H   |		Short_Literal	0x1a
01e6 e5fd       |    |		Load	0x2,-0x3
01e7 01d7       |    |		Execute	Vector,Field_Read
01e8 6806       |h   |		Jump_Zero	0x1ef
01e9 00db       |    |		Load_Top	At_Offset_3
01ea 0227       | '  |		Execute	Access,All_Reference
01eb 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
01ec 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
01ed e5fc       |    |		Load	0x2,-0x4
01ee 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
01ef 4819       |H   |		Short_Literal	0x19
01f0 e5fd       |    |		Load	0x2,-0x3
01f1 01d7       |    |		Execute	Vector,Field_Read
01f2 6806       |h   |		Jump_Zero	0x1f9
01f3 00db       |    |		Load_Top	At_Offset_3
01f4 0227       | '  |		Execute	Access,All_Reference
01f5 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
01f6 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
01f7 e5fc       |    |		Load	0x2,-0x4
01f8 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
01f9 4818       |H   |		Short_Literal	0x18
01fa e5fd       |    |		Load	0x2,-0x3
01fb 01d7       |    |		Execute	Vector,Field_Read
01fc 6806       |h   |		Jump_Zero	0x203
01fd 00db       |    |		Load_Top	At_Offset_3
01fe 0227       | '  |		Execute	Access,All_Reference
01ff 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0200 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0201 e5fc       |    |		Load	0x2,-0x4
0202 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
0203 4817       |H   |		Short_Literal	0x17
0204 e5fd       |    |		Load	0x2,-0x3
0205 01d7       |    |		Execute	Vector,Field_Read
0206 6806       |h   |		Jump_Zero	0x20d
0207 00db       |    |		Load_Top	At_Offset_3
0208 0227       | '  |		Execute	Access,All_Reference
0209 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
020a 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
020b e5fc       |    |		Load	0x2,-0x4
020c 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
020d 4816       |H   |		Short_Literal	0x16
020e e5fd       |    |		Load	0x2,-0x3
020f 01d7       |    |		Execute	Vector,Field_Read
0210 6806       |h   |		Jump_Zero	0x217
0211 00db       |    |		Load_Top	At_Offset_3
0212 0227       | '  |		Execute	Access,All_Reference
0213 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0214 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0215 e5fc       |    |		Load	0x2,-0x4
0216 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
0217 4815       |H   |		Short_Literal	0x15
0218 e5fd       |    |		Load	0x2,-0x3
0219 01d7       |    |		Execute	Vector,Field_Read
021a 6806       |h   |		Jump_Zero	0x221
021b 00db       |    |		Load_Top	At_Offset_3
021c 0227       | '  |		Execute	Access,All_Reference
021d 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
021e 340b       |4   |		Execute	Record,Field_Reference,Field_Number 0xb
021f e5fc       |    |		Load	0x2,-0x4
0220 380b       |8   |		Execute	Record,Field_Write,Field_Number 0xb
0221 4814       |H   |		Short_Literal	0x14
0222 e5fd       |    |		Load	0x2,-0x3
0223 01d7       |    |		Execute	Vector,Field_Read
0224 6806       |h   |		Jump_Zero	0x22b
0225 00db       |    |		Load_Top	At_Offset_3
0226 0227       | '  |		Execute	Access,All_Reference
0227 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0228 340c       |4   |		Execute	Record,Field_Reference,Field_Number 0xc
0229 e5fc       |    |		Load	0x2,-0x4
022a 380c       |8   |		Execute	Record,Field_Write,Field_Number 0xc
022b 4813       |H   |		Short_Literal	0x13
022c e5fd       |    |		Load	0x2,-0x3
022d 01d7       |    |		Execute	Vector,Field_Read
022e 6806       |h   |		Jump_Zero	0x235
022f 00db       |    |		Load_Top	At_Offset_3
0230 0227       | '  |		Execute	Access,All_Reference
0231 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0232 3c0d       |<   |		Execute	Record,Field_Read,Field_Number 0xd
0233 e5fc       |    |		Load	0x2,-0x4
0234 380d       |8   |		Execute	Record,Field_Write,Field_Number 0xd
0235 4812       |H   |		Short_Literal	0x12
0236 e5fd       |    |		Load	0x2,-0x3
0237 01d7       |    |		Execute	Vector,Field_Read
0238 6806       |h   |		Jump_Zero	0x23f
0239 00db       |    |		Load_Top	At_Offset_3
023a 0227       | '  |		Execute	Access,All_Reference
023b 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
023c 3c0e       |<   |		Execute	Record,Field_Read,Field_Number 0xe
023d e5fc       |    |		Load	0x2,-0x4
023e 380e       |8   |		Execute	Record,Field_Write,Field_Number 0xe
023f 4811       |H   |		Short_Literal	0x11
0240 e5fd       |    |		Load	0x2,-0x3
0241 01d7       |    |		Execute	Vector,Field_Read
0242 6806       |h   |		Jump_Zero	0x249
0243 00db       |    |		Load_Top	At_Offset_3
0244 0227       | '  |		Execute	Access,All_Reference
0245 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0246 340f       |4   |		Execute	Record,Field_Reference,Field_Number 0xf
0247 e5fc       |    |		Load	0x2,-0x4
0248 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0249 4810       |H   |		Short_Literal	0x10
024a e5fd       |    |		Load	0x2,-0x3
024b 01d7       |    |		Execute	Vector,Field_Read
024c 6806       |h   |		Jump_Zero	0x253
024d 00db       |    |		Load_Top	At_Offset_3
024e 0227       | '  |		Execute	Access,All_Reference
024f 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0250 3c10       |<   |		Execute	Record,Field_Read,Field_Number 0x10
0251 e5fc       |    |		Load	0x2,-0x4
0252 3810       |8   |		Execute	Record,Field_Write,Field_Number 0x10
0253 480f       |H   |		Short_Literal	0xf
0254 e5fd       |    |		Load	0x2,-0x3
0255 01d7       |    |		Execute	Vector,Field_Read
0256 6806       |h   |		Jump_Zero	0x25d
0257 00db       |    |		Load_Top	At_Offset_3
0258 0227       | '  |		Execute	Access,All_Reference
0259 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
025a 3c11       |<   |		Execute	Record,Field_Read,Field_Number 0x11
025b e5fc       |    |		Load	0x2,-0x4
025c 3811       |8   |		Execute	Record,Field_Write,Field_Number 0x11
025d 480e       |H   |		Short_Literal	0xe
025e e5fd       |    |		Load	0x2,-0x3
025f 01d7       |    |		Execute	Vector,Field_Read
0260 6806       |h   |		Jump_Zero	0x267
0261 00db       |    |		Load_Top	At_Offset_3
0262 0227       | '  |		Execute	Access,All_Reference
0263 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0264 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
0265 e5fc       |    |		Load	0x2,-0x4
0266 3812       |8   |		Execute	Record,Field_Write,Field_Number 0x12
0267 480d       |H   |		Short_Literal	0xd
0268 e5fd       |    |		Load	0x2,-0x3
0269 01d7       |    |		Execute	Vector,Field_Read
026a 6806       |h   |		Jump_Zero	0x271
026b 00db       |    |		Load_Top	At_Offset_3
026c 0227       | '  |		Execute	Access,All_Reference
026d 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
026e 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
026f e5fc       |    |		Load	0x2,-0x4
0270 3813       |8   |		Execute	Record,Field_Write,Field_Number 0x13
0271 480b       |H   |		Short_Literal	0xb
0272 e5fd       |    |		Load	0x2,-0x3
0273 01d7       |    |		Execute	Vector,Field_Read
0274 6806       |h   |		Jump_Zero	0x27b
0275 00db       |    |		Load_Top	At_Offset_3
0276 0227       | '  |		Execute	Access,All_Reference
0277 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0278 3c15       |<   |		Execute	Record,Field_Read,Field_Number 0x15
0279 e5fc       |    |		Load	0x2,-0x4
027a 3815       |8   |		Execute	Record,Field_Write,Field_Number 0x15
027b 4809       |H   |		Short_Literal	0x9
027c e5fd       |    |		Load	0x2,-0x3
027d 01d7       |    |		Execute	Vector,Field_Read
027e 6806       |h   |		Jump_Zero	0x285
027f 00db       |    |		Load_Top	At_Offset_3
0280 0227       | '  |		Execute	Access,All_Reference
0281 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0282 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
0283 e5fc       |    |		Load	0x2,-0x4
0284 380a       |8   |		Execute	Record,Field_Write,Field_Number 0xa
0285 4801       |H   |		Short_Literal	0x1
0286 a5fb       |    |		Store_Unchecked	0x2,-0x5
0287 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 0292       |    |		.CONST	0x0292								; Address of begin
0289 0004       |    |		.CONST	0x0004								; Address of exception handler
028a 0004       |    |		.CONST	0x0004								; Number of locals
028b			INIT_0288:
028b e00f       |    |		Load	0x0,0xf
028c 02ff       |    |		Declare_Variable	Variant_Record
028d 00d8       |    |		Load_Top	At_Offset_0
028e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
028f e010       |    |		Load	0x0,0x10
0290 029f 0b93  |    |		Declare_Subprogram	INIT_0b90,For_Call
0292			BODY_0288:
0292 e5ff       |    |		Load	0x2,-0x1
0293 800c       |    |		Call	0x0,0xc
0294 8404       |    |		Call	0x2,0x4
0295 4801       |H   |		Short_Literal	0x1
0296 a5f8       |    |		Store_Unchecked	0x2,-0x8
0297 e5ff       |    |		Load	0x2,-0x1
0298 8011       |    |		Call	0x0,0x11
0299 e5ff       |    |		Load	0x2,-0x1
029a 8012       |    |		Call	0x0,0x12
029b 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
029c 0000 0000  |    |		.BLANK	0000[0x4]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a3       |    |		.CONST	0x02a3								; Address of begin
02a1 0004       |    |		.CONST	0x0004								; Address of exception handler
02a2 0001       |    |		.CONST	0x0001								; Number of locals
02a3			BODY_02a0:
02a3			INIT_02a0:
02a3 e010       |    |		Load	0x0,0x10
02a4 e013       |    |		Load	0x0,0x13
02a5 00d8       |    |		Load_Top	At_Offset_0
02a6 e5fc       |    |		Load	0x2,-0x4
02a7 e5fd       |    |		Load	0x2,-0x3
02a8 e5fe       |    |		Load	0x2,-0x2
02a9 4802       |H   |		Short_Literal	0x2
02aa e5ff       |    |		Load	0x2,-0x1
02ab 8213       |    |		Call	0x1,0x13
02ac c5fb       |    |		Store	0x2,-0x5
02ad c5fa       |    |		Store	0x2,-0x6
02ae c5f9       |    |		Store	0x2,-0x7
02af 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b3       |    |		.CONST	0x02b3								; Address of begin
02b1 0004       |    |		.CONST	0x0004								; Address of exception handler
02b2 0001       |    |		.CONST	0x0001								; Number of locals
02b3			BODY_02b0:
02b3			INIT_02b0:
02b3 e010       |    |		Load	0x0,0x10
02b4 e013       |    |		Load	0x0,0x13
02b5 00d8       |    |		Load_Top	At_Offset_0
02b6 e5fc       |    |		Load	0x2,-0x4
02b7 e5fd       |    |		Load	0x2,-0x3
02b8 e5fe       |    |		Load	0x2,-0x2
02b9 4801       |H   |		Short_Literal	0x1
02ba e5ff       |    |		Load	0x2,-0x1
02bb 8213       |    |		Call	0x1,0x13
02bc c5fb       |    |		Store	0x2,-0x5
02bd c5fa       |    |		Store	0x2,-0x6
02be c5f9       |    |		Store	0x2,-0x7
02bf 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02c3       |    |		.CONST	0x02c3								; Address of begin
02c1 0004       |    |		.CONST	0x0004								; Address of exception handler
02c2 0001       |    |		.CONST	0x0001								; Number of locals
02c3			BODY_02c0:
02c3			INIT_02c0:
02c3 00da       |    |		Load_Top	At_Offset_2
02c4 800c       |    |		Call	0x0,0xc
02c5 00db       |    |		Load_Top	At_Offset_3
02c6 0227       | '  |		Execute	Access,All_Reference
02c7 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
02c8 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
02c9 e5fd       |    |		Load	0x2,-0x3
02ca 027f       |    |		Execute	Discrete,Equal
02cb 700b       |p   |		Jump_Nonzero	0x2d7
02cc e5fd       |    |		Load	0x2,-0x3
02cd e5fe       |    |		Load	0x2,-0x2
02ce 0227       | '  |		Execute	Access,All_Reference
02cf 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
02d0 380a       |8   |		Execute	Record,Field_Write,Field_Number 0xa
02d1 4801       |H   |		Short_Literal	0x1
02d2 4809       |H   |		Short_Literal	0x9
02d3 e5fe       |    |		Load	0x2,-0x2
02d4 0227       | '  |		Execute	Access,All_Reference
02d5 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
02d6 01d6       |    |		Execute	Vector,Field_Write
02d7 00da       |    |		Load_Top	At_Offset_2
02d8 8011       |    |		Call	0x0,0x11
02d9 00da       |    |		Load_Top	At_Offset_2
02da 8012       |    |		Call	0x0,0x12
02db 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
02dc 0000 0000  |    |		.BLANK	0000[0x4]
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02e3       |    |		.CONST	0x02e3								; Address of begin
02e1 0004       |    |		.CONST	0x0004								; Address of exception handler
02e2 0001       |    |		.CONST	0x0001								; Number of locals
02e3			BODY_02e0:
02e3			INIT_02e0:
02e3 00da       |    |		Load_Top	At_Offset_2
02e4 800c       |    |		Call	0x0,0xc
02e5 00db       |    |		Load_Top	At_Offset_3
02e6 0227       | '  |		Execute	Access,All_Reference
02e7 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
02e8 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
02e9 e5fd       |    |		Load	0x2,-0x3
02ea 027f       |    |		Execute	Discrete,Equal
02eb 700b       |p   |		Jump_Nonzero	0x2f7
02ec e5fd       |    |		Load	0x2,-0x3
02ed e5fe       |    |		Load	0x2,-0x2
02ee 0227       | '  |		Execute	Access,All_Reference
02ef 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
02f0 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
02f1 4801       |H   |		Short_Literal	0x1
02f2 481c       |H   |		Short_Literal	0x1c
02f3 e5fe       |    |		Load	0x2,-0x2
02f4 0227       | '  |		Execute	Access,All_Reference
02f5 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
02f6 01d6       |    |		Execute	Vector,Field_Write
02f7 00da       |    |		Load_Top	At_Offset_2
02f8 8011       |    |		Call	0x0,0x11
02f9 00da       |    |		Load_Top	At_Offset_2
02fa 8012       |    |		Call	0x0,0x12
02fb 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
02fc 0000 0000  |    |		.BLANK	0000[0x4]
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0303       |    |		.CONST	0x0303								; Address of begin
0301 0004       |    |		.CONST	0x0004								; Address of exception handler
0302 0001       |    |		.CONST	0x0001								; Number of locals
0303			BODY_0300:
0303			INIT_0300:
0303 00da       |    |		Load_Top	At_Offset_2
0304 800c       |    |		Call	0x0,0xc
0305 e5fd       |    |		Load	0x2,-0x3
0306 e5fe       |    |		Load	0x2,-0x2
0307 0227       | '  |		Execute	Access,All_Reference
0308 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0309 3814       |8   |		Execute	Record,Field_Write,Field_Number 0x14
030a 4801       |H   |		Short_Literal	0x1
030b 480c       |H   |		Short_Literal	0xc
030c e5fe       |    |		Load	0x2,-0x2
030d 0227       | '  |		Execute	Access,All_Reference
030e 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
030f 01d6       |    |		Execute	Vector,Field_Write
0310 4800       |H   |		Short_Literal	0x0
0311 e5fe       |    |		Load	0x2,-0x2
0312 0227       | '  |		Execute	Access,All_Reference
0313 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0314 00db       |    |		Load_Top	At_Offset_3
0315 00db       |    |		Load_Top	At_Offset_3
0316 8229       | )  |		Call	0x1,0x29
0317 00da       |    |		Load_Top	At_Offset_2
0318 8011       |    |		Call	0x0,0x11
0319 00da       |    |		Load_Top	At_Offset_2
031a 8012       |    |		Call	0x0,0x12
031b 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
031c 0000 0000  |    |		.BLANK	0000[0x4]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0327       | '  |		.CONST	0x0327								; Address of begin
0321 0004       |    |		.CONST	0x0004								; Address of exception handler
0322 0002       |    |		.CONST	0x0002								; Number of locals
0323			INIT_0320:
0323 00db       |    |		Load_Top	At_Offset_3
0324 0227       | '  |		Execute	Access,All_Reference
0325 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0326 0007       |    |		Action	Break_Optional
0327			BODY_0320:
0327 00db       |    |		Load_Top	At_Offset_3
0328 800c       |    |		Call	0x0,0xc
0329 e5fd       |    |		Load	0x2,-0x3
032a 00d9       |    |		Load_Top	At_Offset_1
032b 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
032c 027e       | ~  |		Execute	Discrete,Not_Equal
032d 6809       |h   |		Jump_Zero	0x337
032e e5fd       |    |		Load	0x2,-0x3
032f 00d9       |    |		Load_Top	At_Offset_1
0330 3812       |8   |		Execute	Record,Field_Write,Field_Number 0x12
0331 4801       |H   |		Short_Literal	0x1
0332 480e       |H   |		Short_Literal	0xe
0333 e5fe       |    |		Load	0x2,-0x2
0334 0227       | '  |		Execute	Access,All_Reference
0335 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0336 01d6       |    |		Execute	Vector,Field_Write
0337 e5fc       |    |		Load	0x2,-0x4
0338 00d9       |    |		Load_Top	At_Offset_1
0339 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
033a 027e       | ~  |		Execute	Discrete,Not_Equal
033b 6809       |h   |		Jump_Zero	0x345
033c e5fc       |    |		Load	0x2,-0x4
033d 00d9       |    |		Load_Top	At_Offset_1
033e 3813       |8   |		Execute	Record,Field_Write,Field_Number 0x13
033f 4801       |H   |		Short_Literal	0x1
0340 480d       |H   |		Short_Literal	0xd
0341 e5fe       |    |		Load	0x2,-0x2
0342 0227       | '  |		Execute	Access,All_Reference
0343 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0344 01d6       |    |		Execute	Vector,Field_Write
0345 00db       |    |		Load_Top	At_Offset_3
0346 8011       |    |		Call	0x0,0x11
0347 00db       |    |		Load_Top	At_Offset_3
0348 8012       |    |		Call	0x0,0x12
0349 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
034a 0000 0000  |    |		.BLANK	0000[0x6]
0350 ; --------------------------------------------------------------------------------------
0350 ; SUBPROGRAM
0350 ; --------------------------------------------------------------------------------------
0350 0355       | U  |		.CONST	0x0355								; Address of begin
0351 0004       |    |		.CONST	0x0004								; Address of exception handler
0352 0002       |    |		.CONST	0x0002								; Number of locals
0353			INIT_0350:
0353 029f 0bdb  |    |		Declare_Subprogram	INIT_0bd8,For_Call
0355			BODY_0350:
0355 00db       |    |		Load_Top	At_Offset_3
0356 800c       |    |		Call	0x0,0xc
0357 8402       |    |		Call	0x2,0x2
0358 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
0359 0000 0000  |    |		.BLANK	0000[0x7]
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 0365       | e  |		.CONST	0x0365								; Address of begin
0361 0004       |    |		.CONST	0x0004								; Address of exception handler
0362 0002       |    |		.CONST	0x0002								; Number of locals
0363			INIT_0360:
0363 029f 0c53  |   S|		Declare_Subprogram	INIT_0c50,For_Call
0365			BODY_0360:
0365 00db       |    |		Load_Top	At_Offset_3
0366 800c       |    |		Call	0x0,0xc
0367 8402       |    |		Call	0x2,0x2
0368 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0369 0000 0000  |    |		.BLANK	0000[0x7]
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 0373       | s  |		.CONST	0x0373								; Address of begin
0371 0004       |    |		.CONST	0x0004								; Address of exception handler
0372 0001       |    |		.CONST	0x0001								; Number of locals
0373			BODY_0370:
0373			INIT_0370:
0373 00da       |    |		Load_Top	At_Offset_2
0374 800c       |    |		Call	0x0,0xc
0375 00db       |    |		Load_Top	At_Offset_3
0376 0227       | '  |		Execute	Access,All_Reference
0377 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0378 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0379 e5fd       |    |		Load	0x2,-0x3
037a 027f       |    |		Execute	Discrete,Equal
037b 700b       |p   |		Jump_Nonzero	0x387
037c e5fd       |    |		Load	0x2,-0x3
037d e5fe       |    |		Load	0x2,-0x2
037e 0227       | '  |		Execute	Access,All_Reference
037f 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0380 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
0381 4801       |H   |		Short_Literal	0x1
0382 4816       |H   |		Short_Literal	0x16
0383 e5fe       |    |		Load	0x2,-0x2
0384 0227       | '  |		Execute	Access,All_Reference
0385 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0386 01d6       |    |		Execute	Vector,Field_Write
0387 00da       |    |		Load_Top	At_Offset_2
0388 8011       |    |		Call	0x0,0x11
0389 00da       |    |		Load_Top	At_Offset_2
038a 8012       |    |		Call	0x0,0x12
038b 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
038c 0000 0000  |    |		.BLANK	0000[0x4]
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0393       |    |		.CONST	0x0393								; Address of begin
0391 0004       |    |		.CONST	0x0004								; Address of exception handler
0392 0001       |    |		.CONST	0x0001								; Number of locals
0393			BODY_0390:
0393			INIT_0390:
0393 00da       |    |		Load_Top	At_Offset_2
0394 800c       |    |		Call	0x0,0xc
0395 00db       |    |		Load_Top	At_Offset_3
0396 0227       | '  |		Execute	Access,All_Reference
0397 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0398 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0399 e5fd       |    |		Load	0x2,-0x3
039a 027f       |    |		Execute	Discrete,Equal
039b 700b       |p   |		Jump_Nonzero	0x3a7
039c e5fd       |    |		Load	0x2,-0x3
039d e5fe       |    |		Load	0x2,-0x2
039e 0227       | '  |		Execute	Access,All_Reference
039f 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
03a0 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
03a1 4801       |H   |		Short_Literal	0x1
03a2 4817       |H   |		Short_Literal	0x17
03a3 e5fe       |    |		Load	0x2,-0x2
03a4 0227       | '  |		Execute	Access,All_Reference
03a5 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
03a6 01d6       |    |		Execute	Vector,Field_Write
03a7 00da       |    |		Load_Top	At_Offset_2
03a8 8011       |    |		Call	0x0,0x11
03a9 00da       |    |		Load_Top	At_Offset_2
03aa 8012       |    |		Call	0x0,0x12
03ab 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
03ac 0000 0000  |    |		.BLANK	0000[0x4]
03b0 ; --------------------------------------------------------------------------------------
03b0 ; SUBPROGRAM
03b0 ; --------------------------------------------------------------------------------------
03b0 03b3       |    |		.CONST	0x03b3								; Address of begin
03b1 0004       |    |		.CONST	0x0004								; Address of exception handler
03b2 0001       |    |		.CONST	0x0001								; Number of locals
03b3			BODY_03b0:
03b3			INIT_03b0:
03b3 00da       |    |		Load_Top	At_Offset_2
03b4 800c       |    |		Call	0x0,0xc
03b5 00db       |    |		Load_Top	At_Offset_3
03b6 0227       | '  |		Execute	Access,All_Reference
03b7 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
03b8 340f       |4   |		Execute	Record,Field_Reference,Field_Number 0xf
03b9 e5fd       |    |		Load	0x2,-0x3
03ba 017f       |    |		Execute	Record,Equal
03bb 700e       |p   |		Jump_Nonzero	0x3ca
03bc e5fd       |    |		Load	0x2,-0x3
03bd e5fe       |    |		Load	0x2,-0x2
03be 0227       | '  |		Execute	Access,All_Reference
03bf 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
03c0 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
03c1 4801       |H   |		Short_Literal	0x1
03c2 4811       |H   |		Short_Literal	0x11
03c3 e5fe       |    |		Load	0x2,-0x2
03c4 0227       | '  |		Execute	Access,All_Reference
03c5 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
03c6 01d6       |    |		Execute	Vector,Field_Write
03c7 00db       |    |		Load_Top	At_Offset_3
03c8 00db       |    |		Load_Top	At_Offset_3
03c9 8229       | )  |		Call	0x1,0x29
03ca 00da       |    |		Load_Top	At_Offset_2
03cb 8011       |    |		Call	0x0,0x11
03cc 00da       |    |		Load_Top	At_Offset_2
03cd 8012       |    |		Call	0x0,0x12
03ce 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
03cf 0000       |    |		.XXX[0x1]
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03d3       |    |		.CONST	0x03d3								; Address of begin
03d1 0004       |    |		.CONST	0x0004								; Address of exception handler
03d2 0001       |    |		.CONST	0x0001								; Number of locals
03d3			BODY_03d0:
03d3			INIT_03d0:
03d3 00da       |    |		Load_Top	At_Offset_2
03d4 800c       |    |		Call	0x0,0xc
03d5 00db       |    |		Load_Top	At_Offset_3
03d6 0227       | '  |		Execute	Access,All_Reference
03d7 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
03d8 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03d9 e5fd       |    |		Load	0x2,-0x3
03da 027f       |    |		Execute	Discrete,Equal
03db 700b       |p   |		Jump_Nonzero	0x3e7
03dc e5fd       |    |		Load	0x2,-0x3
03dd e5fe       |    |		Load	0x2,-0x2
03de 0227       | '  |		Execute	Access,All_Reference
03df 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
03e0 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
03e1 4801       |H   |		Short_Literal	0x1
03e2 481d       |H   |		Short_Literal	0x1d
03e3 e5fe       |    |		Load	0x2,-0x2
03e4 0227       | '  |		Execute	Access,All_Reference
03e5 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
03e6 01d6       |    |		Execute	Vector,Field_Write
03e7 00da       |    |		Load_Top	At_Offset_2
03e8 8011       |    |		Call	0x0,0x11
03e9 00da       |    |		Load_Top	At_Offset_2
03ea 8012       |    |		Call	0x0,0x12
03eb 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
03ec 0000 0000  |    |		.BLANK	0000[0x4]
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 03f3       |    |		.CONST	0x03f3								; Address of begin
03f1 0004       |    |		.CONST	0x0004								; Address of exception handler
03f2 0001       |    |		.CONST	0x0001								; Number of locals
03f3			BODY_03f0:
03f3			INIT_03f0:
03f3 00da       |    |		Load_Top	At_Offset_2
03f4 800c       |    |		Call	0x0,0xc
03f5 00db       |    |		Load_Top	At_Offset_3
03f6 0227       | '  |		Execute	Access,All_Reference
03f7 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
03f8 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03f9 e5fd       |    |		Load	0x2,-0x3
03fa 027f       |    |		Execute	Discrete,Equal
03fb 700b       |p   |		Jump_Nonzero	0x407
03fc e5fd       |    |		Load	0x2,-0x3
03fd e5fe       |    |		Load	0x2,-0x2
03fe 0227       | '  |		Execute	Access,All_Reference
03ff 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0400 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0401 4801       |H   |		Short_Literal	0x1
0402 481f       |H   |		Short_Literal	0x1f
0403 e5fe       |    |		Load	0x2,-0x2
0404 0227       | '  |		Execute	Access,All_Reference
0405 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0406 01d6       |    |		Execute	Vector,Field_Write
0407 00da       |    |		Load_Top	At_Offset_2
0408 8011       |    |		Call	0x0,0x11
0409 00da       |    |		Load_Top	At_Offset_2
040a 8012       |    |		Call	0x0,0x12
040b 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
040c 0000 0000  |    |		.BLANK	0000[0x4]
0410 ; --------------------------------------------------------------------------------------
0410 ; SUBPROGRAM
0410 ; --------------------------------------------------------------------------------------
0410 0413       |    |		.CONST	0x0413								; Address of begin
0411 0004       |    |		.CONST	0x0004								; Address of exception handler
0412 0001       |    |		.CONST	0x0001								; Number of locals
0413			BODY_0410:
0413			INIT_0410:
0413 00da       |    |		Load_Top	At_Offset_2
0414 800c       |    |		Call	0x0,0xc
0415 00db       |    |		Load_Top	At_Offset_3
0416 0227       | '  |		Execute	Access,All_Reference
0417 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0418 3c11       |<   |		Execute	Record,Field_Read,Field_Number 0x11
0419 e5fd       |    |		Load	0x2,-0x3
041a 027e       | ~  |		Execute	Discrete,Not_Equal
041b 680b       |h   |		Jump_Zero	0x427
041c e5fd       |    |		Load	0x2,-0x3
041d e5fe       |    |		Load	0x2,-0x2
041e 0227       | '  |		Execute	Access,All_Reference
041f 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0420 3811       |8   |		Execute	Record,Field_Write,Field_Number 0x11
0421 4801       |H   |		Short_Literal	0x1
0422 480f       |H   |		Short_Literal	0xf
0423 e5fe       |    |		Load	0x2,-0x2
0424 0227       | '  |		Execute	Access,All_Reference
0425 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0426 01d6       |    |		Execute	Vector,Field_Write
0427 00da       |    |		Load_Top	At_Offset_2
0428 8011       |    |		Call	0x0,0x11
0429 00da       |    |		Load_Top	At_Offset_2
042a 8012       |    |		Call	0x0,0x12
042b 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
042c 0000 0000  |    |		.BLANK	0000[0x4]
0430 ; --------------------------------------------------------------------------------------
0430 ; SUBPROGRAM
0430 ; --------------------------------------------------------------------------------------
0430 0437       | 7  |		.CONST	0x0437								; Address of begin
0431 0004       |    |		.CONST	0x0004								; Address of exception handler
0432 0002       |    |		.CONST	0x0002								; Number of locals
0433			INIT_0430:
0433 00db       |    |		Load_Top	At_Offset_3
0434 0227       | '  |		Execute	Access,All_Reference
0435 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0436 0007       |    |		Action	Break_Optional
0437			BODY_0430:
0437 00db       |    |		Load_Top	At_Offset_3
0438 800c       |    |		Call	0x0,0xc
0439 e5fd       |    |		Load	0x2,-0x3
043a 00d9       |    |		Load_Top	At_Offset_1
043b 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
043c 027e       | ~  |		Execute	Discrete,Not_Equal
043d 6809       |h   |		Jump_Zero	0x447
043e e5fd       |    |		Load	0x2,-0x3
043f 00d9       |    |		Load_Top	At_Offset_1
0440 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0441 4801       |H   |		Short_Literal	0x1
0442 481b       |H   |		Short_Literal	0x1b
0443 e5fe       |    |		Load	0x2,-0x2
0444 0227       | '  |		Execute	Access,All_Reference
0445 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0446 01d6       |    |		Execute	Vector,Field_Write
0447 e5fc       |    |		Load	0x2,-0x4
0448 00d9       |    |		Load_Top	At_Offset_1
0449 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
044a 027f       |    |		Execute	Discrete,Equal
044b 7009       |p   |		Jump_Nonzero	0x455
044c e5fc       |    |		Load	0x2,-0x4
044d 00d9       |    |		Load_Top	At_Offset_1
044e 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
044f 4801       |H   |		Short_Literal	0x1
0450 481a       |H   |		Short_Literal	0x1a
0451 e5fe       |    |		Load	0x2,-0x2
0452 0227       | '  |		Execute	Access,All_Reference
0453 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0454 01d6       |    |		Execute	Vector,Field_Write
0455 e5fb       |    |		Load	0x2,-0x5
0456 00d9       |    |		Load_Top	At_Offset_1
0457 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0458 027f       |    |		Execute	Discrete,Equal
0459 7009       |p   |		Jump_Nonzero	0x463
045a e5fb       |    |		Load	0x2,-0x5
045b 00d9       |    |		Load_Top	At_Offset_1
045c 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
045d 4801       |H   |		Short_Literal	0x1
045e 4819       |H   |		Short_Literal	0x19
045f e5fe       |    |		Load	0x2,-0x2
0460 0227       | '  |		Execute	Access,All_Reference
0461 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0462 01d6       |    |		Execute	Vector,Field_Write
0463 e5fa       |    |		Load	0x2,-0x6
0464 00d9       |    |		Load_Top	At_Offset_1
0465 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0466 027f       |    |		Execute	Discrete,Equal
0467 7009       |p   |		Jump_Nonzero	0x471
0468 e5fa       |    |		Load	0x2,-0x6
0469 00d9       |    |		Load_Top	At_Offset_1
046a 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
046b 4801       |H   |		Short_Literal	0x1
046c 4818       |H   |		Short_Literal	0x18
046d e5fe       |    |		Load	0x2,-0x2
046e 0227       | '  |		Execute	Access,All_Reference
046f 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0470 01d6       |    |		Execute	Vector,Field_Write
0471 00db       |    |		Load_Top	At_Offset_3
0472 8011       |    |		Call	0x0,0x11
0473 00db       |    |		Load_Top	At_Offset_3
0474 8012       |    |		Call	0x0,0x12
0475 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
0476 0000 0000  |    |		.XXX[0x2]
0478 ; --------------------------------------------------------------------------------------
0478 ; SUBPROGRAM
0478 ; --------------------------------------------------------------------------------------
0478 047b       | {  |		.CONST	0x047b								; Address of begin
0479 0004       |    |		.CONST	0x0004								; Address of exception handler
047a 0001       |    |		.CONST	0x0001								; Number of locals
047b			BODY_0478:
047b			INIT_0478:
047b 00da       |    |		Load_Top	At_Offset_2
047c 800c       |    |		Call	0x0,0xc
047d 00db       |    |		Load_Top	At_Offset_3
047e 0227       | '  |		Execute	Access,All_Reference
047f 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0480 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0481 e5fd       |    |		Load	0x2,-0x3
0482 027f       |    |		Execute	Discrete,Equal
0483 700b       |p   |		Jump_Nonzero	0x48f
0484 e5fd       |    |		Load	0x2,-0x3
0485 e5fe       |    |		Load	0x2,-0x2
0486 0227       | '  |		Execute	Access,All_Reference
0487 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0488 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0489 4801       |H   |		Short_Literal	0x1
048a 481e       |H   |		Short_Literal	0x1e
048b e5fe       |    |		Load	0x2,-0x2
048c 0227       | '  |		Execute	Access,All_Reference
048d 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
048e 01d6       |    |		Execute	Vector,Field_Write
048f 00da       |    |		Load_Top	At_Offset_2
0490 8011       |    |		Call	0x0,0x11
0491 00da       |    |		Load_Top	At_Offset_2
0492 8012       |    |		Call	0x0,0x12
0493 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0494 0000 0000  |    |		.BLANK	0000[0x4]
0498 ; --------------------------------------------------------------------------------------
0498 ; SUBPROGRAM
0498 ; --------------------------------------------------------------------------------------
0498 049f       |    |		.CONST	0x049f								; Address of begin
0499 0004       |    |		.CONST	0x0004								; Address of exception handler
049a 0002       |    |		.CONST	0x0002								; Number of locals
049b			INIT_0498:
049b 00db       |    |		Load_Top	At_Offset_3
049c 0227       | '  |		Execute	Access,All_Reference
049d 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
049e 0007       |    |		Action	Break_Optional
049f			BODY_0498:
049f 00db       |    |		Load_Top	At_Offset_3
04a0 800c       |    |		Call	0x0,0xc
04a1 e5fb       |    |		Load	0x2,-0x5
04a2 00d9       |    |		Load_Top	At_Offset_1
04a3 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
04a4 027f       |    |		Execute	Discrete,Equal
04a5 7009       |p   |		Jump_Nonzero	0x4af
04a6 e5fb       |    |		Load	0x2,-0x5
04a7 00d9       |    |		Load_Top	At_Offset_1
04a8 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
04a9 4801       |H   |		Short_Literal	0x1
04aa 481f       |H   |		Short_Literal	0x1f
04ab e5fe       |    |		Load	0x2,-0x2
04ac 0227       | '  |		Execute	Access,All_Reference
04ad 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
04ae 01d6       |    |		Execute	Vector,Field_Write
04af e5fa       |    |		Load	0x2,-0x6
04b0 00d9       |    |		Load_Top	At_Offset_1
04b1 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
04b2 027f       |    |		Execute	Discrete,Equal
04b3 7009       |p   |		Jump_Nonzero	0x4bd
04b4 e5fa       |    |		Load	0x2,-0x6
04b5 00d9       |    |		Load_Top	At_Offset_1
04b6 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
04b7 4801       |H   |		Short_Literal	0x1
04b8 481e       |H   |		Short_Literal	0x1e
04b9 e5fe       |    |		Load	0x2,-0x2
04ba 0227       | '  |		Execute	Access,All_Reference
04bb 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
04bc 01d6       |    |		Execute	Vector,Field_Write
04bd e5fd       |    |		Load	0x2,-0x3
04be 00d9       |    |		Load_Top	At_Offset_1
04bf 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
04c0 027f       |    |		Execute	Discrete,Equal
04c1 7009       |p   |		Jump_Nonzero	0x4cb
04c2 e5fd       |    |		Load	0x2,-0x3
04c3 00d9       |    |		Load_Top	At_Offset_1
04c4 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
04c5 4801       |H   |		Short_Literal	0x1
04c6 481d       |H   |		Short_Literal	0x1d
04c7 e5fe       |    |		Load	0x2,-0x2
04c8 0227       | '  |		Execute	Access,All_Reference
04c9 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
04ca 01d6       |    |		Execute	Vector,Field_Write
04cb e5fc       |    |		Load	0x2,-0x4
04cc 00d9       |    |		Load_Top	At_Offset_1
04cd 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
04ce 027f       |    |		Execute	Discrete,Equal
04cf 7009       |p   |		Jump_Nonzero	0x4d9
04d0 e5fc       |    |		Load	0x2,-0x4
04d1 00d9       |    |		Load_Top	At_Offset_1
04d2 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
04d3 4801       |H   |		Short_Literal	0x1
04d4 481c       |H   |		Short_Literal	0x1c
04d5 e5fe       |    |		Load	0x2,-0x2
04d6 0227       | '  |		Execute	Access,All_Reference
04d7 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
04d8 01d6       |    |		Execute	Vector,Field_Write
04d9 00db       |    |		Load_Top	At_Offset_3
04da 8011       |    |		Call	0x0,0x11
04db 00db       |    |		Load_Top	At_Offset_3
04dc 8012       |    |		Call	0x0,0x12
04dd 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
04de 0000 0000  |    |		.XXX[0x2]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 04e5       |    |		.CONST	0x04e5								; Address of begin
04e1 0004       |    |		.CONST	0x0004								; Address of exception handler
04e2 0002       |    |		.CONST	0x0002								; Number of locals
04e3			INIT_04e0:
04e3 029f 0cc3  |    |		Declare_Subprogram	INIT_0cc0,For_Call
04e5			BODY_04e0:
04e5 00db       |    |		Load_Top	At_Offset_3
04e6 800c       |    |		Call	0x0,0xc
04e7 8402       |    |		Call	0x2,0x2
04e8 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
04e9 0000 0000  |    |		.BLANK	0000[0x7]
04f0 ; --------------------------------------------------------------------------------------
04f0 ; SUBPROGRAM
04f0 ; --------------------------------------------------------------------------------------
04f0 04f3       |    |		.CONST	0x04f3								; Address of begin
04f1 0004       |    |		.CONST	0x0004								; Address of exception handler
04f2 0001       |    |		.CONST	0x0001								; Number of locals
04f3			BODY_04f0:
04f3			INIT_04f0:
04f3 00da       |    |		Load_Top	At_Offset_2
04f4 800c       |    |		Call	0x0,0xc
04f5 00db       |    |		Load_Top	At_Offset_3
04f6 0227       | '  |		Execute	Access,All_Reference
04f7 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
04f8 3c10       |<   |		Execute	Record,Field_Read,Field_Number 0x10
04f9 e5fd       |    |		Load	0x2,-0x3
04fa 027f       |    |		Execute	Discrete,Equal
04fb 700b       |p   |		Jump_Nonzero	0x507
04fc e5fd       |    |		Load	0x2,-0x3
04fd e5fe       |    |		Load	0x2,-0x2
04fe 0227       | '  |		Execute	Access,All_Reference
04ff 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0500 3810       |8   |		Execute	Record,Field_Write,Field_Number 0x10
0501 4801       |H   |		Short_Literal	0x1
0502 4810       |H   |		Short_Literal	0x10
0503 e5fe       |    |		Load	0x2,-0x2
0504 0227       | '  |		Execute	Access,All_Reference
0505 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0506 01d6       |    |		Execute	Vector,Field_Write
0507 00da       |    |		Load_Top	At_Offset_2
0508 8011       |    |		Call	0x0,0x11
0509 00da       |    |		Load_Top	At_Offset_2
050a 8012       |    |		Call	0x0,0x12
050b 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
050c 0000 0000  |    |		.BLANK	0000[0x4]
0510 ; --------------------------------------------------------------------------------------
0510 ; SUBPROGRAM
0510 ; --------------------------------------------------------------------------------------
0510 0513       |    |		.CONST	0x0513								; Address of begin
0511 0004       |    |		.CONST	0x0004								; Address of exception handler
0512 0001       |    |		.CONST	0x0001								; Number of locals
0513			BODY_0510:
0513			INIT_0510:
0513 00da       |    |		Load_Top	At_Offset_2
0514 800c       |    |		Call	0x0,0xc
0515 e5fd       |    |		Load	0x2,-0x3
0516 e5fe       |    |		Load	0x2,-0x2
0517 0227       | '  |		Execute	Access,All_Reference
0518 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0519 380b       |8   |		Execute	Record,Field_Write,Field_Number 0xb
051a 4801       |H   |		Short_Literal	0x1
051b 4815       |H   |		Short_Literal	0x15
051c e5fe       |    |		Load	0x2,-0x2
051d 0227       | '  |		Execute	Access,All_Reference
051e 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
051f 01d6       |    |		Execute	Vector,Field_Write
0520 00db       |    |		Load_Top	At_Offset_3
0521 00db       |    |		Load_Top	At_Offset_3
0522 8229       | )  |		Call	0x1,0x29
0523 00da       |    |		Load_Top	At_Offset_2
0524 8011       |    |		Call	0x0,0x11
0525 00da       |    |		Load_Top	At_Offset_2
0526 8012       |    |		Call	0x0,0x12
0527 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0528 ; --------------------------------------------------------------------------------------
0528 ; SUBPROGRAM
0528 ; --------------------------------------------------------------------------------------
0528 052f       | /  |		.CONST	0x052f								; Address of begin
0529 0004       |    |		.CONST	0x0004								; Address of exception handler
052a 0002       |    |		.CONST	0x0002								; Number of locals
052b			INIT_0528:
052b 00db       |    |		Load_Top	At_Offset_3
052c 0227       | '  |		Execute	Access,All_Reference
052d 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
052e 0007       |    |		Action	Break_Optional
052f			BODY_0528:
052f 00db       |    |		Load_Top	At_Offset_3
0530 800c       |    |		Call	0x0,0xc
0531 e5fd       |    |		Load	0x2,-0x3
0532 00d9       |    |		Load_Top	At_Offset_1
0533 3c0d       |<   |		Execute	Record,Field_Read,Field_Number 0xd
0534 027e       | ~  |		Execute	Discrete,Not_Equal
0535 6809       |h   |		Jump_Zero	0x53f
0536 e5fd       |    |		Load	0x2,-0x3
0537 00d9       |    |		Load_Top	At_Offset_1
0538 380d       |8   |		Execute	Record,Field_Write,Field_Number 0xd
0539 4801       |H   |		Short_Literal	0x1
053a 4813       |H   |		Short_Literal	0x13
053b e5fe       |    |		Load	0x2,-0x2
053c 0227       | '  |		Execute	Access,All_Reference
053d 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
053e 01d6       |    |		Execute	Vector,Field_Write
053f e5fc       |    |		Load	0x2,-0x4
0540 00d9       |    |		Load_Top	At_Offset_1
0541 3c0e       |<   |		Execute	Record,Field_Read,Field_Number 0xe
0542 027e       | ~  |		Execute	Discrete,Not_Equal
0543 6809       |h   |		Jump_Zero	0x54d
0544 e5fc       |    |		Load	0x2,-0x4
0545 00d9       |    |		Load_Top	At_Offset_1
0546 380e       |8   |		Execute	Record,Field_Write,Field_Number 0xe
0547 4801       |H   |		Short_Literal	0x1
0548 4812       |H   |		Short_Literal	0x12
0549 e5fe       |    |		Load	0x2,-0x2
054a 0227       | '  |		Execute	Access,All_Reference
054b 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
054c 01d6       |    |		Execute	Vector,Field_Write
054d 00db       |    |		Load_Top	At_Offset_3
054e 8011       |    |		Call	0x0,0x11
054f 00db       |    |		Load_Top	At_Offset_3
0550 8012       |    |		Call	0x0,0x12
0551 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0552 0000 0000  |    |		.BLANK	0000[0x6]
0558 ; --------------------------------------------------------------------------------------
0558 ; SUBPROGRAM
0558 ; --------------------------------------------------------------------------------------
0558 0568       | h  |		.CONST	0x0568								; Address of begin
0559 0004       |    |		.CONST	0x0004								; Address of exception handler
055a 0005       |    |		.CONST	0x0005								; Number of locals
055b			INIT_0558:
055b 00db       |    |		Load_Top	At_Offset_3
055c 0007       |    |		Action	Break_Optional
055d e00d       |    |		Load	0x0,0xd
055e 0007       |    |		Action	Break_Optional
055f e00e       |    |		Load	0x0,0xe
0560 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0561 e004       |    |		Load	0x0,0x4
0562 0337       | 7  |		Declare_Variable	Array
0563 00db       |    |		Load_Top	At_Offset_3
0564 0227       | '  |		Execute	Access,All_Reference
0565 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0566 00d9       |    |		Load_Top	At_Offset_1
0567 01d4       |    |		Execute	Vector,Structure_Write
0568			BODY_0558:
0568 00d8       |    |		Load_Top	At_Offset_0
0569 e00b       |    |		Load	0x0,0xb
056a 01df       |    |		Execute	Vector,Equal
056b 6801       |h   |		Jump_Zero	0x56d
056c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
056d e00b       |    |		Load	0x0,0xb
056e e402       |    |		Load	0x2,0x2
056f 0227       | '  |		Execute	Access,All_Reference
0570 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0571 00cf       |    |		Action	Mark_Auxiliary
0572 00d9       |    |		Load_Top	At_Offset_1
0573 01d9       |    |		Execute	Vector,Reverse_Bounds
0574 0007       |    |		Action	Break_Optional
0575 00d8       |    |		Load_Top	At_Offset_0
0576 e405       |    |		Load	0x2,0x5
0577 01d7       |    |		Execute	Vector,Field_Read
0578 6803       |h   |		Jump_Zero	0x57c
0579 e404       |    |		Load	0x2,0x4
057a 0a01       |    |		Execute_Immediate	Plus,0x1
057b c404       |    |		Store	0x2,0x4
057c 00c8       |    |		Action	Pop_Auxiliary_Range
057d 3ff7       |?   |		Loop_Increasing	0x575
057e 00ce       |    |		Action	Pop_Auxiliary
057f 00d9       |    |		Load_Top	At_Offset_1
0580 0902       |    |		Execute_Immediate	Binary_Scale,0x2
0581 00d8       |    |		Load_Top	At_Offset_0
0582 e00e       |    |		Load	0x0,0xe
0583 0260       | `  |		Execute	Discrete,In_Type
0584 7001       |p   |		Jump_Nonzero	0x586
0585 0801       |    |		Execute_Immediate	Raise,0x1
0586 e014       |    |		Load	0x0,0x14
0587 0322       | "  |		Declare_Variable	Record
0588 4838       |H8  |		Short_Literal	0x38
0589 00d9       |    |		Load_Top	At_Offset_1
058a 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
058b e014       |    |		Load	0x0,0x14
058c 012c       | ,  |		Execute	Any,Size
058d 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
058e e404       |    |		Load	0x2,0x4
058f 00d8       |    |		Load_Top	At_Offset_0
0590 e013       |    |		Load	0x0,0x13
0591 0260       | `  |		Execute	Discrete,In_Type
0592 7001       |p   |		Jump_Nonzero	0x594
0593 0801       |    |		Execute_Immediate	Raise,0x1
0594 0273       | s  |		Execute	Discrete,Plus
0595 00d9       |    |		Load_Top	At_Offset_1
0596 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0597 4800       |H   |		Short_Literal	0x0
0598 00d9       |    |		Load_Top	At_Offset_1
0599 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
059a e402       |    |		Load	0x2,0x2
059b 0227       | '  |		Execute	Access,All_Reference
059c 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
059d 00d9       |    |		Load_Top	At_Offset_1
059e 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
059f 00da       |    |		Load_Top	At_Offset_2
05a0 e014       |    |		Load	0x0,0x14
05a1 3004       |0   |		Execute	Record,Field_Type,Field_Number 0x4
05a2 0119       |    |		Execute	Any,Check_In_Formal_Type
05a3 00d9       |    |		Load_Top	At_Offset_1
05a4 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
05a5 e5ff       |    |		Load	0x2,-0x1
05a6 e015       |    |		Load	0x0,0x15
05a7 a016       |    |		Store_Unchecked	0x0,0x16
05a8 e017       |    |		Load	0x0,0x17
05a9 e018       |    |		Load	0x0,0x18
05aa a019       |    |		Store_Unchecked	0x0,0x19
05ab 801a       |    |		Call	0x0,0x1a
05ac 00db       |    |		Load_Top	At_Offset_3
05ad 0227       | '  |		Execute	Access,All_Reference
05ae 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
05af 00d9       |    |		Load_Top	At_Offset_1
05b0 e5ff       |    |		Load	0x2,-0x1
05b1 8232       | 2  |		Call	0x1,0x32
05b2 e5ff       |    |		Load	0x2,-0x1
05b3 0227       | '  |		Execute	Access,All_Reference
05b4 3c25       |<%  |		Execute	Record,Field_Read,Field_Number 0x25
05b5 003b       | ;  |		Store_Top	Access,At_Offset_3
05b6 00cf       |    |		Action	Mark_Auxiliary
05b7 7815       |x   |		Jump	0x5cd
05b8 00db       |    |		Load_Top	At_Offset_3
05b9 0227       | '  |		Execute	Access,All_Reference
05ba 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
05bb e01b       |    |		Load	0x0,0x1b
05bc 022e       | .  |		Execute	Access,Not_Equal
05bd 680a       |h   |		Jump_Zero	0x5c8
05be 00db       |    |		Load_Top	At_Offset_3
05bf 0227       | '  |		Execute	Access,All_Reference
05c0 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
05c1 e402       |    |		Load	0x2,0x2
05c2 e5ff       |    |		Load	0x2,-0x1
05c3 e403       |    |		Load	0x2,0x3
05c4 0227       | '  |		Execute	Access,All_Reference
05c5 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
05c6 801c       |    |		Call	0x0,0x1c
05c7 801d       |    |		Call	0x0,0x1d
05c8 00db       |    |		Load_Top	At_Offset_3
05c9 0227       | '  |		Execute	Access,All_Reference
05ca 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05cb a403       |    |		Store_Unchecked	0x2,0x3
05cc 00c9       |    |		Action	Pop_Auxiliary_Loop
05cd 00db       |    |		Load_Top	At_Offset_3
05ce 77e9       |w   |		Jump_Nonzero	0x5b8
05cf 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05d0 ; --------------------------------------------------------------------------------------
05d0 ; SUBPROGRAM
05d0 ; --------------------------------------------------------------------------------------
05d0 05d7       |    |		.CONST	0x05d7								; Address of begin
05d1 0004       |    |		.CONST	0x0004								; Address of exception handler
05d2 0002       |    |		.CONST	0x0002								; Number of locals
05d3			INIT_05d0:
05d3 00da       |    |		Load_Top	At_Offset_2
05d4 0227       | '  |		Execute	Access,All_Reference
05d5 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
05d6 0007       |    |		Action	Break_Optional
05d7			BODY_05d0:
05d7 481f       |H   |		Short_Literal	0x1f
05d8 e5fe       |    |		Load	0x2,-0x2
05d9 01d7       |    |		Execute	Vector,Field_Read
05da 6810       |h   |		Jump_Zero	0x5eb
05db 00d8       |    |		Load_Top	At_Offset_0
05dc 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05dd e5fd       |    |		Load	0x2,-0x3
05de 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05df 027f       |    |		Execute	Discrete,Equal
05e0 700a       |p   |		Jump_Nonzero	0x5eb
05e1 e5fd       |    |		Load	0x2,-0x3
05e2 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05e3 00d9       |    |		Load_Top	At_Offset_1
05e4 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
05e5 4801       |H   |		Short_Literal	0x1
05e6 481f       |H   |		Short_Literal	0x1f
05e7 e5ff       |    |		Load	0x2,-0x1
05e8 0227       | '  |		Execute	Access,All_Reference
05e9 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
05ea 01d6       |    |		Execute	Vector,Field_Write
05eb 481e       |H   |		Short_Literal	0x1e
05ec e5fe       |    |		Load	0x2,-0x2
05ed 01d7       |    |		Execute	Vector,Field_Read
05ee 6810       |h   |		Jump_Zero	0x5ff
05ef 00d8       |    |		Load_Top	At_Offset_0
05f0 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
05f1 e5fd       |    |		Load	0x2,-0x3
05f2 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
05f3 027f       |    |		Execute	Discrete,Equal
05f4 700a       |p   |		Jump_Nonzero	0x5ff
05f5 e5fd       |    |		Load	0x2,-0x3
05f6 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
05f7 00d9       |    |		Load_Top	At_Offset_1
05f8 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
05f9 4801       |H   |		Short_Literal	0x1
05fa 481e       |H   |		Short_Literal	0x1e
05fb e5ff       |    |		Load	0x2,-0x1
05fc 0227       | '  |		Execute	Access,All_Reference
05fd 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
05fe 01d6       |    |		Execute	Vector,Field_Write
05ff 481d       |H   |		Short_Literal	0x1d
0600 e5fe       |    |		Load	0x2,-0x2
0601 01d7       |    |		Execute	Vector,Field_Read
0602 6810       |h   |		Jump_Zero	0x613
0603 00d8       |    |		Load_Top	At_Offset_0
0604 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0605 e5fd       |    |		Load	0x2,-0x3
0606 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0607 027f       |    |		Execute	Discrete,Equal
0608 700a       |p   |		Jump_Nonzero	0x613
0609 e5fd       |    |		Load	0x2,-0x3
060a 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
060b 00d9       |    |		Load_Top	At_Offset_1
060c 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
060d 4801       |H   |		Short_Literal	0x1
060e 481d       |H   |		Short_Literal	0x1d
060f e5ff       |    |		Load	0x2,-0x1
0610 0227       | '  |		Execute	Access,All_Reference
0611 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0612 01d6       |    |		Execute	Vector,Field_Write
0613 481c       |H   |		Short_Literal	0x1c
0614 e5fe       |    |		Load	0x2,-0x2
0615 01d7       |    |		Execute	Vector,Field_Read
0616 6810       |h   |		Jump_Zero	0x627
0617 00d8       |    |		Load_Top	At_Offset_0
0618 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0619 e5fd       |    |		Load	0x2,-0x3
061a 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
061b 027f       |    |		Execute	Discrete,Equal
061c 700a       |p   |		Jump_Nonzero	0x627
061d e5fd       |    |		Load	0x2,-0x3
061e 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
061f 00d9       |    |		Load_Top	At_Offset_1
0620 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0621 4801       |H   |		Short_Literal	0x1
0622 481c       |H   |		Short_Literal	0x1c
0623 e5ff       |    |		Load	0x2,-0x1
0624 0227       | '  |		Execute	Access,All_Reference
0625 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0626 01d6       |    |		Execute	Vector,Field_Write
0627 481b       |H   |		Short_Literal	0x1b
0628 e5fe       |    |		Load	0x2,-0x2
0629 01d7       |    |		Execute	Vector,Field_Read
062a 6810       |h   |		Jump_Zero	0x63b
062b 00d8       |    |		Load_Top	At_Offset_0
062c 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
062d e5fd       |    |		Load	0x2,-0x3
062e 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
062f 027e       | ~  |		Execute	Discrete,Not_Equal
0630 680a       |h   |		Jump_Zero	0x63b
0631 e5fd       |    |		Load	0x2,-0x3
0632 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0633 00d9       |    |		Load_Top	At_Offset_1
0634 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0635 4801       |H   |		Short_Literal	0x1
0636 481b       |H   |		Short_Literal	0x1b
0637 e5ff       |    |		Load	0x2,-0x1
0638 0227       | '  |		Execute	Access,All_Reference
0639 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
063a 01d6       |    |		Execute	Vector,Field_Write
063b 481a       |H   |		Short_Literal	0x1a
063c e5fe       |    |		Load	0x2,-0x2
063d 01d7       |    |		Execute	Vector,Field_Read
063e 6810       |h   |		Jump_Zero	0x64f
063f 00d8       |    |		Load_Top	At_Offset_0
0640 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0641 e5fd       |    |		Load	0x2,-0x3
0642 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0643 027f       |    |		Execute	Discrete,Equal
0644 700a       |p   |		Jump_Nonzero	0x64f
0645 e5fd       |    |		Load	0x2,-0x3
0646 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0647 00d9       |    |		Load_Top	At_Offset_1
0648 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0649 4801       |H   |		Short_Literal	0x1
064a 481a       |H   |		Short_Literal	0x1a
064b e5ff       |    |		Load	0x2,-0x1
064c 0227       | '  |		Execute	Access,All_Reference
064d 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
064e 01d6       |    |		Execute	Vector,Field_Write
064f 4819       |H   |		Short_Literal	0x19
0650 e5fe       |    |		Load	0x2,-0x2
0651 01d7       |    |		Execute	Vector,Field_Read
0652 6810       |h   |		Jump_Zero	0x663
0653 00d8       |    |		Load_Top	At_Offset_0
0654 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0655 e5fd       |    |		Load	0x2,-0x3
0656 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0657 027f       |    |		Execute	Discrete,Equal
0658 700a       |p   |		Jump_Nonzero	0x663
0659 e5fd       |    |		Load	0x2,-0x3
065a 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
065b 00d9       |    |		Load_Top	At_Offset_1
065c 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
065d 4801       |H   |		Short_Literal	0x1
065e 4819       |H   |		Short_Literal	0x19
065f e5ff       |    |		Load	0x2,-0x1
0660 0227       | '  |		Execute	Access,All_Reference
0661 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0662 01d6       |    |		Execute	Vector,Field_Write
0663 4818       |H   |		Short_Literal	0x18
0664 e5fe       |    |		Load	0x2,-0x2
0665 01d7       |    |		Execute	Vector,Field_Read
0666 6810       |h   |		Jump_Zero	0x677
0667 00d8       |    |		Load_Top	At_Offset_0
0668 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0669 e5fd       |    |		Load	0x2,-0x3
066a 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
066b 027f       |    |		Execute	Discrete,Equal
066c 700a       |p   |		Jump_Nonzero	0x677
066d e5fd       |    |		Load	0x2,-0x3
066e 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
066f 00d9       |    |		Load_Top	At_Offset_1
0670 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
0671 4801       |H   |		Short_Literal	0x1
0672 4818       |H   |		Short_Literal	0x18
0673 e5ff       |    |		Load	0x2,-0x1
0674 0227       | '  |		Execute	Access,All_Reference
0675 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0676 01d6       |    |		Execute	Vector,Field_Write
0677 4817       |H   |		Short_Literal	0x17
0678 e5fe       |    |		Load	0x2,-0x2
0679 01d7       |    |		Execute	Vector,Field_Read
067a 6810       |h   |		Jump_Zero	0x68b
067b 00d8       |    |		Load_Top	At_Offset_0
067c 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
067d e5fd       |    |		Load	0x2,-0x3
067e 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
067f 027f       |    |		Execute	Discrete,Equal
0680 700a       |p   |		Jump_Nonzero	0x68b
0681 e5fd       |    |		Load	0x2,-0x3
0682 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0683 00d9       |    |		Load_Top	At_Offset_1
0684 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
0685 4801       |H   |		Short_Literal	0x1
0686 4817       |H   |		Short_Literal	0x17
0687 e5ff       |    |		Load	0x2,-0x1
0688 0227       | '  |		Execute	Access,All_Reference
0689 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
068a 01d6       |    |		Execute	Vector,Field_Write
068b 4816       |H   |		Short_Literal	0x16
068c e5fe       |    |		Load	0x2,-0x2
068d 01d7       |    |		Execute	Vector,Field_Read
068e 6810       |h   |		Jump_Zero	0x69f
068f 00d8       |    |		Load_Top	At_Offset_0
0690 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0691 e5fd       |    |		Load	0x2,-0x3
0692 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0693 027f       |    |		Execute	Discrete,Equal
0694 700a       |p   |		Jump_Nonzero	0x69f
0695 e5fd       |    |		Load	0x2,-0x3
0696 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0697 00d9       |    |		Load_Top	At_Offset_1
0698 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
0699 4801       |H   |		Short_Literal	0x1
069a 4816       |H   |		Short_Literal	0x16
069b e5ff       |    |		Load	0x2,-0x1
069c 0227       | '  |		Execute	Access,All_Reference
069d 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
069e 01d6       |    |		Execute	Vector,Field_Write
069f 4809       |H   |		Short_Literal	0x9
06a0 e5fe       |    |		Load	0x2,-0x2
06a1 01d7       |    |		Execute	Vector,Field_Read
06a2 6810       |h   |		Jump_Zero	0x6b3
06a3 00d8       |    |		Load_Top	At_Offset_0
06a4 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
06a5 e5fd       |    |		Load	0x2,-0x3
06a6 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
06a7 027f       |    |		Execute	Discrete,Equal
06a8 700a       |p   |		Jump_Nonzero	0x6b3
06a9 e5fd       |    |		Load	0x2,-0x3
06aa 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
06ab 00d9       |    |		Load_Top	At_Offset_1
06ac 380a       |8   |		Execute	Record,Field_Write,Field_Number 0xa
06ad 4801       |H   |		Short_Literal	0x1
06ae 4809       |H   |		Short_Literal	0x9
06af e5ff       |    |		Load	0x2,-0x1
06b0 0227       | '  |		Execute	Access,All_Reference
06b1 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
06b2 01d6       |    |		Execute	Vector,Field_Write
06b3 4815       |H   |		Short_Literal	0x15
06b4 e5fe       |    |		Load	0x2,-0x2
06b5 01d7       |    |		Execute	Vector,Field_Read
06b6 680a       |h   |		Jump_Zero	0x6c1
06b7 e5fd       |    |		Load	0x2,-0x3
06b8 340b       |4   |		Execute	Record,Field_Reference,Field_Number 0xb
06b9 00d9       |    |		Load_Top	At_Offset_1
06ba 380b       |8   |		Execute	Record,Field_Write,Field_Number 0xb
06bb 4801       |H   |		Short_Literal	0x1
06bc 4815       |H   |		Short_Literal	0x15
06bd e5ff       |    |		Load	0x2,-0x1
06be 0227       | '  |		Execute	Access,All_Reference
06bf 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
06c0 01d6       |    |		Execute	Vector,Field_Write
06c1 4814       |H   |		Short_Literal	0x14
06c2 e5fe       |    |		Load	0x2,-0x2
06c3 01d7       |    |		Execute	Vector,Field_Read
06c4 680a       |h   |		Jump_Zero	0x6cf
06c5 e5fd       |    |		Load	0x2,-0x3
06c6 340c       |4   |		Execute	Record,Field_Reference,Field_Number 0xc
06c7 00d9       |    |		Load_Top	At_Offset_1
06c8 380c       |8   |		Execute	Record,Field_Write,Field_Number 0xc
06c9 4801       |H   |		Short_Literal	0x1
06ca 4814       |H   |		Short_Literal	0x14
06cb e5ff       |    |		Load	0x2,-0x1
06cc 0227       | '  |		Execute	Access,All_Reference
06cd 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
06ce 01d6       |    |		Execute	Vector,Field_Write
06cf 4813       |H   |		Short_Literal	0x13
06d0 e5fe       |    |		Load	0x2,-0x2
06d1 01d7       |    |		Execute	Vector,Field_Read
06d2 6810       |h   |		Jump_Zero	0x6e3
06d3 00d8       |    |		Load_Top	At_Offset_0
06d4 3c0d       |<   |		Execute	Record,Field_Read,Field_Number 0xd
06d5 e5fd       |    |		Load	0x2,-0x3
06d6 3c0d       |<   |		Execute	Record,Field_Read,Field_Number 0xd
06d7 027e       | ~  |		Execute	Discrete,Not_Equal
06d8 680a       |h   |		Jump_Zero	0x6e3
06d9 e5fd       |    |		Load	0x2,-0x3
06da 3c0d       |<   |		Execute	Record,Field_Read,Field_Number 0xd
06db 00d9       |    |		Load_Top	At_Offset_1
06dc 380d       |8   |		Execute	Record,Field_Write,Field_Number 0xd
06dd 4801       |H   |		Short_Literal	0x1
06de 4813       |H   |		Short_Literal	0x13
06df e5ff       |    |		Load	0x2,-0x1
06e0 0227       | '  |		Execute	Access,All_Reference
06e1 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
06e2 01d6       |    |		Execute	Vector,Field_Write
06e3 4812       |H   |		Short_Literal	0x12
06e4 e5fe       |    |		Load	0x2,-0x2
06e5 01d7       |    |		Execute	Vector,Field_Read
06e6 6810       |h   |		Jump_Zero	0x6f7
06e7 00d8       |    |		Load_Top	At_Offset_0
06e8 3c0e       |<   |		Execute	Record,Field_Read,Field_Number 0xe
06e9 e5fd       |    |		Load	0x2,-0x3
06ea 3c0e       |<   |		Execute	Record,Field_Read,Field_Number 0xe
06eb 027e       | ~  |		Execute	Discrete,Not_Equal
06ec 680a       |h   |		Jump_Zero	0x6f7
06ed e5fd       |    |		Load	0x2,-0x3
06ee 3c0e       |<   |		Execute	Record,Field_Read,Field_Number 0xe
06ef 00d9       |    |		Load_Top	At_Offset_1
06f0 380e       |8   |		Execute	Record,Field_Write,Field_Number 0xe
06f1 4801       |H   |		Short_Literal	0x1
06f2 4812       |H   |		Short_Literal	0x12
06f3 e5ff       |    |		Load	0x2,-0x1
06f4 0227       | '  |		Execute	Access,All_Reference
06f5 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
06f6 01d6       |    |		Execute	Vector,Field_Write
06f7 4811       |H   |		Short_Literal	0x11
06f8 e5fe       |    |		Load	0x2,-0x2
06f9 01d7       |    |		Execute	Vector,Field_Read
06fa 6810       |h   |		Jump_Zero	0x70b
06fb 00d8       |    |		Load_Top	At_Offset_0
06fc 340f       |4   |		Execute	Record,Field_Reference,Field_Number 0xf
06fd e5fd       |    |		Load	0x2,-0x3
06fe 340f       |4   |		Execute	Record,Field_Reference,Field_Number 0xf
06ff 017f       |    |		Execute	Record,Equal
0700 700a       |p   |		Jump_Nonzero	0x70b
0701 e5fd       |    |		Load	0x2,-0x3
0702 340f       |4   |		Execute	Record,Field_Reference,Field_Number 0xf
0703 00d9       |    |		Load_Top	At_Offset_1
0704 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0705 4801       |H   |		Short_Literal	0x1
0706 4811       |H   |		Short_Literal	0x11
0707 e5ff       |    |		Load	0x2,-0x1
0708 0227       | '  |		Execute	Access,All_Reference
0709 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
070a 01d6       |    |		Execute	Vector,Field_Write
070b 4810       |H   |		Short_Literal	0x10
070c e5fe       |    |		Load	0x2,-0x2
070d 01d7       |    |		Execute	Vector,Field_Read
070e 6810       |h   |		Jump_Zero	0x71f
070f 00d8       |    |		Load_Top	At_Offset_0
0710 3c10       |<   |		Execute	Record,Field_Read,Field_Number 0x10
0711 e5fd       |    |		Load	0x2,-0x3
0712 3c10       |<   |		Execute	Record,Field_Read,Field_Number 0x10
0713 027f       |    |		Execute	Discrete,Equal
0714 700a       |p   |		Jump_Nonzero	0x71f
0715 e5fd       |    |		Load	0x2,-0x3
0716 3c10       |<   |		Execute	Record,Field_Read,Field_Number 0x10
0717 00d9       |    |		Load_Top	At_Offset_1
0718 3810       |8   |		Execute	Record,Field_Write,Field_Number 0x10
0719 4801       |H   |		Short_Literal	0x1
071a 4810       |H   |		Short_Literal	0x10
071b e5ff       |    |		Load	0x2,-0x1
071c 0227       | '  |		Execute	Access,All_Reference
071d 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
071e 01d6       |    |		Execute	Vector,Field_Write
071f 480f       |H   |		Short_Literal	0xf
0720 e5fe       |    |		Load	0x2,-0x2
0721 01d7       |    |		Execute	Vector,Field_Read
0722 6810       |h   |		Jump_Zero	0x733
0723 00d8       |    |		Load_Top	At_Offset_0
0724 3c11       |<   |		Execute	Record,Field_Read,Field_Number 0x11
0725 e5fd       |    |		Load	0x2,-0x3
0726 3c11       |<   |		Execute	Record,Field_Read,Field_Number 0x11
0727 027e       | ~  |		Execute	Discrete,Not_Equal
0728 680a       |h   |		Jump_Zero	0x733
0729 e5fd       |    |		Load	0x2,-0x3
072a 3c11       |<   |		Execute	Record,Field_Read,Field_Number 0x11
072b 00d9       |    |		Load_Top	At_Offset_1
072c 3811       |8   |		Execute	Record,Field_Write,Field_Number 0x11
072d 4801       |H   |		Short_Literal	0x1
072e 480f       |H   |		Short_Literal	0xf
072f e5ff       |    |		Load	0x2,-0x1
0730 0227       | '  |		Execute	Access,All_Reference
0731 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0732 01d6       |    |		Execute	Vector,Field_Write
0733 480e       |H   |		Short_Literal	0xe
0734 e5fe       |    |		Load	0x2,-0x2
0735 01d7       |    |		Execute	Vector,Field_Read
0736 6810       |h   |		Jump_Zero	0x747
0737 00d8       |    |		Load_Top	At_Offset_0
0738 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
0739 e5fd       |    |		Load	0x2,-0x3
073a 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
073b 027e       | ~  |		Execute	Discrete,Not_Equal
073c 680a       |h   |		Jump_Zero	0x747
073d e5fd       |    |		Load	0x2,-0x3
073e 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
073f 00d9       |    |		Load_Top	At_Offset_1
0740 3812       |8   |		Execute	Record,Field_Write,Field_Number 0x12
0741 4801       |H   |		Short_Literal	0x1
0742 480e       |H   |		Short_Literal	0xe
0743 e5ff       |    |		Load	0x2,-0x1
0744 0227       | '  |		Execute	Access,All_Reference
0745 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0746 01d6       |    |		Execute	Vector,Field_Write
0747 480d       |H   |		Short_Literal	0xd
0748 e5fe       |    |		Load	0x2,-0x2
0749 01d7       |    |		Execute	Vector,Field_Read
074a 6810       |h   |		Jump_Zero	0x75b
074b 00d8       |    |		Load_Top	At_Offset_0
074c 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
074d e5fd       |    |		Load	0x2,-0x3
074e 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
074f 027e       | ~  |		Execute	Discrete,Not_Equal
0750 680a       |h   |		Jump_Zero	0x75b
0751 e5fd       |    |		Load	0x2,-0x3
0752 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
0753 00d9       |    |		Load_Top	At_Offset_1
0754 3813       |8   |		Execute	Record,Field_Write,Field_Number 0x13
0755 4801       |H   |		Short_Literal	0x1
0756 480d       |H   |		Short_Literal	0xd
0757 e5ff       |    |		Load	0x2,-0x1
0758 0227       | '  |		Execute	Access,All_Reference
0759 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
075a 01d6       |    |		Execute	Vector,Field_Write
075b 480c       |H   |		Short_Literal	0xc
075c e5fe       |    |		Load	0x2,-0x2
075d 01d7       |    |		Execute	Vector,Field_Read
075e 680e       |h   |		Jump_Zero	0x76d
075f e5fd       |    |		Load	0x2,-0x3
0760 3414       |4   |		Execute	Record,Field_Reference,Field_Number 0x14
0761 00d9       |    |		Load_Top	At_Offset_1
0762 3814       |8   |		Execute	Record,Field_Write,Field_Number 0x14
0763 4801       |H   |		Short_Literal	0x1
0764 480c       |H   |		Short_Literal	0xc
0765 e5ff       |    |		Load	0x2,-0x1
0766 0227       | '  |		Execute	Access,All_Reference
0767 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0768 01d6       |    |		Execute	Vector,Field_Write
0769 4800       |H   |		Short_Literal	0x0
076a e5ff       |    |		Load	0x2,-0x1
076b 0227       | '  |		Execute	Access,All_Reference
076c 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
076d 480b       |H   |		Short_Literal	0xb
076e e5fe       |    |		Load	0x2,-0x2
076f 01d7       |    |		Execute	Vector,Field_Read
0770 6810       |h   |		Jump_Zero	0x781
0771 00d8       |    |		Load_Top	At_Offset_0
0772 3c15       |<   |		Execute	Record,Field_Read,Field_Number 0x15
0773 e5fd       |    |		Load	0x2,-0x3
0774 3c15       |<   |		Execute	Record,Field_Read,Field_Number 0x15
0775 027e       | ~  |		Execute	Discrete,Not_Equal
0776 680a       |h   |		Jump_Zero	0x781
0777 e5fd       |    |		Load	0x2,-0x3
0778 3c15       |<   |		Execute	Record,Field_Read,Field_Number 0x15
0779 00d9       |    |		Load_Top	At_Offset_1
077a 3815       |8   |		Execute	Record,Field_Write,Field_Number 0x15
077b 4801       |H   |		Short_Literal	0x1
077c 480b       |H   |		Short_Literal	0xb
077d e5ff       |    |		Load	0x2,-0x1
077e 0227       | '  |		Execute	Access,All_Reference
077f 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0780 01d6       |    |		Execute	Vector,Field_Write
0781 480a       |H   |		Short_Literal	0xa
0782 e5fe       |    |		Load	0x2,-0x2
0783 01d7       |    |		Execute	Vector,Field_Read
0784 6819       |h   |		Jump_Zero	0x79e
0785 00d8       |    |		Load_Top	At_Offset_0
0786 3c16       |<   |		Execute	Record,Field_Read,Field_Number 0x16
0787 e5fd       |    |		Load	0x2,-0x3
0788 3c16       |<   |		Execute	Record,Field_Read,Field_Number 0x16
0789 027e       | ~  |		Execute	Discrete,Not_Equal
078a 7005       |p   |		Jump_Nonzero	0x790
078b 00db       |    |		Load_Top	At_Offset_3
078c 0227       | '  |		Execute	Access,All_Reference
078d 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
078e 0f01       |    |		Execute_Immediate	Equal,0x1
078f 680e       |h   |		Jump_Zero	0x79e
0790 e5fd       |    |		Load	0x2,-0x3
0791 3c16       |<   |		Execute	Record,Field_Read,Field_Number 0x16
0792 00d9       |    |		Load_Top	At_Offset_1
0793 3816       |8   |		Execute	Record,Field_Write,Field_Number 0x16
0794 4801       |H   |		Short_Literal	0x1
0795 480a       |H   |		Short_Literal	0xa
0796 e5ff       |    |		Load	0x2,-0x1
0797 0227       | '  |		Execute	Access,All_Reference
0798 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0799 01d6       |    |		Execute	Vector,Field_Write
079a 4800       |H   |		Short_Literal	0x0
079b e5ff       |    |		Load	0x2,-0x1
079c 0227       | '  |		Execute	Access,All_Reference
079d 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
079e 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
079f 0000       |    |		.XXX[0x1]
07a0 ; --------------------------------------------------------------------------------------
07a0 ; SUBPROGRAM
07a0 ; --------------------------------------------------------------------------------------
07a0 07a3       |    |		.CONST	0x07a3								; Address of begin
07a1 0004       |    |		.CONST	0x0004								; Address of exception handler
07a2 0001       |    |		.CONST	0x0001								; Number of locals
07a3			BODY_07a0:
07a3			INIT_07a0:
07a3 481f       |H   |		Short_Literal	0x1f
07a4 e5fe       |    |		Load	0x2,-0x2
07a5 01d7       |    |		Execute	Vector,Field_Read
07a6 680e       |h   |		Jump_Zero	0x7b5
07a7 e5fd       |    |		Load	0x2,-0x3
07a8 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
07a9 00d8       |    |		Load_Top	At_Offset_0
07aa e01e       |    |		Load	0x0,0x1e
07ab 0260       | `  |		Execute	Discrete,In_Type
07ac 7001       |p   |		Jump_Nonzero	0x7ae
07ad 0801       |    |		Execute_Immediate	Raise,0x1
07ae 00db       |    |		Load_Top	At_Offset_3
07af e01f       |    |		Load	0x0,0x1f
07b0 a020       |    |		Store_Unchecked	0x0,0x20
07b1 e021       | !  |		Load	0x0,0x21
07b2 e022       | "  |		Load	0x0,0x22
07b3 a023       | #  |		Store_Unchecked	0x0,0x23
07b4 8024       | $  |		Call	0x0,0x24
07b5 481e       |H   |		Short_Literal	0x1e
07b6 e5fe       |    |		Load	0x2,-0x2
07b7 01d7       |    |		Execute	Vector,Field_Read
07b8 6809       |h   |		Jump_Zero	0x7c2
07b9 e5fd       |    |		Load	0x2,-0x3
07ba 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
07bb 00db       |    |		Load_Top	At_Offset_3
07bc e025       | %  |		Load	0x0,0x25
07bd a026       | &  |		Store_Unchecked	0x0,0x26
07be e027       | '  |		Load	0x0,0x27
07bf e028       | (  |		Load	0x0,0x28
07c0 a029       | )  |		Store_Unchecked	0x0,0x29
07c1 8024       | $  |		Call	0x0,0x24
07c2 481d       |H   |		Short_Literal	0x1d
07c3 e5fe       |    |		Load	0x2,-0x2
07c4 01d7       |    |		Execute	Vector,Field_Read
07c5 6809       |h   |		Jump_Zero	0x7cf
07c6 e5fd       |    |		Load	0x2,-0x3
07c7 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
07c8 00db       |    |		Load_Top	At_Offset_3
07c9 e02a       | *  |		Load	0x0,0x2a
07ca a02b       | +  |		Store_Unchecked	0x0,0x2b
07cb e02c       | ,  |		Load	0x0,0x2c
07cc e02d       | -  |		Load	0x0,0x2d
07cd a02e       | .  |		Store_Unchecked	0x0,0x2e
07ce 8024       | $  |		Call	0x0,0x24
07cf 481c       |H   |		Short_Literal	0x1c
07d0 e5fe       |    |		Load	0x2,-0x2
07d1 01d7       |    |		Execute	Vector,Field_Read
07d2 6809       |h   |		Jump_Zero	0x7dc
07d3 e5fd       |    |		Load	0x2,-0x3
07d4 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
07d5 00db       |    |		Load_Top	At_Offset_3
07d6 e02a       | *  |		Load	0x0,0x2a
07d7 a02b       | +  |		Store_Unchecked	0x0,0x2b
07d8 e02c       | ,  |		Load	0x0,0x2c
07d9 e02d       | -  |		Load	0x0,0x2d
07da a02e       | .  |		Store_Unchecked	0x0,0x2e
07db 8024       | $  |		Call	0x0,0x24
07dc 481b       |H   |		Short_Literal	0x1b
07dd e5fe       |    |		Load	0x2,-0x2
07de 01d7       |    |		Execute	Vector,Field_Read
07df 6809       |h   |		Jump_Zero	0x7e9
07e0 e5fd       |    |		Load	0x2,-0x3
07e1 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
07e2 00db       |    |		Load_Top	At_Offset_3
07e3 e01f       |    |		Load	0x0,0x1f
07e4 a020       |    |		Store_Unchecked	0x0,0x20
07e5 e021       | !  |		Load	0x0,0x21
07e6 e022       | "  |		Load	0x0,0x22
07e7 a023       | #  |		Store_Unchecked	0x0,0x23
07e8 8024       | $  |		Call	0x0,0x24
07e9 481a       |H   |		Short_Literal	0x1a
07ea e5fe       |    |		Load	0x2,-0x2
07eb 01d7       |    |		Execute	Vector,Field_Read
07ec 680e       |h   |		Jump_Zero	0x7fb
07ed e5fd       |    |		Load	0x2,-0x3
07ee 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
07ef 00d8       |    |		Load_Top	At_Offset_0
07f0 e01e       |    |		Load	0x0,0x1e
07f1 0260       | `  |		Execute	Discrete,In_Type
07f2 7001       |p   |		Jump_Nonzero	0x7f4
07f3 0801       |    |		Execute_Immediate	Raise,0x1
07f4 00db       |    |		Load_Top	At_Offset_3
07f5 e01f       |    |		Load	0x0,0x1f
07f6 a020       |    |		Store_Unchecked	0x0,0x20
07f7 e021       | !  |		Load	0x0,0x21
07f8 e022       | "  |		Load	0x0,0x22
07f9 a023       | #  |		Store_Unchecked	0x0,0x23
07fa 8024       | $  |		Call	0x0,0x24
07fb 4819       |H   |		Short_Literal	0x19
07fc e5fe       |    |		Load	0x2,-0x2
07fd 01d7       |    |		Execute	Vector,Field_Read
07fe 680e       |h   |		Jump_Zero	0x80d
07ff e5fd       |    |		Load	0x2,-0x3
0800 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0801 00d8       |    |		Load_Top	At_Offset_0
0802 e01e       |    |		Load	0x0,0x1e
0803 0260       | `  |		Execute	Discrete,In_Type
0804 7001       |p   |		Jump_Nonzero	0x806
0805 0801       |    |		Execute_Immediate	Raise,0x1
0806 00db       |    |		Load_Top	At_Offset_3
0807 e01f       |    |		Load	0x0,0x1f
0808 a020       |    |		Store_Unchecked	0x0,0x20
0809 e021       | !  |		Load	0x0,0x21
080a e022       | "  |		Load	0x0,0x22
080b a023       | #  |		Store_Unchecked	0x0,0x23
080c 8024       | $  |		Call	0x0,0x24
080d 4818       |H   |		Short_Literal	0x18
080e e5fe       |    |		Load	0x2,-0x2
080f 01d7       |    |		Execute	Vector,Field_Read
0810 680e       |h   |		Jump_Zero	0x81f
0811 e5fd       |    |		Load	0x2,-0x3
0812 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0813 00d8       |    |		Load_Top	At_Offset_0
0814 e01e       |    |		Load	0x0,0x1e
0815 0260       | `  |		Execute	Discrete,In_Type
0816 7001       |p   |		Jump_Nonzero	0x818
0817 0801       |    |		Execute_Immediate	Raise,0x1
0818 00db       |    |		Load_Top	At_Offset_3
0819 e01f       |    |		Load	0x0,0x1f
081a a020       |    |		Store_Unchecked	0x0,0x20
081b e021       | !  |		Load	0x0,0x21
081c e022       | "  |		Load	0x0,0x22
081d a023       | #  |		Store_Unchecked	0x0,0x23
081e 8024       | $  |		Call	0x0,0x24
081f 4817       |H   |		Short_Literal	0x17
0820 e5fe       |    |		Load	0x2,-0x2
0821 01d7       |    |		Execute	Vector,Field_Read
0822 680e       |h   |		Jump_Zero	0x831
0823 e5fd       |    |		Load	0x2,-0x3
0824 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0825 00d8       |    |		Load_Top	At_Offset_0
0826 e01e       |    |		Load	0x0,0x1e
0827 0260       | `  |		Execute	Discrete,In_Type
0828 7001       |p   |		Jump_Nonzero	0x82a
0829 0801       |    |		Execute_Immediate	Raise,0x1
082a 00db       |    |		Load_Top	At_Offset_3
082b e01f       |    |		Load	0x0,0x1f
082c a020       |    |		Store_Unchecked	0x0,0x20
082d e021       | !  |		Load	0x0,0x21
082e e022       | "  |		Load	0x0,0x22
082f a023       | #  |		Store_Unchecked	0x0,0x23
0830 8024       | $  |		Call	0x0,0x24
0831 4816       |H   |		Short_Literal	0x16
0832 e5fe       |    |		Load	0x2,-0x2
0833 01d7       |    |		Execute	Vector,Field_Read
0834 680e       |h   |		Jump_Zero	0x843
0835 e5fd       |    |		Load	0x2,-0x3
0836 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0837 00d8       |    |		Load_Top	At_Offset_0
0838 e01e       |    |		Load	0x0,0x1e
0839 0260       | `  |		Execute	Discrete,In_Type
083a 7001       |p   |		Jump_Nonzero	0x83c
083b 0801       |    |		Execute_Immediate	Raise,0x1
083c 00db       |    |		Load_Top	At_Offset_3
083d e01f       |    |		Load	0x0,0x1f
083e a020       |    |		Store_Unchecked	0x0,0x20
083f e021       | !  |		Load	0x0,0x21
0840 e022       | "  |		Load	0x0,0x22
0841 a023       | #  |		Store_Unchecked	0x0,0x23
0842 8024       | $  |		Call	0x0,0x24
0843 4815       |H   |		Short_Literal	0x15
0844 e5fe       |    |		Load	0x2,-0x2
0845 01d7       |    |		Execute	Vector,Field_Read
0846 680b       |h   |		Jump_Zero	0x852
0847 e5fd       |    |		Load	0x2,-0x3
0848 340b       |4   |		Execute	Record,Field_Reference,Field_Number 0xb
0849 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
084a 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
084b 00db       |    |		Load_Top	At_Offset_3
084c e02f       | /  |		Load	0x0,0x2f
084d a030       | 0  |		Store_Unchecked	0x0,0x30
084e e031       | 1  |		Load	0x0,0x31
084f e032       | 2  |		Load	0x0,0x32
0850 a033       | 3  |		Store_Unchecked	0x0,0x33
0851 8024       | $  |		Call	0x0,0x24
0852 4814       |H   |		Short_Literal	0x14
0853 e5fe       |    |		Load	0x2,-0x2
0854 01d7       |    |		Execute	Vector,Field_Read
0855 680b       |h   |		Jump_Zero	0x861
0856 e5fd       |    |		Load	0x2,-0x3
0857 340c       |4   |		Execute	Record,Field_Reference,Field_Number 0xc
0858 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0859 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
085a 00db       |    |		Load_Top	At_Offset_3
085b e02f       | /  |		Load	0x0,0x2f
085c a030       | 0  |		Store_Unchecked	0x0,0x30
085d e031       | 1  |		Load	0x0,0x31
085e e032       | 2  |		Load	0x0,0x32
085f a033       | 3  |		Store_Unchecked	0x0,0x33
0860 8024       | $  |		Call	0x0,0x24
0861 4813       |H   |		Short_Literal	0x13
0862 e5fe       |    |		Load	0x2,-0x2
0863 01d7       |    |		Execute	Vector,Field_Read
0864 6809       |h   |		Jump_Zero	0x86e
0865 e5fd       |    |		Load	0x2,-0x3
0866 3c0d       |<   |		Execute	Record,Field_Read,Field_Number 0xd
0867 00db       |    |		Load_Top	At_Offset_3
0868 e01f       |    |		Load	0x0,0x1f
0869 a020       |    |		Store_Unchecked	0x0,0x20
086a e021       | !  |		Load	0x0,0x21
086b e022       | "  |		Load	0x0,0x22
086c a023       | #  |		Store_Unchecked	0x0,0x23
086d 8024       | $  |		Call	0x0,0x24
086e 4812       |H   |		Short_Literal	0x12
086f e5fe       |    |		Load	0x2,-0x2
0870 01d7       |    |		Execute	Vector,Field_Read
0871 6809       |h   |		Jump_Zero	0x87b
0872 e5fd       |    |		Load	0x2,-0x3
0873 3c0e       |<   |		Execute	Record,Field_Read,Field_Number 0xe
0874 00db       |    |		Load_Top	At_Offset_3
0875 e01f       |    |		Load	0x0,0x1f
0876 a020       |    |		Store_Unchecked	0x0,0x20
0877 e021       | !  |		Load	0x0,0x21
0878 e022       | "  |		Load	0x0,0x22
0879 a023       | #  |		Store_Unchecked	0x0,0x23
087a 8024       | $  |		Call	0x0,0x24
087b 4811       |H   |		Short_Literal	0x11
087c e5fe       |    |		Load	0x2,-0x2
087d 01d7       |    |		Execute	Vector,Field_Read
087e 680a       |h   |		Jump_Zero	0x889
087f e5fd       |    |		Load	0x2,-0x3
0880 340f       |4   |		Execute	Record,Field_Reference,Field_Number 0xf
0881 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0882 00db       |    |		Load_Top	At_Offset_3
0883 e02f       | /  |		Load	0x0,0x2f
0884 a030       | 0  |		Store_Unchecked	0x0,0x30
0885 e031       | 1  |		Load	0x0,0x31
0886 e032       | 2  |		Load	0x0,0x32
0887 a033       | 3  |		Store_Unchecked	0x0,0x33
0888 8024       | $  |		Call	0x0,0x24
0889 4810       |H   |		Short_Literal	0x10
088a e5fe       |    |		Load	0x2,-0x2
088b 01d7       |    |		Execute	Vector,Field_Read
088c 680e       |h   |		Jump_Zero	0x89b
088d e5fd       |    |		Load	0x2,-0x3
088e 3c10       |<   |		Execute	Record,Field_Read,Field_Number 0x10
088f 00d8       |    |		Load_Top	At_Offset_0
0890 e01e       |    |		Load	0x0,0x1e
0891 0260       | `  |		Execute	Discrete,In_Type
0892 7001       |p   |		Jump_Nonzero	0x894
0893 0801       |    |		Execute_Immediate	Raise,0x1
0894 00db       |    |		Load_Top	At_Offset_3
0895 e01f       |    |		Load	0x0,0x1f
0896 a020       |    |		Store_Unchecked	0x0,0x20
0897 e021       | !  |		Load	0x0,0x21
0898 e022       | "  |		Load	0x0,0x22
0899 a023       | #  |		Store_Unchecked	0x0,0x23
089a 8024       | $  |		Call	0x0,0x24
089b 480f       |H   |		Short_Literal	0xf
089c e5fe       |    |		Load	0x2,-0x2
089d 01d7       |    |		Execute	Vector,Field_Read
089e 680e       |h   |		Jump_Zero	0x8ad
089f e5fd       |    |		Load	0x2,-0x3
08a0 3c11       |<   |		Execute	Record,Field_Read,Field_Number 0x11
08a1 00d8       |    |		Load_Top	At_Offset_0
08a2 e01e       |    |		Load	0x0,0x1e
08a3 0260       | `  |		Execute	Discrete,In_Type
08a4 7001       |p   |		Jump_Nonzero	0x8a6
08a5 0801       |    |		Execute_Immediate	Raise,0x1
08a6 00db       |    |		Load_Top	At_Offset_3
08a7 e01f       |    |		Load	0x0,0x1f
08a8 a020       |    |		Store_Unchecked	0x0,0x20
08a9 e021       | !  |		Load	0x0,0x21
08aa e022       | "  |		Load	0x0,0x22
08ab a023       | #  |		Store_Unchecked	0x0,0x23
08ac 8024       | $  |		Call	0x0,0x24
08ad 480e       |H   |		Short_Literal	0xe
08ae e5fe       |    |		Load	0x2,-0x2
08af 01d7       |    |		Execute	Vector,Field_Read
08b0 6809       |h   |		Jump_Zero	0x8ba
08b1 e5fd       |    |		Load	0x2,-0x3
08b2 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
08b3 00db       |    |		Load_Top	At_Offset_3
08b4 e01f       |    |		Load	0x0,0x1f
08b5 a020       |    |		Store_Unchecked	0x0,0x20
08b6 e021       | !  |		Load	0x0,0x21
08b7 e022       | "  |		Load	0x0,0x22
08b8 a023       | #  |		Store_Unchecked	0x0,0x23
08b9 8024       | $  |		Call	0x0,0x24
08ba 480d       |H   |		Short_Literal	0xd
08bb e5fe       |    |		Load	0x2,-0x2
08bc 01d7       |    |		Execute	Vector,Field_Read
08bd 6809       |h   |		Jump_Zero	0x8c7
08be e5fd       |    |		Load	0x2,-0x3
08bf 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
08c0 00db       |    |		Load_Top	At_Offset_3
08c1 e01f       |    |		Load	0x0,0x1f
08c2 a020       |    |		Store_Unchecked	0x0,0x20
08c3 e021       | !  |		Load	0x0,0x21
08c4 e022       | "  |		Load	0x0,0x22
08c5 a023       | #  |		Store_Unchecked	0x0,0x23
08c6 8024       | $  |		Call	0x0,0x24
08c7 480c       |H   |		Short_Literal	0xc
08c8 e5fe       |    |		Load	0x2,-0x2
08c9 01d7       |    |		Execute	Vector,Field_Read
08ca 680b       |h   |		Jump_Zero	0x8d6
08cb e5fd       |    |		Load	0x2,-0x3
08cc 3414       |4   |		Execute	Record,Field_Reference,Field_Number 0x14
08cd 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
08ce 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
08cf 00db       |    |		Load_Top	At_Offset_3
08d0 e02f       | /  |		Load	0x0,0x2f
08d1 a030       | 0  |		Store_Unchecked	0x0,0x30
08d2 e031       | 1  |		Load	0x0,0x31
08d3 e032       | 2  |		Load	0x0,0x32
08d4 a033       | 3  |		Store_Unchecked	0x0,0x33
08d5 8024       | $  |		Call	0x0,0x24
08d6 480b       |H   |		Short_Literal	0xb
08d7 e5fe       |    |		Load	0x2,-0x2
08d8 01d7       |    |		Execute	Vector,Field_Read
08d9 6809       |h   |		Jump_Zero	0x8e3
08da e5fd       |    |		Load	0x2,-0x3
08db 3c15       |<   |		Execute	Record,Field_Read,Field_Number 0x15
08dc 00db       |    |		Load_Top	At_Offset_3
08dd e01f       |    |		Load	0x0,0x1f
08de a020       |    |		Store_Unchecked	0x0,0x20
08df e021       | !  |		Load	0x0,0x21
08e0 e022       | "  |		Load	0x0,0x22
08e1 a023       | #  |		Store_Unchecked	0x0,0x23
08e2 8024       | $  |		Call	0x0,0x24
08e3 480a       |H   |		Short_Literal	0xa
08e4 e5fe       |    |		Load	0x2,-0x2
08e5 01d7       |    |		Execute	Vector,Field_Read
08e6 6809       |h   |		Jump_Zero	0x8f0
08e7 e5fd       |    |		Load	0x2,-0x3
08e8 3c16       |<   |		Execute	Record,Field_Read,Field_Number 0x16
08e9 00db       |    |		Load_Top	At_Offset_3
08ea e01f       |    |		Load	0x0,0x1f
08eb a020       |    |		Store_Unchecked	0x0,0x20
08ec e021       | !  |		Load	0x0,0x21
08ed e022       | "  |		Load	0x0,0x22
08ee a023       | #  |		Store_Unchecked	0x0,0x23
08ef 8024       | $  |		Call	0x0,0x24
08f0 4809       |H   |		Short_Literal	0x9
08f1 e5fe       |    |		Load	0x2,-0x2
08f2 01d7       |    |		Execute	Vector,Field_Read
08f3 680e       |h   |		Jump_Zero	0x902
08f4 e5fd       |    |		Load	0x2,-0x3
08f5 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
08f6 00d8       |    |		Load_Top	At_Offset_0
08f7 e01e       |    |		Load	0x0,0x1e
08f8 0260       | `  |		Execute	Discrete,In_Type
08f9 7001       |p   |		Jump_Nonzero	0x8fb
08fa 0801       |    |		Execute_Immediate	Raise,0x1
08fb 00db       |    |		Load_Top	At_Offset_3
08fc e01f       |    |		Load	0x0,0x1f
08fd a020       |    |		Store_Unchecked	0x0,0x20
08fe e021       | !  |		Load	0x0,0x21
08ff e022       | "  |		Load	0x0,0x22
0900 a023       | #  |		Store_Unchecked	0x0,0x23
0901 8024       | $  |		Call	0x0,0x24
0902 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0903 0000 0000  |    |		.BLANK	0000[0x5]
0908 ; --------------------------------------------------------------------------------------
0908 ; SUBPROGRAM
0908 ; --------------------------------------------------------------------------------------
0908 090b       |    |		.CONST	0x090b								; Address of begin
0909 0944       | D  |		.CONST	0x0944								; Address of exception handler
090a 0001       |    |		.CONST	0x0001								; Number of locals
090b			BODY_0908:
090b			INIT_0908:
090b e5fc       |    |		Load	0x2,-0x4
090c e402       |    |		Load	0x2,0x2
090d e5fe       |    |		Load	0x2,-0x2
090e 8231       | 1  |		Call	0x1,0x31
090f e5fe       |    |		Load	0x2,-0x2
0910 0227       | '  |		Execute	Access,All_Reference
0911 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0912 e004       |    |		Load	0x0,0x4
0913 0337       | 7  |		Declare_Variable	Array
0914 4801       |H   |		Short_Literal	0x1
0915 4811       |H   |		Short_Literal	0x11
0916 00da       |    |		Load_Top	At_Offset_2
0917 01d6       |    |		Execute	Vector,Field_Write
0918 4801       |H   |		Short_Literal	0x1
0919 4815       |H   |		Short_Literal	0x15
091a 00da       |    |		Load_Top	At_Offset_2
091b 01d6       |    |		Execute	Vector,Field_Write
091c 4801       |H   |		Short_Literal	0x1
091d 4814       |H   |		Short_Literal	0x14
091e 00da       |    |		Load_Top	At_Offset_2
091f 01d6       |    |		Execute	Vector,Field_Write
0920 4810       |H   |		Short_Literal	0x10
0921 4800       |H   |		Short_Literal	0x0
0922 4800       |H   |		Short_Literal	0x0
0923 00d9       |    |		Load_Top	At_Offset_1
0924 e603       |    |		Load	0x3,0x3
0925 01d6       |    |		Execute	Vector,Field_Write
0926 3ffb       |?   |		Loop_Increasing	0x922
0927 4800       |H   |		Short_Literal	0x0
0928 4812       |H   |		Short_Literal	0x12
0929 00da       |    |		Load_Top	At_Offset_2
092a 01d6       |    |		Execute	Vector,Field_Write
092b 4800       |H   |		Short_Literal	0x0
092c 4813       |H   |		Short_Literal	0x13
092d 00da       |    |		Load_Top	At_Offset_2
092e 01d6       |    |		Execute	Vector,Field_Write
092f 481f       |H   |		Short_Literal	0x1f
0930 4816       |H   |		Short_Literal	0x16
0931 4800       |H   |		Short_Literal	0x0
0932 00d9       |    |		Load_Top	At_Offset_1
0933 e603       |    |		Load	0x3,0x3
0934 01d6       |    |		Execute	Vector,Field_Write
0935 3ffb       |?   |		Loop_Increasing	0x931
0936 e004       |    |		Load	0x0,0x4
0937 01c3       |    |		Execute	Vector,Check_In_Type
0938 01d3       |    |		Execute	Vector,And
0939 e00b       |    |		Load	0x0,0xb
093a 01df       |    |		Execute	Vector,Equal
093b 7003       |p   |		Jump_Nonzero	0x93f
093c e5fe       |    |		Load	0x2,-0x2
093d e5ff       |    |		Load	0x2,-0x1
093e 8229       | )  |		Call	0x1,0x29
093f e5ff       |    |		Load	0x2,-0x1
0940 8011       |    |		Call	0x0,0x11
0941 e5ff       |    |		Load	0x2,-0x1
0942 8012       |    |		Call	0x0,0x12
0943 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0944			TRAP_0908:
0944 0007       |    |		Action	Break_Optional
0945 e5ff       |    |		Load	0x2,-0x1
0946 8011       |    |		Call	0x0,0x11
0947 00d8       |    |		Load_Top	At_Offset_0
0948 0101       |    |		Execute	Exception,Reraise
0949 0000 0000  |    |		.BLANK	0000[0x7]
0950 ; --------------------------------------------------------------------------------------
0950 ; SUBPROGRAM
0950 ; --------------------------------------------------------------------------------------
0950 0953       | S  |		.CONST	0x0953								; Address of begin
0951 0a72       | r  |		.CONST	0x0a72								; Address of exception handler
0952 0001       |    |		.CONST	0x0001								; Number of locals
0953			BODY_0950:
0953			INIT_0950:
0953 e5fe       |    |		Load	0x2,-0x2
0954 0227       | '  |		Execute	Access,All_Reference
0955 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0956 e405       |    |		Load	0x2,0x5
0957 01d3       |    |		Execute	Vector,And
0958 e00b       |    |		Load	0x0,0xb
0959 01df       |    |		Execute	Vector,Equal
095a 7003       |p   |		Jump_Nonzero	0x95e
095b e5fe       |    |		Load	0x2,-0x2
095c e5ff       |    |		Load	0x2,-0x1
095d 8229       | )  |		Call	0x1,0x29
095e e5fc       |    |		Load	0x2,-0x4
095f 0227       | '  |		Execute	Access,All_Reference
0960 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0961 e405       |    |		Load	0x2,0x5
0962 01d0       |    |		Execute	Vector,Complement
0963 01d3       |    |		Execute	Vector,And
0964 e5fc       |    |		Load	0x2,-0x4
0965 0227       | '  |		Execute	Access,All_Reference
0966 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0967 e034       | 4  |		Load	0x0,0x34
0968 0322       | "  |		Declare_Variable	Record
0969 4839       |H9  |		Short_Literal	0x39
096a 00d9       |    |		Load_Top	At_Offset_1
096b 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
096c e034       | 4  |		Load	0x0,0x34
096d 012c       | ,  |		Execute	Any,Size
096e 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
096f 00d9       |    |		Load_Top	At_Offset_1
0970 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0971 4800       |H   |		Short_Literal	0x0
0972 00d9       |    |		Load_Top	At_Offset_1
0973 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0974 e5fe       |    |		Load	0x2,-0x2
0975 0227       | '  |		Execute	Access,All_Reference
0976 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0977 00d9       |    |		Load_Top	At_Offset_1
0978 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0979 e5fc       |    |		Load	0x2,-0x4
097a 0227       | '  |		Execute	Access,All_Reference
097b 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
097c 00d9       |    |		Load_Top	At_Offset_1
097d 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
097e e405       |    |		Load	0x2,0x5
097f e034       | 4  |		Load	0x0,0x34
0980 3005       |0   |		Execute	Record,Field_Type,Field_Number 0x5
0981 0119       |    |		Execute	Any,Check_In_Formal_Type
0982 00d9       |    |		Load_Top	At_Offset_1
0983 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0984 e5ff       |    |		Load	0x2,-0x1
0985 e035       | 5  |		Load	0x0,0x35
0986 a036       | 6  |		Store_Unchecked	0x0,0x36
0987 e037       | 7  |		Load	0x0,0x37
0988 e038       | 8  |		Load	0x0,0x38
0989 a039       | 9  |		Store_Unchecked	0x0,0x39
098a 803a       | :  |		Call	0x0,0x3a
098b 481f       |H   |		Short_Literal	0x1f
098c e405       |    |		Load	0x2,0x5
098d 01d7       |    |		Execute	Vector,Field_Read
098e 6804       |h   |		Jump_Zero	0x993
098f e403       |    |		Load	0x2,0x3
0990 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0991 e402       |    |		Load	0x2,0x2
0992 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0993 481e       |H   |		Short_Literal	0x1e
0994 e405       |    |		Load	0x2,0x5
0995 01d7       |    |		Execute	Vector,Field_Read
0996 6804       |h   |		Jump_Zero	0x99b
0997 e403       |    |		Load	0x2,0x3
0998 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0999 e402       |    |		Load	0x2,0x2
099a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
099b 481d       |H   |		Short_Literal	0x1d
099c e405       |    |		Load	0x2,0x5
099d 01d7       |    |		Execute	Vector,Field_Read
099e 6804       |h   |		Jump_Zero	0x9a3
099f e403       |    |		Load	0x2,0x3
09a0 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
09a1 e402       |    |		Load	0x2,0x2
09a2 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
09a3 481c       |H   |		Short_Literal	0x1c
09a4 e405       |    |		Load	0x2,0x5
09a5 01d7       |    |		Execute	Vector,Field_Read
09a6 6804       |h   |		Jump_Zero	0x9ab
09a7 e403       |    |		Load	0x2,0x3
09a8 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
09a9 e402       |    |		Load	0x2,0x2
09aa 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
09ab 481b       |H   |		Short_Literal	0x1b
09ac e405       |    |		Load	0x2,0x5
09ad 01d7       |    |		Execute	Vector,Field_Read
09ae 6804       |h   |		Jump_Zero	0x9b3
09af e403       |    |		Load	0x2,0x3
09b0 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
09b1 e402       |    |		Load	0x2,0x2
09b2 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
09b3 481a       |H   |		Short_Literal	0x1a
09b4 e405       |    |		Load	0x2,0x5
09b5 01d7       |    |		Execute	Vector,Field_Read
09b6 6804       |h   |		Jump_Zero	0x9bb
09b7 e403       |    |		Load	0x2,0x3
09b8 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
09b9 e402       |    |		Load	0x2,0x2
09ba 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
09bb 4819       |H   |		Short_Literal	0x19
09bc e405       |    |		Load	0x2,0x5
09bd 01d7       |    |		Execute	Vector,Field_Read
09be 6804       |h   |		Jump_Zero	0x9c3
09bf e403       |    |		Load	0x2,0x3
09c0 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
09c1 e402       |    |		Load	0x2,0x2
09c2 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
09c3 4818       |H   |		Short_Literal	0x18
09c4 e405       |    |		Load	0x2,0x5
09c5 01d7       |    |		Execute	Vector,Field_Read
09c6 6804       |h   |		Jump_Zero	0x9cb
09c7 e403       |    |		Load	0x2,0x3
09c8 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
09c9 e402       |    |		Load	0x2,0x2
09ca 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
09cb 4817       |H   |		Short_Literal	0x17
09cc e405       |    |		Load	0x2,0x5
09cd 01d7       |    |		Execute	Vector,Field_Read
09ce 6804       |h   |		Jump_Zero	0x9d3
09cf e403       |    |		Load	0x2,0x3
09d0 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
09d1 e402       |    |		Load	0x2,0x2
09d2 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
09d3 4816       |H   |		Short_Literal	0x16
09d4 e405       |    |		Load	0x2,0x5
09d5 01d7       |    |		Execute	Vector,Field_Read
09d6 6804       |h   |		Jump_Zero	0x9db
09d7 e403       |    |		Load	0x2,0x3
09d8 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
09d9 e402       |    |		Load	0x2,0x2
09da 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
09db 4809       |H   |		Short_Literal	0x9
09dc e405       |    |		Load	0x2,0x5
09dd 01d7       |    |		Execute	Vector,Field_Read
09de 6804       |h   |		Jump_Zero	0x9e3
09df e403       |    |		Load	0x2,0x3
09e0 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
09e1 e402       |    |		Load	0x2,0x2
09e2 380a       |8   |		Execute	Record,Field_Write,Field_Number 0xa
09e3 4815       |H   |		Short_Literal	0x15
09e4 e405       |    |		Load	0x2,0x5
09e5 01d7       |    |		Execute	Vector,Field_Read
09e6 6804       |h   |		Jump_Zero	0x9eb
09e7 e403       |    |		Load	0x2,0x3
09e8 340b       |4   |		Execute	Record,Field_Reference,Field_Number 0xb
09e9 e402       |    |		Load	0x2,0x2
09ea 380b       |8   |		Execute	Record,Field_Write,Field_Number 0xb
09eb 4814       |H   |		Short_Literal	0x14
09ec e405       |    |		Load	0x2,0x5
09ed 01d7       |    |		Execute	Vector,Field_Read
09ee 6804       |h   |		Jump_Zero	0x9f3
09ef e403       |    |		Load	0x2,0x3
09f0 340c       |4   |		Execute	Record,Field_Reference,Field_Number 0xc
09f1 e402       |    |		Load	0x2,0x2
09f2 380c       |8   |		Execute	Record,Field_Write,Field_Number 0xc
09f3 4813       |H   |		Short_Literal	0x13
09f4 e405       |    |		Load	0x2,0x5
09f5 01d7       |    |		Execute	Vector,Field_Read
09f6 6804       |h   |		Jump_Zero	0x9fb
09f7 e403       |    |		Load	0x2,0x3
09f8 3c0d       |<   |		Execute	Record,Field_Read,Field_Number 0xd
09f9 e402       |    |		Load	0x2,0x2
09fa 380d       |8   |		Execute	Record,Field_Write,Field_Number 0xd
09fb 4812       |H   |		Short_Literal	0x12
09fc e405       |    |		Load	0x2,0x5
09fd 01d7       |    |		Execute	Vector,Field_Read
09fe 6804       |h   |		Jump_Zero	0xa03
09ff e403       |    |		Load	0x2,0x3
0a00 3c0e       |<   |		Execute	Record,Field_Read,Field_Number 0xe
0a01 e402       |    |		Load	0x2,0x2
0a02 380e       |8   |		Execute	Record,Field_Write,Field_Number 0xe
0a03 4811       |H   |		Short_Literal	0x11
0a04 e405       |    |		Load	0x2,0x5
0a05 01d7       |    |		Execute	Vector,Field_Read
0a06 6804       |h   |		Jump_Zero	0xa0b
0a07 e403       |    |		Load	0x2,0x3
0a08 340f       |4   |		Execute	Record,Field_Reference,Field_Number 0xf
0a09 e402       |    |		Load	0x2,0x2
0a0a 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0a0b 4810       |H   |		Short_Literal	0x10
0a0c e405       |    |		Load	0x2,0x5
0a0d 01d7       |    |		Execute	Vector,Field_Read
0a0e 6804       |h   |		Jump_Zero	0xa13
0a0f e403       |    |		Load	0x2,0x3
0a10 3c10       |<   |		Execute	Record,Field_Read,Field_Number 0x10
0a11 e402       |    |		Load	0x2,0x2
0a12 3810       |8   |		Execute	Record,Field_Write,Field_Number 0x10
0a13 480f       |H   |		Short_Literal	0xf
0a14 e405       |    |		Load	0x2,0x5
0a15 01d7       |    |		Execute	Vector,Field_Read
0a16 6804       |h   |		Jump_Zero	0xa1b
0a17 e403       |    |		Load	0x2,0x3
0a18 3c11       |<   |		Execute	Record,Field_Read,Field_Number 0x11
0a19 e402       |    |		Load	0x2,0x2
0a1a 3811       |8   |		Execute	Record,Field_Write,Field_Number 0x11
0a1b 480e       |H   |		Short_Literal	0xe
0a1c e405       |    |		Load	0x2,0x5
0a1d 01d7       |    |		Execute	Vector,Field_Read
0a1e 6804       |h   |		Jump_Zero	0xa23
0a1f e403       |    |		Load	0x2,0x3
0a20 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
0a21 e402       |    |		Load	0x2,0x2
0a22 3812       |8   |		Execute	Record,Field_Write,Field_Number 0x12
0a23 480d       |H   |		Short_Literal	0xd
0a24 e405       |    |		Load	0x2,0x5
0a25 01d7       |    |		Execute	Vector,Field_Read
0a26 6804       |h   |		Jump_Zero	0xa2b
0a27 e403       |    |		Load	0x2,0x3
0a28 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
0a29 e402       |    |		Load	0x2,0x2
0a2a 3813       |8   |		Execute	Record,Field_Write,Field_Number 0x13
0a2b 480c       |H   |		Short_Literal	0xc
0a2c e405       |    |		Load	0x2,0x5
0a2d 01d7       |    |		Execute	Vector,Field_Read
0a2e 680a       |h   |		Jump_Zero	0xa39
0a2f e5fe       |    |		Load	0x2,-0x2
0a30 0227       | '  |		Execute	Access,All_Reference
0a31 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0a32 e5fc       |    |		Load	0x2,-0x4
0a33 0227       | '  |		Execute	Access,All_Reference
0a34 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0a35 e403       |    |		Load	0x2,0x3
0a36 3414       |4   |		Execute	Record,Field_Reference,Field_Number 0x14
0a37 e402       |    |		Load	0x2,0x2
0a38 3814       |8   |		Execute	Record,Field_Write,Field_Number 0x14
0a39 480b       |H   |		Short_Literal	0xb
0a3a e405       |    |		Load	0x2,0x5
0a3b 01d7       |    |		Execute	Vector,Field_Read
0a3c 6804       |h   |		Jump_Zero	0xa41
0a3d e403       |    |		Load	0x2,0x3
0a3e 3c15       |<   |		Execute	Record,Field_Read,Field_Number 0x15
0a3f e402       |    |		Load	0x2,0x2
0a40 3815       |8   |		Execute	Record,Field_Write,Field_Number 0x15
0a41 480a       |H   |		Short_Literal	0xa
0a42 e405       |    |		Load	0x2,0x5
0a43 01d7       |    |		Execute	Vector,Field_Read
0a44 680a       |h   |		Jump_Zero	0xa4f
0a45 e5fe       |    |		Load	0x2,-0x2
0a46 0227       | '  |		Execute	Access,All_Reference
0a47 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0a48 e5fc       |    |		Load	0x2,-0x4
0a49 0227       | '  |		Execute	Access,All_Reference
0a4a 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0a4b e403       |    |		Load	0x2,0x3
0a4c 3c16       |<   |		Execute	Record,Field_Read,Field_Number 0x16
0a4d e402       |    |		Load	0x2,0x2
0a4e 3816       |8   |		Execute	Record,Field_Write,Field_Number 0x16
0a4f e5ff       |    |		Load	0x2,-0x1
0a50 0227       | '  |		Execute	Access,All_Reference
0a51 3c25       |<%  |		Execute	Record,Field_Read,Field_Number 0x25
0a52 a404       |    |		Store_Unchecked	0x2,0x4
0a53 00cf       |    |		Action	Mark_Auxiliary
0a54 7815       |x   |		Jump	0xa6a
0a55 e404       |    |		Load	0x2,0x4
0a56 0227       | '  |		Execute	Access,All_Reference
0a57 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0a58 e01b       |    |		Load	0x0,0x1b
0a59 022e       | .  |		Execute	Access,Not_Equal
0a5a 680a       |h   |		Jump_Zero	0xa65
0a5b e404       |    |		Load	0x2,0x4
0a5c 0227       | '  |		Execute	Access,All_Reference
0a5d 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0a5e e5fc       |    |		Load	0x2,-0x4
0a5f e5ff       |    |		Load	0x2,-0x1
0a60 e404       |    |		Load	0x2,0x4
0a61 0227       | '  |		Execute	Access,All_Reference
0a62 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0a63 801c       |    |		Call	0x0,0x1c
0a64 801d       |    |		Call	0x0,0x1d
0a65 e404       |    |		Load	0x2,0x4
0a66 0227       | '  |		Execute	Access,All_Reference
0a67 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0a68 a404       |    |		Store_Unchecked	0x2,0x4
0a69 00c9       |    |		Action	Pop_Auxiliary_Loop
0a6a e404       |    |		Load	0x2,0x4
0a6b 77e9       |w   |		Jump_Nonzero	0xa55
0a6c 00ce       |    |		Action	Pop_Auxiliary
0a6d e5ff       |    |		Load	0x2,-0x1
0a6e 8011       |    |		Call	0x0,0x11
0a6f e5ff       |    |		Load	0x2,-0x1
0a70 8012       |    |		Call	0x0,0x12
0a71 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0a72			TRAP_0950:
0a72 0007       |    |		Action	Break_Optional
0a73 e5ff       |    |		Load	0x2,-0x1
0a74 8011       |    |		Call	0x0,0x11
0a75 00d8       |    |		Load_Top	At_Offset_0
0a76 0101       |    |		Execute	Exception,Reraise
0a77 0000       |    |		.XXX[0x1]
0a78 ; --------------------------------------------------------------------------------------
0a78 ; SUBPROGRAM
0a78 ; --------------------------------------------------------------------------------------
0a78 0a7b       | {  |		.CONST	0x0a7b								; Address of begin
0a79 0b2f       | /  |		.CONST	0x0b2f								; Address of exception handler
0a7a 0001       |    |		.CONST	0x0001								; Number of locals
0a7b			BODY_0a78:
0a7b			INIT_0a78:
0a7b e007       |    |		Load	0x0,0x7
0a7c 03bc       |    |		Declare_Variable	Access,By_Allocation
0a7d 00d8       |    |		Load_Top	At_Offset_0
0a7e 0227       | '  |		Execute	Access,All_Reference
0a7f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0a80 a402       |    |		Store_Unchecked	0x2,0x2
0a81 4800       |H   |		Short_Literal	0x0
0a82 e402       |    |		Load	0x2,0x2
0a83 0227       | '  |		Execute	Access,All_Reference
0a84 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0a85 4800       |H   |		Short_Literal	0x0
0a86 e402       |    |		Load	0x2,0x2
0a87 0227       | '  |		Execute	Access,All_Reference
0a88 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0a89 e03b       | ;  |		Load	0x0,0x3b
0a8a e402       |    |		Load	0x2,0x2
0a8b 0227       | '  |		Execute	Access,All_Reference
0a8c 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0a8d e22a       | *  |		Load	0x1,0x2a
0a8e e402       |    |		Load	0x2,0x2
0a8f 0227       | '  |		Execute	Access,All_Reference
0a90 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0a91 e402       |    |		Load	0x2,0x2
0a92 0229       | )  |		Execute	Access,All_Read
0a93 00d8       |    |		Load_Top	At_Offset_0
0a94 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0a95 00d8       |    |		Load_Top	At_Offset_0
0a96 0335       | 5  |		Declare_Variable	Array,Duplicate
0a97 00cd       |    |		Action	Spare6_Action
0a98 481f       |H   |		Short_Literal	0x1f
0a99 4800       |H   |		Short_Literal	0x0
0a9a 4800       |H   |		Short_Literal	0x0
0a9b 00d9       |    |		Load_Top	At_Offset_1
0a9c e604       |    |		Load	0x3,0x4
0a9d 01d6       |    |		Execute	Vector,Field_Write
0a9e 3ffb       |?   |		Loop_Increasing	0xa9a
0a9f 00cd       |    |		Action	Spare6_Action
0aa0 00d9       |    |		Load_Top	At_Offset_1
0aa1 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0aa2 00d1       |    |		Pop_Control	Pop_Count_1
0aa3 e405       |    |		Load	0x2,0x5
0aa4 e00b       |    |		Load	0x0,0xb
0aa5 01df       |    |		Execute	Vector,Equal
0aa6 7004       |p   |		Jump_Nonzero	0xaab
0aa7 e5fc       |    |		Load	0x2,-0x4
0aa8 e405       |    |		Load	0x2,0x5
0aa9 e402       |    |		Load	0x2,0x2
0aaa 8231       | 1  |		Call	0x1,0x31
0aab e03c       | <  |		Load	0x0,0x3c
0aac 0322       | "  |		Declare_Variable	Record
0aad e5ff       |    |		Load	0x2,-0x1
0aae 803d       | =  |		Call	0x0,0x3d
0aaf 00d9       |    |		Load_Top	At_Offset_1
0ab0 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0ab1 e402       |    |		Load	0x2,0x2
0ab2 0227       | '  |		Execute	Access,All_Reference
0ab3 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0ab4 4800       |H   |		Short_Literal	0x0
0ab5 a404       |    |		Store_Unchecked	0x2,0x4
0ab6 00cf       |    |		Action	Mark_Auxiliary
0ab7 e402       |    |		Load	0x2,0x2
0ab8 0227       | '  |		Execute	Access,All_Reference
0ab9 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0aba 01d9       |    |		Execute	Vector,Reverse_Bounds
0abb 0007       |    |		Action	Break_Optional
0abc 00d8       |    |		Load_Top	At_Offset_0
0abd e402       |    |		Load	0x2,0x2
0abe 0227       | '  |		Execute	Access,All_Reference
0abf 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0ac0 01d7       |    |		Execute	Vector,Field_Read
0ac1 6803       |h   |		Jump_Zero	0xac5
0ac2 e404       |    |		Load	0x2,0x4
0ac3 0a01       |    |		Execute_Immediate	Plus,0x1
0ac4 c404       |    |		Store	0x2,0x4
0ac5 00c8       |    |		Action	Pop_Auxiliary_Range
0ac6 3ff5       |?   |		Loop_Increasing	0xabc
0ac7 00ce       |    |		Action	Pop_Auxiliary
0ac8 e404       |    |		Load	0x2,0x4
0ac9 0902       |    |		Execute_Immediate	Binary_Scale,0x2
0aca 00d8       |    |		Load_Top	At_Offset_0
0acb e00e       |    |		Load	0x0,0xe
0acc 0260       | `  |		Execute	Discrete,In_Type
0acd 7001       |p   |		Jump_Nonzero	0xacf
0ace 0801       |    |		Execute_Immediate	Raise,0x1
0acf e03e       | >  |		Load	0x0,0x3e
0ad0 0322       | "  |		Declare_Variable	Record
0ad1 4837       |H7  |		Short_Literal	0x37
0ad2 00d9       |    |		Load_Top	At_Offset_1
0ad3 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0ad4 e03e       | >  |		Load	0x0,0x3e
0ad5 012c       | ,  |		Execute	Any,Size
0ad6 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
0ad7 e404       |    |		Load	0x2,0x4
0ad8 00d8       |    |		Load_Top	At_Offset_0
0ad9 e013       |    |		Load	0x0,0x13
0ada 0260       | `  |		Execute	Discrete,In_Type
0adb 7001       |p   |		Jump_Nonzero	0xadd
0adc 0801       |    |		Execute_Immediate	Raise,0x1
0add 0273       | s  |		Execute	Discrete,Plus
0ade 00d9       |    |		Load_Top	At_Offset_1
0adf 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0ae0 4800       |H   |		Short_Literal	0x0
0ae1 00d9       |    |		Load_Top	At_Offset_1
0ae2 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0ae3 e5fe       |    |		Load	0x2,-0x2
0ae4 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0ae5 00d9       |    |		Load_Top	At_Offset_1
0ae6 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0ae7 e402       |    |		Load	0x2,0x2
0ae8 0227       | '  |		Execute	Access,All_Reference
0ae9 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0aea 00d9       |    |		Load_Top	At_Offset_1
0aeb 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0aec e402       |    |		Load	0x2,0x2
0aed 0227       | '  |		Execute	Access,All_Reference
0aee 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0aef e03e       | >  |		Load	0x0,0x3e
0af0 3005       |0   |		Execute	Record,Field_Type,Field_Number 0x5
0af1 0119       |    |		Execute	Any,Check_In_Formal_Type
0af2 00d9       |    |		Load_Top	At_Offset_1
0af3 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0af4 e5ff       |    |		Load	0x2,-0x1
0af5 e03f       | ?  |		Load	0x0,0x3f
0af6 a040       | @  |		Store_Unchecked	0x0,0x40
0af7 e041       | A  |		Load	0x0,0x41
0af8 e042       | B  |		Load	0x0,0x42
0af9 a043       | C  |		Store_Unchecked	0x0,0x43
0afa 801a       |    |		Call	0x0,0x1a
0afb e404       |    |		Load	0x2,0x4
0afc 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0afd 680c       |h   |		Jump_Zero	0xb0a
0afe e402       |    |		Load	0x2,0x2
0aff 0227       | '  |		Execute	Access,All_Reference
0b00 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0b01 e402       |    |		Load	0x2,0x2
0b02 0227       | '  |		Execute	Access,All_Reference
0b03 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0b04 e5ff       |    |		Load	0x2,-0x1
0b05 8232       | 2  |		Call	0x1,0x32
0b06 e00b       |    |		Load	0x0,0xb
0b07 e402       |    |		Load	0x2,0x2
0b08 0227       | '  |		Execute	Access,All_Reference
0b09 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0b0a e5ff       |    |		Load	0x2,-0x1
0b0b 0227       | '  |		Execute	Access,All_Reference
0b0c 3c25       |<%  |		Execute	Record,Field_Read,Field_Number 0x25
0b0d a403       |    |		Store_Unchecked	0x2,0x3
0b0e 00cf       |    |		Action	Mark_Auxiliary
0b0f 7815       |x   |		Jump	0xb25
0b10 e403       |    |		Load	0x2,0x3
0b11 0227       | '  |		Execute	Access,All_Reference
0b12 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0b13 e01b       |    |		Load	0x0,0x1b
0b14 022e       | .  |		Execute	Access,Not_Equal
0b15 680a       |h   |		Jump_Zero	0xb20
0b16 e403       |    |		Load	0x2,0x3
0b17 0227       | '  |		Execute	Access,All_Reference
0b18 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0b19 e402       |    |		Load	0x2,0x2
0b1a e5ff       |    |		Load	0x2,-0x1
0b1b e403       |    |		Load	0x2,0x3
0b1c 0227       | '  |		Execute	Access,All_Reference
0b1d 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0b1e 801c       |    |		Call	0x0,0x1c
0b1f 801d       |    |		Call	0x0,0x1d
0b20 e403       |    |		Load	0x2,0x3
0b21 0227       | '  |		Execute	Access,All_Reference
0b22 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0b23 a403       |    |		Store_Unchecked	0x2,0x3
0b24 00c9       |    |		Action	Pop_Auxiliary_Loop
0b25 e403       |    |		Load	0x2,0x3
0b26 77e9       |w   |		Jump_Nonzero	0xb10
0b27 00ce       |    |		Action	Pop_Auxiliary
0b28 e5ff       |    |		Load	0x2,-0x1
0b29 8011       |    |		Call	0x0,0x11
0b2a e5ff       |    |		Load	0x2,-0x1
0b2b 8012       |    |		Call	0x0,0x12
0b2c e402       |    |		Load	0x2,0x2
0b2d 00cb       |    |		Action	Pop_Block_With_Result
0b2e 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0b2f			TRAP_0a78:
0b2f 0007       |    |		Action	Break_Optional
0b30 e5ff       |    |		Load	0x2,-0x1
0b31 8011       |    |		Call	0x0,0x11
0b32 00d8       |    |		Load_Top	At_Offset_0
0b33 0101       |    |		Execute	Exception,Reraise
0b34 0000 0000  |    |		.BLANK	0000[0x4]
0b38 ; --------------------------------------------------------------------------------------
0b38 ; SUBPROGRAM
0b38 ; --------------------------------------------------------------------------------------
0b38 0b3b       | ;  |		.CONST	0x0b3b								; Address of begin
0b39 0b8a       |    |		.CONST	0x0b8a								; Address of exception handler
0b3a 0001       |    |		.CONST	0x0001								; Number of locals
0b3b			BODY_0b38:
0b3b			INIT_0b38:
0b3b e044       | D  |		Load	0x0,0x44
0b3c 0322       | "  |		Declare_Variable	Record
0b3d 483c       |H<  |		Short_Literal	0x3c
0b3e 00d9       |    |		Load_Top	At_Offset_1
0b3f 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0b40 e044       | D  |		Load	0x0,0x44
0b41 012c       | ,  |		Execute	Any,Size
0b42 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
0b43 00d9       |    |		Load_Top	At_Offset_1
0b44 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0b45 4800       |H   |		Short_Literal	0x0
0b46 00d9       |    |		Load_Top	At_Offset_1
0b47 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0b48 e5fe       |    |		Load	0x2,-0x2
0b49 0227       | '  |		Execute	Access,All_Reference
0b4a 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0b4b 00d9       |    |		Load_Top	At_Offset_1
0b4c 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0b4d e5ff       |    |		Load	0x2,-0x1
0b4e e045       | E  |		Load	0x0,0x45
0b4f a046       | F  |		Store_Unchecked	0x0,0x46
0b50 e047       | G  |		Load	0x0,0x47
0b51 e048       | H  |		Load	0x0,0x48
0b52 a049       | I  |		Store_Unchecked	0x0,0x49
0b53 803a       | :  |		Call	0x0,0x3a
0b54 e5fe       |    |		Load	0x2,-0x2
0b55 0229       | )  |		Execute	Access,All_Read
0b56 00d8       |    |		Load_Top	At_Offset_0
0b57 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0b58 e04a       | J  |		Load	0x0,0x4a
0b59 e04b       | K  |		Load	0x0,0x4b
0b5a a04c       | L  |		Store_Unchecked	0x0,0x4c
0b5b 8005       |    |		Call	0x0,0x5
0b5c 00d9       |    |		Load_Top	At_Offset_1
0b5d 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0b5e 00d1       |    |		Pop_Control	Pop_Count_1
0b5f e5fe       |    |		Load	0x2,-0x2
0b60 e22c       | ,  |		Load	0x1,0x2c
0b61 e22d       | -  |		Load	0x1,0x2d
0b62 1d2e       | .  |		Execute_Immediate	Reference_Lex_1,0x2e
0b63 8005       |    |		Call	0x0,0x5
0b64 c5fe       |    |		Store	0x2,-0x2
0b65 e007       |    |		Load	0x0,0x7
0b66 a5fe       |    |		Store_Unchecked	0x2,-0x2
0b67 e5ff       |    |		Load	0x2,-0x1
0b68 0227       | '  |		Execute	Access,All_Reference
0b69 3c25       |<%  |		Execute	Record,Field_Read,Field_Number 0x25
0b6a a402       |    |		Store_Unchecked	0x2,0x2
0b6b 00cf       |    |		Action	Mark_Auxiliary
0b6c 7815       |x   |		Jump	0xb82
0b6d e402       |    |		Load	0x2,0x2
0b6e 0227       | '  |		Execute	Access,All_Reference
0b6f 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0b70 e01b       |    |		Load	0x0,0x1b
0b71 022e       | .  |		Execute	Access,Not_Equal
0b72 680a       |h   |		Jump_Zero	0xb7d
0b73 e402       |    |		Load	0x2,0x2
0b74 0227       | '  |		Execute	Access,All_Reference
0b75 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0b76 e5fe       |    |		Load	0x2,-0x2
0b77 e5ff       |    |		Load	0x2,-0x1
0b78 e402       |    |		Load	0x2,0x2
0b79 0227       | '  |		Execute	Access,All_Reference
0b7a 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0b7b 801c       |    |		Call	0x0,0x1c
0b7c 801d       |    |		Call	0x0,0x1d
0b7d e402       |    |		Load	0x2,0x2
0b7e 0227       | '  |		Execute	Access,All_Reference
0b7f 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0b80 a402       |    |		Store_Unchecked	0x2,0x2
0b81 00c9       |    |		Action	Pop_Auxiliary_Loop
0b82 e402       |    |		Load	0x2,0x2
0b83 77e9       |w   |		Jump_Nonzero	0xb6d
0b84 00ce       |    |		Action	Pop_Auxiliary
0b85 e5ff       |    |		Load	0x2,-0x1
0b86 8011       |    |		Call	0x0,0x11
0b87 e5ff       |    |		Load	0x2,-0x1
0b88 8012       |    |		Call	0x0,0x12
0b89 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0b8a			TRAP_0b38:
0b8a 0007       |    |		Action	Break_Optional
0b8b e5ff       |    |		Load	0x2,-0x1
0b8c 8011       |    |		Call	0x0,0x11
0b8d 00d8       |    |		Load_Top	At_Offset_0
0b8e 0101       |    |		Execute	Exception,Reraise
0b8f 0000       |    |		.XXX[0x1]
0b90 ; --------------------------------------------------------------------------------------
0b90 ; SUBPROGRAM
0b90 ; --------------------------------------------------------------------------------------
0b90 0b93       |    |		.CONST	0x0b93								; Address of begin
0b91 0bd3       |    |		.CONST	0x0bd3								; Address of exception handler
0b92 0001       |    |		.CONST	0x0001								; Number of locals
0b93			BODY_0b90:
0b93			INIT_0b90:
0b93 e04d       | M  |		Load	0x0,0x4d
0b94 0322       | "  |		Declare_Variable	Record
0b95 4861       |Ha  |		Short_Literal	0x61
0b96 00d9       |    |		Load_Top	At_Offset_1
0b97 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0b98 e04d       | M  |		Load	0x0,0x4d
0b99 012c       | ,  |		Execute	Any,Size
0b9a 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
0b9b 00d9       |    |		Load_Top	At_Offset_1
0b9c 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0b9d e5fe       |    |		Load	0x2,-0x2
0b9e 00d9       |    |		Load_Top	At_Offset_1
0b9f 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0ba0 e5fd       |    |		Load	0x2,-0x3
0ba1 00d9       |    |		Load_Top	At_Offset_1
0ba2 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0ba3 e5fc       |    |		Load	0x2,-0x4
0ba4 00d9       |    |		Load_Top	At_Offset_1
0ba5 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0ba6 e5fb       |    |		Load	0x2,-0x5
0ba7 00d9       |    |		Load_Top	At_Offset_1
0ba8 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0ba9 e5ff       |    |		Load	0x2,-0x1
0baa e04e       | N  |		Load	0x0,0x4e
0bab a04f       | O  |		Store_Unchecked	0x0,0x4f
0bac e050       | P  |		Load	0x0,0x50
0bad e051       | Q  |		Load	0x0,0x51
0bae a052       | R  |		Store_Unchecked	0x0,0x52
0baf 803a       | :  |		Call	0x0,0x3a
0bb0 e010       |    |		Load	0x0,0x10
0bb1 e402       |    |		Load	0x2,0x2
0bb2 4801       |H   |		Short_Literal	0x1
0bb3 4800       |H   |		Short_Literal	0x0
0bb4 4861       |Ha  |		Short_Literal	0x61
0bb5 e5ff       |    |		Load	0x2,-0x1
0bb6 e053       | S  |		Load	0x0,0x53
0bb7 a054       | T  |		Store_Unchecked	0x0,0x54
0bb8 a055       | U  |		Store_Unchecked	0x0,0x55
0bb9 8056       | V  |		Call	0x0,0x56
0bba 00d1       |    |		Pop_Control	Pop_Count_1
0bbb c403       |    |		Store	0x2,0x3
0bbc e403       |    |		Load	0x2,0x3
0bbd 700c       |p   |		Jump_Nonzero	0xbca
0bbe 4800       |H   |		Short_Literal	0x0
0bbf a5fa       |    |		Store_Unchecked	0x2,-0x6
0bc0 4800       |H   |		Short_Literal	0x0
0bc1 a5f9       |    |		Store_Unchecked	0x2,-0x7
0bc2 4800       |H   |		Short_Literal	0x0
0bc3 a5f8       |    |		Store_Unchecked	0x2,-0x8
0bc4 e5ff       |    |		Load	0x2,-0x1
0bc5 8011       |    |		Call	0x0,0x11
0bc6 e5ff       |    |		Load	0x2,-0x1
0bc7 8012       |    |		Call	0x0,0x12
0bc8 00cc       |    |		Action	Pop_Block
0bc9 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0bca e402       |    |		Load	0x2,0x2
0bcb 2620       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x20
0bcc 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0bcd a5fa       |    |		Store_Unchecked	0x2,-0x6
0bce e402       |    |		Load	0x2,0x2
0bcf 2620       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x20
0bd0 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0bd1 a5f9       |    |		Store_Unchecked	0x2,-0x7
0bd2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0bd3			TRAP_0b90:
0bd3 0007       |    |		Action	Break_Optional
0bd4 e5ff       |    |		Load	0x2,-0x1
0bd5 8011       |    |		Call	0x0,0x11
0bd6 00d8       |    |		Load_Top	At_Offset_0
0bd7 0101       |    |		Execute	Exception,Reraise
0bd8 ; --------------------------------------------------------------------------------------
0bd8 ; SUBPROGRAM
0bd8 ; --------------------------------------------------------------------------------------
0bd8 0bdb       |    |		.CONST	0x0bdb								; Address of begin
0bd9 0c44       | D  |		.CONST	0x0c44								; Address of exception handler
0bda 0001       |    |		.CONST	0x0001								; Number of locals
0bdb			BODY_0bd8:
0bdb			INIT_0bd8:
0bdb e057       | W  |		Load	0x0,0x57
0bdc 0322       | "  |		Declare_Variable	Record
0bdd 483b       |H;  |		Short_Literal	0x3b
0bde 00d9       |    |		Load_Top	At_Offset_1
0bdf 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0be0 e057       | W  |		Load	0x0,0x57
0be1 012c       | ,  |		Execute	Any,Size
0be2 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
0be3 e5fb       |    |		Load	0x2,-0x5
0be4 01db       |    |		Execute	Vector,Length
0be5 e058       | X  |		Load	0x0,0x58
0be6 012c       | ,  |		Execute	Any,Size
0be7 0271       | q  |		Execute	Discrete,Times
0be8 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
0be9 0273       | s  |		Execute	Discrete,Plus
0bea 00d9       |    |		Load_Top	At_Offset_1
0beb 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0bec e5fe       |    |		Load	0x2,-0x2
0bed 0227       | '  |		Execute	Access,All_Reference
0bee 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0bef 00d9       |    |		Load_Top	At_Offset_1
0bf0 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0bf1 e5fd       |    |		Load	0x2,-0x3
0bf2 00d9       |    |		Load_Top	At_Offset_1
0bf3 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0bf4 e5fc       |    |		Load	0x2,-0x4
0bf5 00d9       |    |		Load_Top	At_Offset_1
0bf6 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0bf7 e5fa       |    |		Load	0x2,-0x6
0bf8 00d9       |    |		Load_Top	At_Offset_1
0bf9 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0bfa e5ff       |    |		Load	0x2,-0x1
0bfb e059       | Y  |		Load	0x0,0x59
0bfc a05a       | Z  |		Store_Unchecked	0x0,0x5a
0bfd e05b       | [  |		Load	0x0,0x5b
0bfe e05c       | \  |		Load	0x0,0x5c
0bff a05d       | ]  |		Store_Unchecked	0x0,0x5d
0c00 803a       | :  |		Call	0x0,0x3a
0c01 e5fd       |    |		Load	0x2,-0x3
0c02 e5fe       |    |		Load	0x2,-0x2
0c03 0227       | '  |		Execute	Access,All_Reference
0c04 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0c05 3812       |8   |		Execute	Record,Field_Write,Field_Number 0x12
0c06 e5fc       |    |		Load	0x2,-0x4
0c07 e5fe       |    |		Load	0x2,-0x2
0c08 0227       | '  |		Execute	Access,All_Reference
0c09 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0c0a 3813       |8   |		Execute	Record,Field_Write,Field_Number 0x13
0c0b 4801       |H   |		Short_Literal	0x1
0c0c e5fe       |    |		Load	0x2,-0x2
0c0d 0227       | '  |		Execute	Access,All_Reference
0c0e 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0c0f e5fb       |    |		Load	0x2,-0x5
0c10 e5ff       |    |		Load	0x2,-0x1
0c11 e05e       | ^  |		Load	0x0,0x5e
0c12 e05f       | _  |		Load	0x0,0x5f
0c13 e060       | `  |		Load	0x0,0x60
0c14 a061       | a  |		Store_Unchecked	0x0,0x61
0c15 e062       | b  |		Load	0x0,0x62
0c16 e063       | c  |		Load	0x0,0x63
0c17 a064       | d  |		Store_Unchecked	0x0,0x64
0c18 8065       | e  |		Call	0x0,0x65
0c19 e5fe       |    |		Load	0x2,-0x2
0c1a 0227       | '  |		Execute	Access,All_Reference
0c1b 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0c1c e004       |    |		Load	0x0,0x4
0c1d 0337       | 7  |		Declare_Variable	Array
0c1e 4801       |H   |		Short_Literal	0x1
0c1f 480c       |H   |		Short_Literal	0xc
0c20 00da       |    |		Load_Top	At_Offset_2
0c21 01d6       |    |		Execute	Vector,Field_Write
0c22 4801       |H   |		Short_Literal	0x1
0c23 480e       |H   |		Short_Literal	0xe
0c24 00da       |    |		Load_Top	At_Offset_2
0c25 01d6       |    |		Execute	Vector,Field_Write
0c26 4801       |H   |		Short_Literal	0x1
0c27 480d       |H   |		Short_Literal	0xd
0c28 00da       |    |		Load_Top	At_Offset_2
0c29 01d6       |    |		Execute	Vector,Field_Write
0c2a 480b       |H   |		Short_Literal	0xb
0c2b 4800       |H   |		Short_Literal	0x0
0c2c 4800       |H   |		Short_Literal	0x0
0c2d 00d9       |    |		Load_Top	At_Offset_1
0c2e e603       |    |		Load	0x3,0x3
0c2f 01d6       |    |		Execute	Vector,Field_Write
0c30 3ffb       |?   |		Loop_Increasing	0xc2c
0c31 481f       |H   |		Short_Literal	0x1f
0c32 480f       |H   |		Short_Literal	0xf
0c33 4800       |H   |		Short_Literal	0x0
0c34 00d9       |    |		Load_Top	At_Offset_1
0c35 e603       |    |		Load	0x3,0x3
0c36 01d6       |    |		Execute	Vector,Field_Write
0c37 3ffb       |?   |		Loop_Increasing	0xc33
0c38 e004       |    |		Load	0x0,0x4
0c39 01c3       |    |		Execute	Vector,Check_In_Type
0c3a 01d0       |    |		Execute	Vector,Complement
0c3b 01d3       |    |		Execute	Vector,And
0c3c e5fe       |    |		Load	0x2,-0x2
0c3d 0227       | '  |		Execute	Access,All_Reference
0c3e 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0c3f e5ff       |    |		Load	0x2,-0x1
0c40 8011       |    |		Call	0x0,0x11
0c41 e5ff       |    |		Load	0x2,-0x1
0c42 8012       |    |		Call	0x0,0x12
0c43 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0c44			TRAP_0bd8:
0c44 0007       |    |		Action	Break_Optional
0c45 e5ff       |    |		Load	0x2,-0x1
0c46 8011       |    |		Call	0x0,0x11
0c47 00d8       |    |		Load_Top	At_Offset_0
0c48 0101       |    |		Execute	Exception,Reraise
0c49 0000 0000  |    |		.BLANK	0000[0x7]
0c50 ; --------------------------------------------------------------------------------------
0c50 ; SUBPROGRAM
0c50 ; --------------------------------------------------------------------------------------
0c50 0c53       | S  |		.CONST	0x0c53								; Address of begin
0c51 0cb9       |    |		.CONST	0x0cb9								; Address of exception handler
0c52 0001       |    |		.CONST	0x0001								; Number of locals
0c53			BODY_0c50:
0c53			INIT_0c50:
0c53 e5fc       |    |		Load	0x2,-0x4
0c54 01db       |    |		Execute	Vector,Length
0c55 00d8       |    |		Load_Top	At_Offset_0
0c56 e00e       |    |		Load	0x0,0xe
0c57 0260       | `  |		Execute	Discrete,In_Type
0c58 7001       |p   |		Jump_Nonzero	0xc5a
0c59 0801       |    |		Execute_Immediate	Raise,0x1
0c5a e066       | f  |		Load	0x0,0x66
0c5b 0322       | "  |		Declare_Variable	Record
0c5c 483a       |H:  |		Short_Literal	0x3a
0c5d 00d9       |    |		Load_Top	At_Offset_1
0c5e 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0c5f e066       | f  |		Load	0x0,0x66
0c60 012c       | ,  |		Execute	Any,Size
0c61 09fb       |    |		Execute_Immediate	Binary_Scale,-0x5
0c62 e5fc       |    |		Load	0x2,-0x4
0c63 01db       |    |		Execute	Vector,Length
0c64 0a03       |    |		Execute_Immediate	Plus,0x3
0c65 09fe       |    |		Execute_Immediate	Binary_Scale,-0x2
0c66 0273       | s  |		Execute	Discrete,Plus
0c67 00d9       |    |		Load_Top	At_Offset_1
0c68 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0c69 4800       |H   |		Short_Literal	0x0
0c6a 00d9       |    |		Load_Top	At_Offset_1
0c6b 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0c6c e5fe       |    |		Load	0x2,-0x2
0c6d 0227       | '  |		Execute	Access,All_Reference
0c6e 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0c6f 00d9       |    |		Load_Top	At_Offset_1
0c70 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0c71 e5fd       |    |		Load	0x2,-0x3
0c72 00d9       |    |		Load_Top	At_Offset_1
0c73 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0c74 e5fc       |    |		Load	0x2,-0x4
0c75 01db       |    |		Execute	Vector,Length
0c76 00d9       |    |		Load_Top	At_Offset_1
0c77 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0c78 e5ff       |    |		Load	0x2,-0x1
0c79 e067       | g  |		Load	0x0,0x67
0c7a a068       | h  |		Store_Unchecked	0x0,0x68
0c7b e069       | i  |		Load	0x0,0x69
0c7c e06a       | j  |		Load	0x0,0x6a
0c7d a06b       | k  |		Store_Unchecked	0x0,0x6b
0c7e 801a       |    |		Call	0x0,0x1a
0c7f e5fd       |    |		Load	0x2,-0x3
0c80 e5fe       |    |		Load	0x2,-0x2
0c81 0227       | '  |		Execute	Access,All_Reference
0c82 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0c83 3815       |8   |		Execute	Record,Field_Write,Field_Number 0x15
0c84 4801       |H   |		Short_Literal	0x1
0c85 e5fe       |    |		Load	0x2,-0x2
0c86 0227       | '  |		Execute	Access,All_Reference
0c87 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0c88 e5fe       |    |		Load	0x2,-0x2
0c89 0227       | '  |		Execute	Access,All_Reference
0c8a 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0c8b e004       |    |		Load	0x0,0x4
0c8c 0337       | 7  |		Declare_Variable	Array
0c8d 4801       |H   |		Short_Literal	0x1
0c8e 480a       |H   |		Short_Literal	0xa
0c8f 00da       |    |		Load_Top	At_Offset_2
0c90 01d6       |    |		Execute	Vector,Field_Write
0c91 4801       |H   |		Short_Literal	0x1
0c92 480b       |H   |		Short_Literal	0xb
0c93 00da       |    |		Load_Top	At_Offset_2
0c94 01d6       |    |		Execute	Vector,Field_Write
0c95 4809       |H   |		Short_Literal	0x9
0c96 4800       |H   |		Short_Literal	0x0
0c97 4800       |H   |		Short_Literal	0x0
0c98 00d9       |    |		Load_Top	At_Offset_1
0c99 e603       |    |		Load	0x3,0x3
0c9a 01d6       |    |		Execute	Vector,Field_Write
0c9b 3ffb       |?   |		Loop_Increasing	0xc97
0c9c 481f       |H   |		Short_Literal	0x1f
0c9d 480c       |H   |		Short_Literal	0xc
0c9e 4800       |H   |		Short_Literal	0x0
0c9f 00d9       |    |		Load_Top	At_Offset_1
0ca0 e603       |    |		Load	0x3,0x3
0ca1 01d6       |    |		Execute	Vector,Field_Write
0ca2 3ffb       |?   |		Loop_Increasing	0xc9e
0ca3 e004       |    |		Load	0x0,0x4
0ca4 01c3       |    |		Execute	Vector,Check_In_Type
0ca5 01d0       |    |		Execute	Vector,Complement
0ca6 01d3       |    |		Execute	Vector,And
0ca7 e5fe       |    |		Load	0x2,-0x2
0ca8 0227       | '  |		Execute	Access,All_Reference
0ca9 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0caa e5fc       |    |		Load	0x2,-0x4
0cab e5ff       |    |		Load	0x2,-0x1
0cac e06c       | l  |		Load	0x0,0x6c
0cad e06d       | m  |		Load	0x0,0x6d
0cae e06e       | n  |		Load	0x0,0x6e
0caf a06f       | o  |		Store_Unchecked	0x0,0x6f
0cb0 e070       | p  |		Load	0x0,0x70
0cb1 e071       | q  |		Load	0x0,0x71
0cb2 a072       | r  |		Store_Unchecked	0x0,0x72
0cb3 8073       | s  |		Call	0x0,0x73
0cb4 e5ff       |    |		Load	0x2,-0x1
0cb5 8011       |    |		Call	0x0,0x11
0cb6 e5ff       |    |		Load	0x2,-0x1
0cb7 8012       |    |		Call	0x0,0x12
0cb8 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0cb9			TRAP_0c50:
0cb9 0007       |    |		Action	Break_Optional
0cba e5ff       |    |		Load	0x2,-0x1
0cbb 8011       |    |		Call	0x0,0x11
0cbc 00d8       |    |		Load_Top	At_Offset_0
0cbd 0101       |    |		Execute	Exception,Reraise
0cbe 0000 0000  |    |		.XXX[0x2]
0cc0 ; --------------------------------------------------------------------------------------
0cc0 ; SUBPROGRAM
0cc0 ; --------------------------------------------------------------------------------------
0cc0 0cc3       |    |		.CONST	0x0cc3								; Address of begin
0cc1 0cd6       |    |		.CONST	0x0cd6								; Address of exception handler
0cc2 0001       |    |		.CONST	0x0001								; Number of locals
0cc3			BODY_0cc0:
0cc3			INIT_0cc0:
0cc3 e5fd       |    |		Load	0x2,-0x3
0cc4 e5fe       |    |		Load	0x2,-0x2
0cc5 0227       | '  |		Execute	Access,All_Reference
0cc6 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0cc7 380c       |8   |		Execute	Record,Field_Write,Field_Number 0xc
0cc8 4801       |H   |		Short_Literal	0x1
0cc9 4814       |H   |		Short_Literal	0x14
0cca e5fe       |    |		Load	0x2,-0x2
0ccb 0227       | '  |		Execute	Access,All_Reference
0ccc 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0ccd 01d6       |    |		Execute	Vector,Field_Write
0cce e5fe       |    |		Load	0x2,-0x2
0ccf e5ff       |    |		Load	0x2,-0x1
0cd0 8229       | )  |		Call	0x1,0x29
0cd1 e5ff       |    |		Load	0x2,-0x1
0cd2 8011       |    |		Call	0x0,0x11
0cd3 e5ff       |    |		Load	0x2,-0x1
0cd4 8012       |    |		Call	0x0,0x12
0cd5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0cd6			TRAP_0cc0:
0cd6 0007       |    |		Action	Break_Optional
0cd7 e5ff       |    |		Load	0x2,-0x1
0cd8 8011       |    |		Call	0x0,0x11
0cd9 00d8       |    |		Load_Top	At_Offset_0
0cda 0101       |    |		Execute	Exception,Reraise
0cdb 0000 0000  |    |		.BLANK	0000[0x5]
0ce0 ; --------------------------------------------------------------------------------------
0ce0 ; Debug Table
0ce0 ; --------------------------------------------------------------------------------------
0ce0 0004 0000  |    |		.DEBUG4	0x0004,0x0000,0x68f7,0x0000,0x0001,0x0029
0ce6 000b 0d8a  |    |		.DBG4T	0x000b,0x0d8a,0x8000,0x0000
0cea 0046 0daa  | F  |		.DBG4T	0x0046,0x0daa,0x8000,0x0000
0cee 014b 0dce  | K  |		.DBG4T	0x014b,0x0dce,0x0001,0x0000
0cf2 015b 0dd4  | [  |		.DBG4T	0x015b,0x0dd4,0x0001,0x0000
0cf6 0173 0ddc  | s  |		.DBG4T	0x0173,0x0ddc,0x0002,0x0000
0cfa 018b 0de4  |    |		.DBG4T	0x018b,0x0de4,0x0001,0x0000
0cfe 019b 0deb  |    |		.DBG4T	0x019b,0x0deb,0x0002,0x0000
0d02 01ab 0dee  |    |		.DBG4T	0x01ab,0x0dee,0x0001,0x0000
0d06 028b 0e1d  |    |		.DBG4T	0x028b,0x0e1d,0x0001,0x0000
0d0a 02a3 0e26  |   &|		.DBG4T	0x02a3,0x0e26,0x0001,0x0000
0d0e 02b3 0e29  |   )|		.DBG4T	0x02b3,0x0e29,0x0001,0x0000
0d12 02c3 0e2c  |   ,|		.DBG4T	0x02c3,0x0e2c,0x0001,0x0000
0d16 02e3 0e34  |   4|		.DBG4T	0x02e3,0x0e34,0x0001,0x0000
0d1a 0303 0e3c  |   <|		.DBG4T	0x0303,0x0e3c,0x0001,0x0000
0d1e 0323 0e45  | # E|		.DBG4T	0x0323,0x0e45,0x0001,0x0000
0d22 0353 0e51  | S Q|		.DBG4T	0x0353,0x0e51,0x0001,0x0000
0d26 0363 0e55  | c U|		.DBG4T	0x0363,0x0e55,0x0001,0x0000
0d2a 0373 0e59  | s Y|		.DBG4T	0x0373,0x0e59,0x0001,0x0000
0d2e 0393 0e61  |   a|		.DBG4T	0x0393,0x0e61,0x0001,0x0000
0d32 03b3 0e69  |   i|		.DBG4T	0x03b3,0x0e69,0x0001,0x0000
0d36 03d3 0e72  |   r|		.DBG4T	0x03d3,0x0e72,0x0001,0x0000
0d3a 03f3 0e7a  |   z|		.DBG4T	0x03f3,0x0e7a,0x0001,0x0000
0d3e 0413 0e82  |    |		.DBG4T	0x0413,0x0e82,0x0001,0x0000
0d42 0433 0e8a  | 3  |		.DBG4T	0x0433,0x0e8a,0x0001,0x0000
0d46 047b 0e9c  | {  |		.DBG4T	0x047b,0x0e9c,0x0001,0x0000
0d4a 049b 0ea4  |    |		.DBG4T	0x049b,0x0ea4,0x0001,0x0000
0d4e 04e3 0eb6  |    |		.DBG4T	0x04e3,0x0eb6,0x0001,0x0000
0d52 04f3 0eba  |    |		.DBG4T	0x04f3,0x0eba,0x0001,0x0000
0d56 0513 0ec2  |    |		.DBG4T	0x0513,0x0ec2,0x0001,0x0000
0d5a 052b 0eca  | +  |		.DBG4T	0x052b,0x0eca,0x0001,0x0000
0d5e 055b 0ed6  | [  |		.DBG4T	0x055b,0x0ed6,0x0001,0x4000
0d62 05d3 0ef6  |    |		.DBG4T	0x05d3,0x0ef6,0x0001,0x0000
0d66 07a3 0f54  |   T|		.DBG4T	0x07a3,0x0f54,0x0001,0x0000
0d6a 090b 0f84  |    |		.DBG4T	0x090b,0x0f84,0x0004,0x0000
0d6e 0953 0f8d  | S  |		.DBG4T	0x0953,0x0f8d,0x0004,0x4000
0d72 0a7b 1009  | {  |		.DBG4T	0x0a7b,0x1009,0x0004,0x4000
0d76 0b3b 1041  | ; A|		.DBG4T	0x0b3b,0x1041,0x0004,0x4000
0d7a 0b93 105d  |   ]|		.DBG4T	0x0b93,0x105d,0x0004,0x0000
0d7e 0bdb 106c  |   l|		.DBG4T	0x0bdb,0x106c,0x0004,0x0000
0d82 0c53 1078  | S x|		.DBG4T	0x0c53,0x1078,0x0004,0x0000
0d86 0cc3 1083  |    |		.DBG4T	0x0cc3,0x1083,0x0004,0x0000
0d8a ; --------------------------------------------------------------------------------------
0d8a ; Debug chain
0d8a ; --------------------------------------------------------------------------------------
0d8a 001e 0000  |    |		.DBGLEN	0x001e,0x0000
0d8c 000b 000d  |    |		.DBGLNO	0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d,0x001f,0x0021,0x0023,0x0025,0x0027,0x0029,0x002b,0x002d,0x002f,0x0031,0x0033,0x0035,0x0037,0x0039,0x003b,0x003d,0x003f,0x0041,0x0043,0x0045
0daa ; --------------------------------------------------------------------------------------
0daa ; Debug chain
0daa ; --------------------------------------------------------------------------------------
0daa 0022 0000  | "  |		.DBGLEN	0x0022,0x0000
0dac 0046 0098  | F  |		.DBGLNO	0x0046,0x0098,0x0100,0x0108,0x010a,0x010c,0x010e,0x0110,0x0112,0x0114,0x0116,0x0118,0x011a,0x011c,0x011e,0x0120,0x0122,0x0124,0x0126,0x0128,0x012a,0x012c,0x012e,0x0130,0x0132,0x0134,0x0136,0x0138,0x013a,0x013c,0x013e,0x0140,0x0142,0x0144
0dce ; --------------------------------------------------------------------------------------
0dce ; Debug chain
0dce ; --------------------------------------------------------------------------------------
0dce 0001 0003  |    |		.DBGLEN	0x0001,0x0003
0dd0 014b 0150  | K P|		.DBGLNO	0x014b,0x0150,0x0154,0x0156
0dd4 ; --------------------------------------------------------------------------------------
0dd4 ; Debug chain
0dd4 ; --------------------------------------------------------------------------------------
0dd4 0004 0002  |    |		.DBGLEN	0x0004,0x0002
0dd6 015b 015f  | [ _|		.DBGLNO	0x015b,0x015f,0x0163,0x0165,0x016a,0x016c
0ddc ; --------------------------------------------------------------------------------------
0ddc ; Debug chain
0ddc ; --------------------------------------------------------------------------------------
0ddc 0004 0002  |    |		.DBGLEN	0x0004,0x0002
0dde 0173 0175  | s u|		.DBGLNO	0x0173,0x0175,0x0177,0x0179,0x017e,0x0180
0de4 ; --------------------------------------------------------------------------------------
0de4 ; Debug chain
0de4 ; --------------------------------------------------------------------------------------
0de4 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0de6 018b 018e  |    |		.DBGLNO	0x018b,0x018e,0x0192,0x0193,0x0195
0deb ; --------------------------------------------------------------------------------------
0deb ; Debug chain
0deb ; --------------------------------------------------------------------------------------
0deb 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0ded 019b       |    |		.DBGLNO	0x019b
0dee ; --------------------------------------------------------------------------------------
0dee ; Debug chain
0dee ; --------------------------------------------------------------------------------------
0dee 0000 002d  |   -|		.DBGLEN	0x0000,0x002d
0df0 01ab 01b1  |    |		.DBGLNO	0x01ab,0x01b1,0x01b3,0x01b7,0x01bd,0x01c1,0x01c7,0x01cb,0x01d1,0x01d5,0x01db,0x01df,0x01e5,0x01e9,0x01ef,0x01f3,0x01f9,0x01fd,0x0203,0x0207,0x020d,0x0211,0x0217,0x021b,0x0221,0x0225,0x022b,0x022f,0x0235,0x0239,0x023f,0x0243,0x0249,0x024d,0x0253,0x0257,0x025d,0x0261,0x0267,0x026b,0x0271,0x0275,0x027b,0x027f,0x0285
0e1d ; --------------------------------------------------------------------------------------
0e1d ; Debug chain
0e1d ; --------------------------------------------------------------------------------------
0e1d 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0e1f 028b 028f  |    |		.DBGLNO	0x028b,0x028f,0x0292,0x0294,0x0295,0x0297,0x0299
0e26 ; --------------------------------------------------------------------------------------
0e26 ; Debug chain
0e26 ; --------------------------------------------------------------------------------------
0e26 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0e28 02a3       |    |		.DBGLNO	0x02a3
0e29 ; --------------------------------------------------------------------------------------
0e29 ; Debug chain
0e29 ; --------------------------------------------------------------------------------------
0e29 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0e2b 02b3       |    |		.DBGLNO	0x02b3
0e2c ; --------------------------------------------------------------------------------------
0e2c ; Debug chain
0e2c ; --------------------------------------------------------------------------------------
0e2c 0000 0006  |    |		.DBGLEN	0x0000,0x0006
0e2e 02c3 02c5  |    |		.DBGLNO	0x02c3,0x02c5,0x02cc,0x02d1,0x02d7,0x02d9
0e34 ; --------------------------------------------------------------------------------------
0e34 ; Debug chain
0e34 ; --------------------------------------------------------------------------------------
0e34 0000 0006  |    |		.DBGLEN	0x0000,0x0006
0e36 02e3 02e5  |    |		.DBGLNO	0x02e3,0x02e5,0x02ec,0x02f1,0x02f7,0x02f9
0e3c ; --------------------------------------------------------------------------------------
0e3c ; Debug chain
0e3c ; --------------------------------------------------------------------------------------
0e3c 0000 0007  |    |		.DBGLEN	0x0000,0x0007
0e3e 0303 0305  |    |		.DBGLNO	0x0303,0x0305,0x030a,0x0310,0x0314,0x0317,0x0319
0e45 ; --------------------------------------------------------------------------------------
0e45 ; Debug chain
0e45 ; --------------------------------------------------------------------------------------
0e45 0001 0009  |    |		.DBGLEN	0x0001,0x0009
0e47 0323 0327  | # '|		.DBGLNO	0x0323,0x0327,0x0329,0x032e,0x0331,0x0337,0x033c,0x033f,0x0345,0x0347
0e51 ; --------------------------------------------------------------------------------------
0e51 ; Debug chain
0e51 ; --------------------------------------------------------------------------------------
0e51 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0e53 0355 0357  | U W|		.DBGLNO	0x0355,0x0357
0e55 ; --------------------------------------------------------------------------------------
0e55 ; Debug chain
0e55 ; --------------------------------------------------------------------------------------
0e55 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0e57 0365 0367  | e g|		.DBGLNO	0x0365,0x0367
0e59 ; --------------------------------------------------------------------------------------
0e59 ; Debug chain
0e59 ; --------------------------------------------------------------------------------------
0e59 0000 0006  |    |		.DBGLEN	0x0000,0x0006
0e5b 0373 0375  | s u|		.DBGLNO	0x0373,0x0375,0x037c,0x0381,0x0387,0x0389
0e61 ; --------------------------------------------------------------------------------------
0e61 ; Debug chain
0e61 ; --------------------------------------------------------------------------------------
0e61 0000 0006  |    |		.DBGLEN	0x0000,0x0006
0e63 0393 0395  |    |		.DBGLNO	0x0393,0x0395,0x039c,0x03a1,0x03a7,0x03a9
0e69 ; --------------------------------------------------------------------------------------
0e69 ; Debug chain
0e69 ; --------------------------------------------------------------------------------------
0e69 0000 0007  |    |		.DBGLEN	0x0000,0x0007
0e6b 03b3 03b5  |    |		.DBGLNO	0x03b3,0x03b5,0x03bc,0x03c1,0x03c7,0x03ca,0x03cc
0e72 ; --------------------------------------------------------------------------------------
0e72 ; Debug chain
0e72 ; --------------------------------------------------------------------------------------
0e72 0000 0006  |    |		.DBGLEN	0x0000,0x0006
0e74 03d3 03d5  |    |		.DBGLNO	0x03d3,0x03d5,0x03dc,0x03e1,0x03e7,0x03e9
0e7a ; --------------------------------------------------------------------------------------
0e7a ; Debug chain
0e7a ; --------------------------------------------------------------------------------------
0e7a 0000 0006  |    |		.DBGLEN	0x0000,0x0006
0e7c 03f3 03f5  |    |		.DBGLNO	0x03f3,0x03f5,0x03fc,0x0401,0x0407,0x0409
0e82 ; --------------------------------------------------------------------------------------
0e82 ; Debug chain
0e82 ; --------------------------------------------------------------------------------------
0e82 0000 0006  |    |		.DBGLEN	0x0000,0x0006
0e84 0413 0415  |    |		.DBGLNO	0x0413,0x0415,0x041c,0x0421,0x0427,0x0429
0e8a ; --------------------------------------------------------------------------------------
0e8a ; Debug chain
0e8a ; --------------------------------------------------------------------------------------
0e8a 0001 000f  |    |		.DBGLEN	0x0001,0x000f
0e8c 0433 0437  | 3 7|		.DBGLNO	0x0433,0x0437,0x0439,0x043e,0x0441,0x0447,0x044c,0x044f,0x0455,0x045a,0x045d,0x0463,0x0468,0x046b,0x0471,0x0473
0e9c ; --------------------------------------------------------------------------------------
0e9c ; Debug chain
0e9c ; --------------------------------------------------------------------------------------
0e9c 0000 0006  |    |		.DBGLEN	0x0000,0x0006
0e9e 047b 047d  | { }|		.DBGLNO	0x047b,0x047d,0x0484,0x0489,0x048f,0x0491
0ea4 ; --------------------------------------------------------------------------------------
0ea4 ; Debug chain
0ea4 ; --------------------------------------------------------------------------------------
0ea4 0001 000f  |    |		.DBGLEN	0x0001,0x000f
0ea6 049b 049f  |    |		.DBGLNO	0x049b,0x049f,0x04a1,0x04a6,0x04a9,0x04af,0x04b4,0x04b7,0x04bd,0x04c2,0x04c5,0x04cb,0x04d0,0x04d3,0x04d9,0x04db
0eb6 ; --------------------------------------------------------------------------------------
0eb6 ; Debug chain
0eb6 ; --------------------------------------------------------------------------------------
0eb6 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0eb8 04e5 04e7  |    |		.DBGLNO	0x04e5,0x04e7
0eba ; --------------------------------------------------------------------------------------
0eba ; Debug chain
0eba ; --------------------------------------------------------------------------------------
0eba 0000 0006  |    |		.DBGLEN	0x0000,0x0006
0ebc 04f3 04f5  |    |		.DBGLNO	0x04f3,0x04f5,0x04fc,0x0501,0x0507,0x0509
0ec2 ; --------------------------------------------------------------------------------------
0ec2 ; Debug chain
0ec2 ; --------------------------------------------------------------------------------------
0ec2 0000 0006  |    |		.DBGLEN	0x0000,0x0006
0ec4 0513 0515  |    |		.DBGLNO	0x0513,0x0515,0x051a,0x0520,0x0523,0x0525
0eca ; --------------------------------------------------------------------------------------
0eca ; Debug chain
0eca ; --------------------------------------------------------------------------------------
0eca 0001 0009  |    |		.DBGLEN	0x0001,0x0009
0ecc 052b 052f  | + /|		.DBGLNO	0x052b,0x052f,0x0531,0x0536,0x0539,0x053f,0x0544,0x0547,0x054d,0x054f
0ed6 ; --------------------------------------------------------------------------------------
0ed6 ; Debug chain
0ed6 ; --------------------------------------------------------------------------------------
0ed6 0004 000d  |    |		.DBGLEN	0x0004,0x000d
0ed8 055b 055d  | [ ]|		.DBGLNO	0x055b,0x055d,0x055f,0x0561,0x0568,0x056c,0x056d,0x0572,0x0575,0x0579,0x057f,0x05ac,0x05b2,0x05b8,0x05be,0x05c8,0x05cd
0ee9 0001 0002  |    |		.XXX[0xd]
0eeb 0003 0004  |    |
0eed 0005 0006  |    |
0eef 0007 0008  |    |
0ef1 0009 000b  |    |
0ef3 000c 000d  |    |
0ef5 000a       |    |
0ef6 ; --------------------------------------------------------------------------------------
0ef6 ; Debug chain
0ef6 ; --------------------------------------------------------------------------------------
0ef6 0001 005b  |   [|		.DBGLEN	0x0001,0x005b
0ef8 05d3 05d7  |    |		.DBGLNO	0x05d3,0x05d7,0x05db,0x05e1,0x05e5,0x05eb,0x05ef,0x05f5,0x05f9,0x05ff,0x0603,0x0609,0x060d,0x0613,0x0617,0x061d,0x0621,0x0627,0x062b,0x0631,0x0635,0x063b,0x063f,0x0645,0x0649,0x064f,0x0653,0x0659,0x065d,0x0663,0x0667,0x066d,0x0671,0x0677,0x067b,0x0681,0x0685,0x068b,0x068f,0x0695,0x0699,0x069f,0x06a3,0x06a9,0x06ad,0x06b3,0x06b7,0x06bb,0x06c1,0x06c5,0x06c9,0x06cf,0x06d3,0x06d9,0x06dd,0x06e3,0x06e7,0x06ed,0x06f1,0x06f7,0x0701,0x0705,0x070b,0x070f,0x0715,0x0719,0x071f,0x0723,0x0729,0x072d,0x0733,0x0737,0x073d,0x0741,0x0747,0x074b,0x0751,0x0755,0x075b,0x075f,0x0763,0x0769,0x076d,0x0771,0x0777,0x077b,0x0781,0x0785,0x0790,0x0794,0x079a,0x079e
0f54 ; --------------------------------------------------------------------------------------
0f54 ; Debug chain
0f54 ; --------------------------------------------------------------------------------------
0f54 0000 002e  |   .|		.DBGLEN	0x0000,0x002e
0f56 07a3 07a7  |    |		.DBGLNO	0x07a3,0x07a7,0x07b5,0x07b9,0x07c2,0x07c6,0x07cf,0x07d3,0x07dc,0x07e0,0x07e9,0x07ed,0x07fb,0x07ff,0x080d,0x0811,0x081f,0x0823,0x0831,0x0835,0x0843,0x0847,0x0852,0x0856,0x0861,0x0865,0x086e,0x0872,0x087b,0x087f,0x0889,0x088d,0x089b,0x089f,0x08ad,0x08b1,0x08ba,0x08be,0x08c7,0x08cb,0x08d6,0x08da,0x08e3,0x08e7,0x08f0,0x08f4
0f84 ; --------------------------------------------------------------------------------------
0f84 ; Debug chain
0f84 ; --------------------------------------------------------------------------------------
0f84 0000 0007  |    |		.DBGLEN	0x0000,0x0007
0f86 090b 090f  |    |		.DBGLNO	0x090b,0x090f,0x093c,0x093f,0x0941,0x0945,0x0947
0f8d ; --------------------------------------------------------------------------------------
0f8d ; Debug chain
0f8d ; --------------------------------------------------------------------------------------
0f8d 0000 003d  |   =|		.DBGLEN	0x0000,0x003d
0f8f 0953 095b  | S [|		.DBGLNO	0x0953,0x095b,0x095e,0x0967,0x098b,0x098f,0x0993,0x0997,0x099b,0x099f,0x09a3,0x09a7,0x09ab,0x09af,0x09b3,0x09b7,0x09bb,0x09bf,0x09c3,0x09c7,0x09cb,0x09cf,0x09d3,0x09d7,0x09db,0x09df,0x09e3,0x09e7,0x09eb,0x09ef,0x09f3,0x09f7,0x09fb,0x09ff,0x0a03,0x0a07,0x0a0b,0x0a0f,0x0a13,0x0a17,0x0a1b,0x0a1f,0x0a23,0x0a27,0x0a2b,0x0a2f,0x0a35,0x0a39,0x0a3d,0x0a41,0x0a45,0x0a4b,0x0a4f,0x0a55,0x0a5b,0x0a65,0x0a6a,0x0a6d,0x0a6f,0x0a73,0x0a75
0fcc 0001 0002  |    |		.XXX[0x3d]
0fce 0003 0004  |    |
0fd0 0005 0006  |    |
0fd2 0007 0008  |    |
0fd4 0009 000a  |    |
0fd6 000b 000c  |    |
0fd8 000d 000e  |    |
0fda 000f 0010  |    |
0fdc 0011 0012  |    |
0fde 0013 0014  |    |
0fe0 0015 0016  |    |
0fe2 0017 0018  |    |
0fe4 0019 001a  |    |
0fe6 001b 001c  |    |
0fe8 001d 001e  |    |
0fea 001f 0020  |    |
0fec 0021 0022  | ! "|
0fee 0023 0024  | # $|
0ff0 0025 0026  | % &|
0ff2 0027 0028  | ' (|
0ff4 0029 002a  | ) *|
0ff6 002b 002c  | + ,|
0ff8 002d 002e  | - .|
0ffa 002f 0030  | / 0|
0ffc 0031 0032  | 1 2|
0ffe 0033 0034  | 3 4|
1000 0035 0037  | 5 7|
1002 0038 0039  | 8 9|
1004 0036 003a  | 6 :|
1006 003b 003c  | ; <|
1008 003d       | =  |
1009 ; --------------------------------------------------------------------------------------
1009 ; Debug chain
1009 ; --------------------------------------------------------------------------------------
1009 0000 001b  |    |		.DBGLEN	0x0000,0x001b
100b 0a7b 0a81  | {  |		.DBGLNO	0x0a7b,0x0a81,0x0a85,0x0a89,0x0a8d,0x0a91,0x0aa3,0x0aa7,0x0aab,0x0ab4,0x0ab7,0x0abc,0x0ac2,0x0ac8,0x0afb,0x0afe,0x0b06,0x0b0a,0x0b10,0x0b16,0x0b20,0x0b25,0x0b28,0x0b2a,0x0b2c,0x0b30,0x0b32
1026 0001 0002  |    |		.XXX[0x1b]
1028 0003 0004  |    |
102a 0005 0006  |    |
102c 0007 0008  |    |
102e 0009 000a  |    |
1030 000b 000c  |    |
1032 000d 000e  |    |
1034 000f 0010  |    |
1036 0011 0012  |    |
1038 0014 0015  |    |
103a 0016 0013  |    |
103c 0017 0018  |    |
103e 0019 001a  |    |
1040 001b       |    |
1041 ; --------------------------------------------------------------------------------------
1041 ; Debug chain
1041 ; --------------------------------------------------------------------------------------
1041 0000 000d  |    |		.DBGLEN	0x0000,0x000d
1043 0b3b 0b54  | ; T|		.DBGLNO	0x0b3b,0x0b54,0x0b5f,0x0b65,0x0b67,0x0b6d,0x0b73,0x0b7d,0x0b82,0x0b85,0x0b87,0x0b8b,0x0b8d
1050 0001 0002  |    |		.XXX[0xd]
1052 0003 0004  |    |
1054 0005 0007  |    |
1056 0008 0009  |    |
1058 0006 000a  |    |
105a 000b 000c  |    |
105c 000d       |    |
105d ; --------------------------------------------------------------------------------------
105d ; Debug chain
105d ; --------------------------------------------------------------------------------------
105d 0000 000d  |    |		.DBGLEN	0x0000,0x000d
105f 0b93 0bb0  |    |		.DBGLNO	0x0b93,0x0bb0,0x0bbc,0x0bbe,0x0bc0,0x0bc2,0x0bc4,0x0bc6,0x0bc8,0x0bca,0x0bce,0x0bd4,0x0bd6
106c ; --------------------------------------------------------------------------------------
106c ; Debug chain
106c ; --------------------------------------------------------------------------------------
106c 0000 000a  |    |		.DBGLEN	0x0000,0x000a
106e 0bdb 0c01  |    |		.DBGLNO	0x0bdb,0x0c01,0x0c06,0x0c0b,0x0c0f,0x0c19,0x0c3f,0x0c41,0x0c45,0x0c47
1078 ; --------------------------------------------------------------------------------------
1078 ; Debug chain
1078 ; --------------------------------------------------------------------------------------
1078 0000 0009  |    |		.DBGLEN	0x0000,0x0009
107a 0c53 0c7f  | S  |		.DBGLNO	0x0c53,0x0c7f,0x0c84,0x0c88,0x0caa,0x0cb4,0x0cb6,0x0cba,0x0cbc
1083 ; --------------------------------------------------------------------------------------
1083 ; Debug chain
1083 ; --------------------------------------------------------------------------------------
1083 0000 0007  |    |		.DBGLEN	0x0000,0x0007
1085 0cc3 0cc8  |    |		.DBGLNO	0x0cc3,0x0cc8,0x0cce,0x0cd1,0x0cd3,0x0cd7,0x0cd9
108c 0000 0000  |    |		.BLANK	0000[0x174]