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

⟦c0e090d7d⟧

    Length: 8192 (0x2000)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_191cd7

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦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 0b70       | p  |		.CONST	0x0b70								; 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 0007       |    |		.CONST	0x0007								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00b8       |    |		.CONST	0x00b8								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0037       | 7  |		.CONST	0x0037								; Number of locals
000b			INIT_0008:
000b 029a 00c3  |    |		Declare_Subprogram	INIT_00c0,For_Outer_Call,Visible,Unelaborated
000d 029a 00e3  |    |		Declare_Subprogram	INIT_00e0,For_Outer_Call,Visible,Unelaborated
000f 029a 0103  |    |		Declare_Subprogram	INIT_0100,For_Outer_Call,Visible,Unelaborated
0011 029a 012b  |   +|		Declare_Subprogram	INIT_0128,For_Outer_Call,Visible,Unelaborated
0013 029a 0143  |   C|		Declare_Subprogram	INIT_0140,For_Outer_Call,Visible,Unelaborated
0015 029a 0183  |    |		Declare_Subprogram	INIT_0180,For_Outer_Call,Visible,Unelaborated
0017 029a 01ab  |    |		Declare_Subprogram	INIT_01a8,For_Outer_Call,Visible,Unelaborated
0019 029a 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Outer_Call,Visible,Unelaborated
001b 029a 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Outer_Call,Visible,Unelaborated
001d 029a 0213  |    |		Declare_Subprogram	INIT_0210,For_Outer_Call,Visible,Unelaborated
001f 029a 025b  |   [|		Declare_Subprogram	INIT_0258,For_Outer_Call,Visible,Unelaborated
0021 029a 028b  |    |		Declare_Subprogram	INIT_0288,For_Outer_Call,Visible,Unelaborated
0023 029a 02bb  |    |		Declare_Subprogram	INIT_02b8,For_Outer_Call,Visible,Unelaborated
0025 029a 02f3  |    |		Declare_Subprogram	INIT_02f0,For_Outer_Call,Visible,Unelaborated
0027 029a 0313  |    |		Declare_Subprogram	INIT_0310,For_Outer_Call,Visible,Unelaborated
0029 029a 033b  |   ;|		Declare_Subprogram	INIT_0338,For_Outer_Call,Visible,Unelaborated
002b 029a 0363  |   c|		Declare_Subprogram	INIT_0360,For_Outer_Call,Visible,Unelaborated
002d 029a 037b  |   {|		Declare_Subprogram	INIT_0378,For_Outer_Call,Visible,Unelaborated
002f 029a 03ab  |    |		Declare_Subprogram	INIT_03a8,For_Outer_Call,Visible,Unelaborated
0031 029a 03d3  |    |		Declare_Subprogram	INIT_03d0,For_Outer_Call,Visible,Unelaborated
0033 029a 0403  |    |		Declare_Subprogram	INIT_0400,For_Outer_Call,Visible,Unelaborated
0035 029a 0433  |   3|		Declare_Subprogram	INIT_0430,For_Outer_Call,Visible,Unelaborated
0037 029a 0453  |   S|		Declare_Subprogram	INIT_0450,For_Outer_Call,Visible,Unelaborated
0039 029a 048b  |    |		Declare_Subprogram	INIT_0488,For_Outer_Call,Visible,Unelaborated
003b 029a 04bb  |    |		Declare_Subprogram	INIT_04b8,For_Outer_Call,Visible,Unelaborated
003d 029a 04f3  |    |		Declare_Subprogram	INIT_04f0,For_Outer_Call,Visible,Unelaborated
003f 029a 052b  |   +|		Declare_Subprogram	INIT_0528,For_Outer_Call,Visible,Unelaborated
0041 029a 054b  |   K|		Declare_Subprogram	INIT_0548,For_Outer_Call,Visible,Unelaborated
0043 029a 058b  |    |		Declare_Subprogram	INIT_0588,For_Outer_Call,Visible,Unelaborated
0045 029a 05cb  |    |		Declare_Subprogram	INIT_05c8,For_Outer_Call,Visible,Unelaborated
0047 029a 05fb  |    |		Declare_Subprogram	INIT_05f8,For_Outer_Call,Visible,Unelaborated
0049 029a 064b  |   K|		Declare_Subprogram	INIT_0648,For_Outer_Call,Visible,Unelaborated
004b 029a 068b  |    |		Declare_Subprogram	INIT_0688,For_Outer_Call,Visible,Unelaborated
004d 029a 06d3  |    |		Declare_Subprogram	INIT_06d0,For_Outer_Call,Visible,Unelaborated
004f 029a 0743  |   C|		Declare_Subprogram	INIT_0740,For_Outer_Call,Visible,Unelaborated
0051 029a 07bb  |    |		Declare_Subprogram	INIT_07b8,For_Outer_Call,Visible,Unelaborated
0053 029a 0823  |   #|		Declare_Subprogram	INIT_0820,For_Outer_Call,Visible,Unelaborated
0055 029a 0863  |   c|		Declare_Subprogram	INIT_0860,For_Outer_Call,Visible,Unelaborated
0057 029a 08f3  |    |		Declare_Subprogram	INIT_08f0,For_Outer_Call,Visible,Unelaborated
0059 029a 0973  |   s|		Declare_Subprogram	INIT_0970,For_Outer_Call,Visible,Unelaborated
005b 029a 0a03  |    |		Declare_Subprogram	INIT_0a00,For_Outer_Call,Visible,Unelaborated
005d 029a 0a7b  |   {|		Declare_Subprogram	INIT_0a78,For_Outer_Call,Visible,Unelaborated
005f 029a 0acb  |    |		Declare_Subprogram	INIT_0ac8,For_Outer_Call,Visible,Unelaborated
0061 00bf       |    |		Action	Accept_Activation
0062 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0063 00c7       |    |		Action	Elaborate_Subprogram
0064 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0065 00c7       |    |		Action	Elaborate_Subprogram
0066 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0067 00c7       |    |		Action	Elaborate_Subprogram
0068 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0069 00c7       |    |		Action	Elaborate_Subprogram
006a 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
006b 00c7       |    |		Action	Elaborate_Subprogram
006c 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
006d 00c7       |    |		Action	Elaborate_Subprogram
006e 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
006f 00c7       |    |		Action	Elaborate_Subprogram
0070 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
0071 00c7       |    |		Action	Elaborate_Subprogram
0072 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0073 00c7       |    |		Action	Elaborate_Subprogram
0074 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
0075 00c7       |    |		Action	Elaborate_Subprogram
0076 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
0077 00c7       |    |		Action	Elaborate_Subprogram
0078 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
0079 00c7       |    |		Action	Elaborate_Subprogram
007a 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
007b 00c7       |    |		Action	Elaborate_Subprogram
007c 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
007d 00c7       |    |		Action	Elaborate_Subprogram
007e 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
007f 00c7       |    |		Action	Elaborate_Subprogram
0080 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
0081 00c7       |    |		Action	Elaborate_Subprogram
0082 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
0083 00c7       |    |		Action	Elaborate_Subprogram
0084 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
0085 00c7       |    |		Action	Elaborate_Subprogram
0086 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
0087 00c7       |    |		Action	Elaborate_Subprogram
0088 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
0089 00c7       |    |		Action	Elaborate_Subprogram
008a 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
008b 00c7       |    |		Action	Elaborate_Subprogram
008c 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22
008d 00c7       |    |		Action	Elaborate_Subprogram
008e 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
008f 00c7       |    |		Action	Elaborate_Subprogram
0090 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
0091 00c7       |    |		Action	Elaborate_Subprogram
0092 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25
0093 00c7       |    |		Action	Elaborate_Subprogram
0094 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26
0095 00c7       |    |		Action	Elaborate_Subprogram
0096 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
0097 00c7       |    |		Action	Elaborate_Subprogram
0098 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
0099 00c7       |    |		Action	Elaborate_Subprogram
009a 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29
009b 00c7       |    |		Action	Elaborate_Subprogram
009c 1d2a       | *  |		Execute_Immediate	Reference_Lex_1,0x2a
009d 00c7       |    |		Action	Elaborate_Subprogram
009e 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b
009f 00c7       |    |		Action	Elaborate_Subprogram
00a0 1d2c       | ,  |		Execute_Immediate	Reference_Lex_1,0x2c
00a1 00c7       |    |		Action	Elaborate_Subprogram
00a2 1d2d       | -  |		Execute_Immediate	Reference_Lex_1,0x2d
00a3 00c7       |    |		Action	Elaborate_Subprogram
00a4 1d2e       | .  |		Execute_Immediate	Reference_Lex_1,0x2e
00a5 00c7       |    |		Action	Elaborate_Subprogram
00a6 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f
00a7 00c7       |    |		Action	Elaborate_Subprogram
00a8 1d30       | 0  |		Execute_Immediate	Reference_Lex_1,0x30
00a9 00c7       |    |		Action	Elaborate_Subprogram
00aa 1d31       | 1  |		Execute_Immediate	Reference_Lex_1,0x31
00ab 00c7       |    |		Action	Elaborate_Subprogram
00ac 1d32       | 2  |		Execute_Immediate	Reference_Lex_1,0x32
00ad 00c7       |    |		Action	Elaborate_Subprogram
00ae 1d33       | 3  |		Execute_Immediate	Reference_Lex_1,0x33
00af 00c7       |    |		Action	Elaborate_Subprogram
00b0 1d34       | 4  |		Execute_Immediate	Reference_Lex_1,0x34
00b1 00c7       |    |		Action	Elaborate_Subprogram
00b2 1d35       | 5  |		Execute_Immediate	Reference_Lex_1,0x35
00b3 00c7       |    |		Action	Elaborate_Subprogram
00b4 1d36       | 6  |		Execute_Immediate	Reference_Lex_1,0x36
00b5 00c7       |    |		Action	Elaborate_Subprogram
00b6 1d37       | 7  |		Execute_Immediate	Reference_Lex_1,0x37
00b7 00c7       |    |		Action	Elaborate_Subprogram
00b8			BODY_0008:
00b8 00bc       |    |		Action	Signal_Activated
00b9 00bb       |    |		Action	Signal_Completion
00ba 0000 0000  |    |		.BLANK	0000[0x6]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c7       |    |		.CONST	0x00c7								; Address of begin
00c1 0004       |    |		.CONST	0x0004								; Address of exception handler
00c2 0002       |    |		.CONST	0x0002								; Number of locals
00c3			INIT_00c0:
00c3 00da       |    |		Load_Top	At_Offset_2
00c4 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00c5 e002       |    |		Load	0x0,0x2
00c6 03f1       |    |		Declare_Variable	Discrete,With_Value
00c7			BODY_00c0:
00c7 00d8       |    |		Load_Top	At_Offset_0
00c8 e5fe       |    |		Load	0x2,-0x2
00c9 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00ca 027d       | }  |		Execute	Discrete,Greater
00cb 6803       |h   |		Jump_Zero	0xcf
00cc e5fe       |    |		Load	0x2,-0x2
00cd 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00ce 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
00cf 4801       |H   |		Short_Literal	0x1
00d0 00d9       |    |		Load_Top	At_Offset_1
00d1 e5ff       |    |		Load	0x2,-0x1
00d2 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00d3 01cf       |    |		Execute	Vector,Slice_Read
00d4 4801       |H   |		Short_Literal	0x1
00d5 00da       |    |		Load_Top	At_Offset_2
00d6 e5fe       |    |		Load	0x2,-0x2
00d7 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00d8 01ce       |    |		Execute	Vector,Slice_Write
00d9 00d8       |    |		Load_Top	At_Offset_0
00da e5fe       |    |		Load	0x2,-0x2
00db 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
00dc 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00dd 0000 0000  |    |		.XXX[0x3]
00df 0000       |    |
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e8       |    |		.CONST	0x00e8								; Address of begin
00e1 0004       |    |		.CONST	0x0004								; Address of exception handler
00e2 0002       |    |		.CONST	0x0002								; Number of locals
00e3			INIT_00e0:
00e3 00da       |    |		Load_Top	At_Offset_2
00e4 0227       | '  |		Execute	Access,All_Reference
00e5 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00e6 e002       |    |		Load	0x0,0x2
00e7 03f1       |    |		Declare_Variable	Discrete,With_Value
00e8			BODY_00e0:
00e8 00d8       |    |		Load_Top	At_Offset_0
00e9 e5fe       |    |		Load	0x2,-0x2
00ea 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00eb 027d       | }  |		Execute	Discrete,Greater
00ec 6803       |h   |		Jump_Zero	0xf0
00ed e5fe       |    |		Load	0x2,-0x2
00ee 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00ef 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
00f0 4801       |H   |		Short_Literal	0x1
00f1 00d9       |    |		Load_Top	At_Offset_1
00f2 e5ff       |    |		Load	0x2,-0x1
00f3 0227       | '  |		Execute	Access,All_Reference
00f4 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00f5 01cf       |    |		Execute	Vector,Slice_Read
00f6 4801       |H   |		Short_Literal	0x1
00f7 00da       |    |		Load_Top	At_Offset_2
00f8 e5fe       |    |		Load	0x2,-0x2
00f9 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00fa 01ce       |    |		Execute	Vector,Slice_Write
00fb 00d8       |    |		Load_Top	At_Offset_0
00fc e5fe       |    |		Load	0x2,-0x2
00fd 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
00fe 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00ff 0000       |    |		.XXX[0x1]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0107       |    |		.CONST	0x0107								; Address of begin
0101 0004       |    |		.CONST	0x0004								; Address of exception handler
0102 0002       |    |		.CONST	0x0002								; Number of locals
0103			INIT_0100:
0103 00da       |    |		Load_Top	At_Offset_2
0104 01db       |    |		Execute	Vector,Length
0105 e002       |    |		Load	0x0,0x2
0106 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0107			BODY_0100:
0107 00d8       |    |		Load_Top	At_Offset_0
0108 e5fe       |    |		Load	0x2,-0x2
0109 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
010a 027d       | }  |		Execute	Discrete,Greater
010b 6803       |h   |		Jump_Zero	0x10f
010c e5fe       |    |		Load	0x2,-0x2
010d 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
010e 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
010f 00db       |    |		Load_Top	At_Offset_3
0110 01dd       |    |		Execute	Vector,First
0111 e5ff       |    |		Load	0x2,-0x1
0112 01dd       |    |		Execute	Vector,First
0113 00da       |    |		Load_Top	At_Offset_2
0114 0273       | s  |		Execute	Discrete,Plus
0115 0aff       |    |		Execute_Immediate	Plus,-0x1
0116 e5ff       |    |		Load	0x2,-0x1
0117 01cf       |    |		Execute	Vector,Slice_Read
0118 4801       |H   |		Short_Literal	0x1
0119 00da       |    |		Load_Top	At_Offset_2
011a e5fe       |    |		Load	0x2,-0x2
011b 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
011c 01ce       |    |		Execute	Vector,Slice_Write
011d 00d8       |    |		Load_Top	At_Offset_0
011e e5fe       |    |		Load	0x2,-0x2
011f 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0120 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0121 0000 0000  |    |		.BLANK	0000[0x7]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b       | +  |		.CONST	0x012b								; Address of begin
0129 0004       |    |		.CONST	0x0004								; Address of exception handler
012a 0001       |    |		.CONST	0x0001								; Number of locals
012b			BODY_0128:
012b			INIT_0128:
012b 00db       |    |		Load_Top	At_Offset_3
012c 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
012d 0d01       |    |		Execute_Immediate	Less,0x1
012e 6801       |h   |		Jump_Zero	0x130
012f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0130 00da       |    |		Load_Top	At_Offset_2
0131 4801       |H   |		Short_Literal	0x1
0132 e5fe       |    |		Load	0x2,-0x2
0133 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0134 01d6       |    |		Execute	Vector,Field_Write
0135 4801       |H   |		Short_Literal	0x1
0136 e5fe       |    |		Load	0x2,-0x2
0137 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0138 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0139 0000 0000  |    |		.BLANK	0000[0x7]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0143       | C  |		.CONST	0x0143								; Address of begin
0141 0004       |    |		.CONST	0x0004								; Address of exception handler
0142 0001       |    |		.CONST	0x0001								; Number of locals
0143			BODY_0140:
0143			INIT_0140:
0143 e5fd       |    |		Load	0x2,-0x3
0144 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0145 e5fe       |    |		Load	0x2,-0x2
0146 027c       | |  |		Execute	Discrete,Less
0147 6818       |h   |		Jump_Zero	0x160
0148 e5fd       |    |		Load	0x2,-0x3
0149 00d8       |    |		Load_Top	At_Offset_0
014a 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
014b 00d8       |    |		Load_Top	At_Offset_0
014c 0335       | 5  |		Declare_Variable	Array,Duplicate
014d 00cd       |    |		Action	Spare6_Action
014e 00d9       |    |		Load_Top	At_Offset_1
014f 01d9       |    |		Execute	Vector,Reverse_Bounds
0150 0263       | c  |		Execute	Discrete,Above_Bound
0151 7005       |p   |		Jump_Nonzero	0x157
0152 e5ff       |    |		Load	0x2,-0x1
0153 00d9       |    |		Load_Top	At_Offset_1
0154 e404       |    |		Load	0x2,0x4
0155 01d6       |    |		Execute	Vector,Field_Write
0156 3ffb       |?   |		Loop_Increasing	0x152
0157 00cd       |    |		Action	Spare6_Action
0158 00d9       |    |		Load_Top	At_Offset_1
0159 2903       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
015a 00d1       |    |		Pop_Control	Pop_Count_1
015b e5fd       |    |		Load	0x2,-0x3
015c 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
015d e5fd       |    |		Load	0x2,-0x3
015e 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
015f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0160 e5fd       |    |		Load	0x2,-0x3
0161 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0162 4801       |H   |		Short_Literal	0x1
0163 e5fe       |    |		Load	0x2,-0x2
0164 00d9       |    |		Load_Top	At_Offset_1
0165 00d9       |    |		Load_Top	At_Offset_1
0166 e402       |    |		Load	0x2,0x2
0167 035b       | [  |		Declare_Type	Array,Constrained
0168 00db       |    |		Load_Top	At_Offset_3
0169 01cd       |    |		Execute	Vector,Slice_Reference
016a 00d8       |    |		Load_Top	At_Offset_0
016b 0335       | 5  |		Declare_Variable	Array,Duplicate
016c 00cd       |    |		Action	Spare6_Action
016d 00d9       |    |		Load_Top	At_Offset_1
016e 01d9       |    |		Execute	Vector,Reverse_Bounds
016f 0263       | c  |		Execute	Discrete,Above_Bound
0170 7005       |p   |		Jump_Nonzero	0x176
0171 e5ff       |    |		Load	0x2,-0x1
0172 00d9       |    |		Load_Top	At_Offset_1
0173 e406       |    |		Load	0x2,0x6
0174 01d6       |    |		Execute	Vector,Field_Write
0175 3ffb       |?   |		Loop_Increasing	0x171
0176 00cd       |    |		Action	Spare6_Action
0177 00da       |    |		Load_Top	At_Offset_2
0178 00da       |    |		Load_Top	At_Offset_2
0179 e402       |    |		Load	0x2,0x2
017a 01ce       |    |		Execute	Vector,Slice_Write
017b 00d3       |    |		Pop_Control	Pop_Count_3
017c 00db       |    |		Load_Top	At_Offset_3
017d e5fd       |    |		Load	0x2,-0x3
017e 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
017f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0187       |    |		.CONST	0x0187								; Address of begin
0181 0004       |    |		.CONST	0x0004								; Address of exception handler
0182 0002       |    |		.CONST	0x0002								; Number of locals
0183			INIT_0180:
0183 00db       |    |		Load_Top	At_Offset_3
0184 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0185 e002       |    |		Load	0x0,0x2
0186 03f1       |    |		Declare_Variable	Discrete,With_Value
0187			BODY_0180:
0187 00d8       |    |		Load_Top	At_Offset_0
0188 e5ff       |    |		Load	0x2,-0x1
0189 0227       | '  |		Execute	Access,All_Reference
018a 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
018b 027d       | }  |		Execute	Discrete,Greater
018c 6804       |h   |		Jump_Zero	0x191
018d 00db       |    |		Load_Top	At_Offset_3
018e 0227       | '  |		Execute	Access,All_Reference
018f 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0190 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0191 4801       |H   |		Short_Literal	0x1
0192 00d9       |    |		Load_Top	At_Offset_1
0193 e5fe       |    |		Load	0x2,-0x2
0194 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0195 01cf       |    |		Execute	Vector,Slice_Read
0196 4801       |H   |		Short_Literal	0x1
0197 00da       |    |		Load_Top	At_Offset_2
0198 e5ff       |    |		Load	0x2,-0x1
0199 0229       | )  |		Execute	Access,All_Read
019a 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
019b 01ce       |    |		Execute	Vector,Slice_Write
019c 00d8       |    |		Load_Top	At_Offset_0
019d e5ff       |    |		Load	0x2,-0x1
019e 0227       | '  |		Execute	Access,All_Reference
019f 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01a0 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01a1 0000 0000  |    |		.BLANK	0000[0x7]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01b0       |    |		.CONST	0x01b0								; Address of begin
01a9 0004       |    |		.CONST	0x0004								; Address of exception handler
01aa 0002       |    |		.CONST	0x0002								; Number of locals
01ab			INIT_01a8:
01ab 00db       |    |		Load_Top	At_Offset_3
01ac 0227       | '  |		Execute	Access,All_Reference
01ad 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01ae e002       |    |		Load	0x0,0x2
01af 03f1       |    |		Declare_Variable	Discrete,With_Value
01b0			BODY_01a8:
01b0 00d8       |    |		Load_Top	At_Offset_0
01b1 e5ff       |    |		Load	0x2,-0x1
01b2 0227       | '  |		Execute	Access,All_Reference
01b3 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
01b4 027d       | }  |		Execute	Discrete,Greater
01b5 6804       |h   |		Jump_Zero	0x1ba
01b6 00db       |    |		Load_Top	At_Offset_3
01b7 0227       | '  |		Execute	Access,All_Reference
01b8 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
01b9 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
01ba 4801       |H   |		Short_Literal	0x1
01bb 00d9       |    |		Load_Top	At_Offset_1
01bc e5fe       |    |		Load	0x2,-0x2
01bd 0227       | '  |		Execute	Access,All_Reference
01be 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01bf 01cf       |    |		Execute	Vector,Slice_Read
01c0 4801       |H   |		Short_Literal	0x1
01c1 00da       |    |		Load_Top	At_Offset_2
01c2 e5ff       |    |		Load	0x2,-0x1
01c3 0229       | )  |		Execute	Access,All_Read
01c4 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01c5 01ce       |    |		Execute	Vector,Slice_Write
01c6 00d8       |    |		Load_Top	At_Offset_0
01c7 e5ff       |    |		Load	0x2,-0x1
01c8 0227       | '  |		Execute	Access,All_Reference
01c9 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01ca 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01cb 0000 0000  |    |		.BLANK	0000[0x5]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d7       |    |		.CONST	0x01d7								; Address of begin
01d1 0004       |    |		.CONST	0x0004								; Address of exception handler
01d2 0002       |    |		.CONST	0x0002								; Number of locals
01d3			INIT_01d0:
01d3 00db       |    |		Load_Top	At_Offset_3
01d4 01db       |    |		Execute	Vector,Length
01d5 e002       |    |		Load	0x0,0x2
01d6 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
01d7			BODY_01d0:
01d7 00d8       |    |		Load_Top	At_Offset_0
01d8 e5ff       |    |		Load	0x2,-0x1
01d9 0227       | '  |		Execute	Access,All_Reference
01da 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
01db 027d       | }  |		Execute	Discrete,Greater
01dc 6804       |h   |		Jump_Zero	0x1e1
01dd 00db       |    |		Load_Top	At_Offset_3
01de 0227       | '  |		Execute	Access,All_Reference
01df 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
01e0 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
01e1 e5fe       |    |		Load	0x2,-0x2
01e2 01dd       |    |		Execute	Vector,First
01e3 e5fe       |    |		Load	0x2,-0x2
01e4 01dd       |    |		Execute	Vector,First
01e5 00da       |    |		Load_Top	At_Offset_2
01e6 0273       | s  |		Execute	Discrete,Plus
01e7 0aff       |    |		Execute_Immediate	Plus,-0x1
01e8 e5fe       |    |		Load	0x2,-0x2
01e9 01cf       |    |		Execute	Vector,Slice_Read
01ea 4801       |H   |		Short_Literal	0x1
01eb 00da       |    |		Load_Top	At_Offset_2
01ec e5ff       |    |		Load	0x2,-0x1
01ed 0229       | )  |		Execute	Access,All_Read
01ee 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01ef 01ce       |    |		Execute	Vector,Slice_Write
01f0 00d8       |    |		Load_Top	At_Offset_0
01f1 e5ff       |    |		Load	0x2,-0x1
01f2 0227       | '  |		Execute	Access,All_Reference
01f3 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01f4 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01f5 0000 0000  |    |		.XXX[0x3]
01f7 0000       |    |
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fb       |    |		.CONST	0x01fb								; Address of begin
01f9 0004       |    |		.CONST	0x0004								; Address of exception handler
01fa 0001       |    |		.CONST	0x0001								; Number of locals
01fb			BODY_01f8:
01fb			INIT_01f8:
01fb 00da       |    |		Load_Top	At_Offset_2
01fc 0227       | '  |		Execute	Access,All_Reference
01fd 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
01fe 0d01       |    |		Execute_Immediate	Less,0x1
01ff 6801       |h   |		Jump_Zero	0x201
0200 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0201 00db       |    |		Load_Top	At_Offset_3
0202 4801       |H   |		Short_Literal	0x1
0203 e5ff       |    |		Load	0x2,-0x1
0204 0227       | '  |		Execute	Access,All_Reference
0205 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0206 01d6       |    |		Execute	Vector,Field_Write
0207 4801       |H   |		Short_Literal	0x1
0208 00db       |    |		Load_Top	At_Offset_3
0209 0227       | '  |		Execute	Access,All_Reference
020a 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
020b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
020c 0000 0000  |    |		.BLANK	0000[0x4]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0213       |    |		.CONST	0x0213								; Address of begin
0211 0004       |    |		.CONST	0x0004								; Address of exception handler
0212 0001       |    |		.CONST	0x0001								; Number of locals
0213			BODY_0210:
0213			INIT_0210:
0213 00da       |    |		Load_Top	At_Offset_2
0214 0227       | '  |		Execute	Access,All_Reference
0215 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0216 e5fd       |    |		Load	0x2,-0x3
0217 027c       | |  |		Execute	Discrete,Less
0218 681b       |h   |		Jump_Zero	0x234
0219 00da       |    |		Load_Top	At_Offset_2
021a 0229       | )  |		Execute	Access,All_Read
021b 00d8       |    |		Load_Top	At_Offset_0
021c 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
021d 00d8       |    |		Load_Top	At_Offset_0
021e 0335       | 5  |		Declare_Variable	Array,Duplicate
021f 00cd       |    |		Action	Spare6_Action
0220 00d9       |    |		Load_Top	At_Offset_1
0221 01d9       |    |		Execute	Vector,Reverse_Bounds
0222 0263       | c  |		Execute	Discrete,Above_Bound
0223 7005       |p   |		Jump_Nonzero	0x229
0224 e5fe       |    |		Load	0x2,-0x2
0225 00d9       |    |		Load_Top	At_Offset_1
0226 e404       |    |		Load	0x2,0x4
0227 01d6       |    |		Execute	Vector,Field_Write
0228 3ffb       |?   |		Loop_Increasing	0x224
0229 00cd       |    |		Action	Spare6_Action
022a 00d9       |    |		Load_Top	At_Offset_1
022b 2903       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
022c 00d1       |    |		Pop_Control	Pop_Count_1
022d 00da       |    |		Load_Top	At_Offset_2
022e 0227       | '  |		Execute	Access,All_Reference
022f 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0230 00db       |    |		Load_Top	At_Offset_3
0231 0227       | '  |		Execute	Access,All_Reference
0232 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0233 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0234 00da       |    |		Load_Top	At_Offset_2
0235 0229       | )  |		Execute	Access,All_Read
0236 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0237 4801       |H   |		Short_Literal	0x1
0238 e5fd       |    |		Load	0x2,-0x3
0239 00d9       |    |		Load_Top	At_Offset_1
023a 00d9       |    |		Load_Top	At_Offset_1
023b e402       |    |		Load	0x2,0x2
023c 035b       | [  |		Declare_Type	Array,Constrained
023d 00db       |    |		Load_Top	At_Offset_3
023e 01cd       |    |		Execute	Vector,Slice_Reference
023f 00d8       |    |		Load_Top	At_Offset_0
0240 0335       | 5  |		Declare_Variable	Array,Duplicate
0241 00cd       |    |		Action	Spare6_Action
0242 00d9       |    |		Load_Top	At_Offset_1
0243 01d9       |    |		Execute	Vector,Reverse_Bounds
0244 0263       | c  |		Execute	Discrete,Above_Bound
0245 7005       |p   |		Jump_Nonzero	0x24b
0246 e5fe       |    |		Load	0x2,-0x2
0247 00d9       |    |		Load_Top	At_Offset_1
0248 e406       |    |		Load	0x2,0x6
0249 01d6       |    |		Execute	Vector,Field_Write
024a 3ffb       |?   |		Loop_Increasing	0x246
024b 00cd       |    |		Action	Spare6_Action
024c 00da       |    |		Load_Top	At_Offset_2
024d 00da       |    |		Load_Top	At_Offset_2
024e e402       |    |		Load	0x2,0x2
024f 01ce       |    |		Execute	Vector,Slice_Write
0250 00d3       |    |		Pop_Control	Pop_Count_3
0251 e5fd       |    |		Load	0x2,-0x3
0252 00db       |    |		Load_Top	At_Offset_3
0253 0227       | '  |		Execute	Access,All_Reference
0254 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0255 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0256 0000 0000  |    |		.XXX[0x2]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 0261       | a  |		.CONST	0x0261								; Address of begin
0259 0004       |    |		.CONST	0x0004								; Address of exception handler
025a 0003       |    |		.CONST	0x0003								; Number of locals
025b			INIT_0258:
025b e002       |    |		Load	0x0,0x2
025c 0007       |    |		Action	Break_Optional
025d 00db       |    |		Load_Top	At_Offset_3
025e 01db       |    |		Execute	Vector,Length
025f e002       |    |		Load	0x0,0x2
0260 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0261			BODY_0258:
0261 00d8       |    |		Load_Top	At_Offset_0
0262 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0263 e5fd       |    |		Load	0x2,-0x3
0264 0227       | '  |		Execute	Access,All_Reference
0265 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0266 00da       |    |		Load_Top	At_Offset_2
0267 027c       | |  |		Execute	Discrete,Less
0268 680f       |h   |		Jump_Zero	0x278
0269 00d9       |    |		Load_Top	At_Offset_1
026a e5fe       |    |		Load	0x2,-0x2
026b 0273       | s  |		Execute	Discrete,Plus
026c 0aff       |    |		Execute_Immediate	Plus,-0x1
026d 005a       | Z  |		Store_Top	Discrete,At_Offset_2
026e 00d9       |    |		Load_Top	At_Offset_1
026f 00da       |    |		Load_Top	At_Offset_2
0270 e5fe       |    |		Load	0x2,-0x2
0271 026f       | o  |		Execute	Discrete,Remainder
0272 0272       | r  |		Execute	Discrete,Minus
0273 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0274 e5fd       |    |		Load	0x2,-0x3
0275 00da       |    |		Load_Top	At_Offset_2
0276 8003       |    |		Call	0x0,0x3
0277 c5fd       |    |		Store	0x2,-0x3
0278 e5ff       |    |		Load	0x2,-0x1
0279 4801       |H   |		Short_Literal	0x1
027a 00da       |    |		Load_Top	At_Offset_2
027b e5fd       |    |		Load	0x2,-0x3
027c 0229       | )  |		Execute	Access,All_Read
027d 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
027e 01ce       |    |		Execute	Vector,Slice_Write
027f 00d8       |    |		Load_Top	At_Offset_0
0280 e5fd       |    |		Load	0x2,-0x3
0281 0227       | '  |		Execute	Access,All_Reference
0282 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0283 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0284 0000 0000  |    |		.BLANK	0000[0x4]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028d       |    |		.CONST	0x028d								; Address of begin
0289 0004       |    |		.CONST	0x0004								; Address of exception handler
028a 0002       |    |		.CONST	0x0002								; Number of locals
028b			INIT_0288:
028b e002       |    |		Load	0x0,0x2
028c 0007       |    |		Action	Break_Optional
028d			BODY_0288:
028d 00db       |    |		Load_Top	At_Offset_3
028e 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
028f 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0290 e5fd       |    |		Load	0x2,-0x3
0291 0227       | '  |		Execute	Access,All_Reference
0292 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0293 00d9       |    |		Load_Top	At_Offset_1
0294 027c       | |  |		Execute	Discrete,Less
0295 680f       |h   |		Jump_Zero	0x2a5
0296 00d8       |    |		Load_Top	At_Offset_0
0297 e5fe       |    |		Load	0x2,-0x2
0298 0273       | s  |		Execute	Discrete,Plus
0299 0aff       |    |		Execute_Immediate	Plus,-0x1
029a 0059       | Y  |		Store_Top	Discrete,At_Offset_1
029b 00d8       |    |		Load_Top	At_Offset_0
029c 00d9       |    |		Load_Top	At_Offset_1
029d e5fe       |    |		Load	0x2,-0x2
029e 026f       | o  |		Execute	Discrete,Remainder
029f 0272       | r  |		Execute	Discrete,Minus
02a0 0059       | Y  |		Store_Top	Discrete,At_Offset_1
02a1 e5fd       |    |		Load	0x2,-0x3
02a2 00d9       |    |		Load_Top	At_Offset_1
02a3 8003       |    |		Call	0x0,0x3
02a4 c5fd       |    |		Store	0x2,-0x3
02a5 4801       |H   |		Short_Literal	0x1
02a6 e5ff       |    |		Load	0x2,-0x1
02a7 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02a8 e5ff       |    |		Load	0x2,-0x1
02a9 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02aa 01cf       |    |		Execute	Vector,Slice_Read
02ab 4801       |H   |		Short_Literal	0x1
02ac e5ff       |    |		Load	0x2,-0x1
02ad 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02ae e5fd       |    |		Load	0x2,-0x3
02af 0229       | )  |		Execute	Access,All_Read
02b0 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02b1 01ce       |    |		Execute	Vector,Slice_Write
02b2 00db       |    |		Load_Top	At_Offset_3
02b3 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02b4 e5fd       |    |		Load	0x2,-0x3
02b5 0227       | '  |		Execute	Access,All_Reference
02b6 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
02b7 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bd       |    |		.CONST	0x02bd								; Address of begin
02b9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ba 0002       |    |		.CONST	0x0002								; Number of locals
02bb			INIT_02b8:
02bb e002       |    |		Load	0x0,0x2
02bc 0007       |    |		Action	Break_Optional
02bd			BODY_02b8:
02bd 00db       |    |		Load_Top	At_Offset_3
02be 0227       | '  |		Execute	Access,All_Reference
02bf 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02c0 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
02c1 e5fd       |    |		Load	0x2,-0x3
02c2 0227       | '  |		Execute	Access,All_Reference
02c3 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
02c4 00d9       |    |		Load_Top	At_Offset_1
02c5 027c       | |  |		Execute	Discrete,Less
02c6 680f       |h   |		Jump_Zero	0x2d6
02c7 00d8       |    |		Load_Top	At_Offset_0
02c8 e5fe       |    |		Load	0x2,-0x2
02c9 0273       | s  |		Execute	Discrete,Plus
02ca 0aff       |    |		Execute_Immediate	Plus,-0x1
02cb 0059       | Y  |		Store_Top	Discrete,At_Offset_1
02cc 00d8       |    |		Load_Top	At_Offset_0
02cd 00d9       |    |		Load_Top	At_Offset_1
02ce e5fe       |    |		Load	0x2,-0x2
02cf 026f       | o  |		Execute	Discrete,Remainder
02d0 0272       | r  |		Execute	Discrete,Minus
02d1 0059       | Y  |		Store_Top	Discrete,At_Offset_1
02d2 e5fd       |    |		Load	0x2,-0x3
02d3 00d9       |    |		Load_Top	At_Offset_1
02d4 8003       |    |		Call	0x0,0x3
02d5 c5fd       |    |		Store	0x2,-0x3
02d6 4801       |H   |		Short_Literal	0x1
02d7 e5ff       |    |		Load	0x2,-0x1
02d8 0227       | '  |		Execute	Access,All_Reference
02d9 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02da e5ff       |    |		Load	0x2,-0x1
02db 0227       | '  |		Execute	Access,All_Reference
02dc 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02dd 01cf       |    |		Execute	Vector,Slice_Read
02de 4801       |H   |		Short_Literal	0x1
02df e5ff       |    |		Load	0x2,-0x1
02e0 0227       | '  |		Execute	Access,All_Reference
02e1 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02e2 e5fd       |    |		Load	0x2,-0x3
02e3 0229       | )  |		Execute	Access,All_Read
02e4 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02e5 01ce       |    |		Execute	Vector,Slice_Write
02e6 00db       |    |		Load_Top	At_Offset_3
02e7 0227       | '  |		Execute	Access,All_Reference
02e8 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02e9 e5fd       |    |		Load	0x2,-0x3
02ea 0227       | '  |		Execute	Access,All_Reference
02eb 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
02ec 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02ed 0000 0000  |    |		.XXX[0x3]
02ef 0000       |    |
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 02fc       |    |		.CONST	0x02fc								; Address of begin
02f1 0004       |    |		.CONST	0x0004								; Address of exception handler
02f2 0003       |    |		.CONST	0x0003								; Number of locals
02f3			INIT_02f0:
02f3 e004       |    |		Load	0x0,0x4
02f4 00db       |    |		Load_Top	At_Offset_3
02f5 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02f6 8005       |    |		Call	0x0,0x5
02f7 0039       | 9  |		Store_Top	Access,At_Offset_1
02f8 00db       |    |		Load_Top	At_Offset_3
02f9 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02fa e002       |    |		Load	0x0,0x2
02fb 03f1       |    |		Declare_Variable	Discrete,With_Value
02fc			BODY_02f0:
02fc 00d9       |    |		Load_Top	At_Offset_1
02fd a5fe       |    |		Store_Unchecked	0x2,-0x2
02fe 4801       |H   |		Short_Literal	0x1
02ff 00d9       |    |		Load_Top	At_Offset_1
0300 e5ff       |    |		Load	0x2,-0x1
0301 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0302 01cf       |    |		Execute	Vector,Slice_Read
0303 4801       |H   |		Short_Literal	0x1
0304 00da       |    |		Load_Top	At_Offset_2
0305 e402       |    |		Load	0x2,0x2
0306 0229       | )  |		Execute	Access,All_Read
0307 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0308 01ce       |    |		Execute	Vector,Slice_Write
0309 00d8       |    |		Load_Top	At_Offset_0
030a 00da       |    |		Load_Top	At_Offset_2
030b 0227       | '  |		Execute	Access,All_Reference
030c 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
030d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
030e 0000 0000  |    |		.XXX[0x2]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 031e       |    |		.CONST	0x031e								; Address of begin
0311 0004       |    |		.CONST	0x0004								; Address of exception handler
0312 0003       |    |		.CONST	0x0003								; Number of locals
0313			INIT_0310:
0313 e004       |    |		Load	0x0,0x4
0314 00db       |    |		Load_Top	At_Offset_3
0315 0227       | '  |		Execute	Access,All_Reference
0316 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0317 8005       |    |		Call	0x0,0x5
0318 0039       | 9  |		Store_Top	Access,At_Offset_1
0319 00db       |    |		Load_Top	At_Offset_3
031a 0227       | '  |		Execute	Access,All_Reference
031b 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
031c e002       |    |		Load	0x0,0x2
031d 03f1       |    |		Declare_Variable	Discrete,With_Value
031e			BODY_0310:
031e 00d9       |    |		Load_Top	At_Offset_1
031f a5fe       |    |		Store_Unchecked	0x2,-0x2
0320 4801       |H   |		Short_Literal	0x1
0321 00d9       |    |		Load_Top	At_Offset_1
0322 e5ff       |    |		Load	0x2,-0x1
0323 0227       | '  |		Execute	Access,All_Reference
0324 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0325 01cf       |    |		Execute	Vector,Slice_Read
0326 4801       |H   |		Short_Literal	0x1
0327 00da       |    |		Load_Top	At_Offset_2
0328 e402       |    |		Load	0x2,0x2
0329 0229       | )  |		Execute	Access,All_Read
032a 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
032b 01ce       |    |		Execute	Vector,Slice_Write
032c 00d8       |    |		Load_Top	At_Offset_0
032d 00da       |    |		Load_Top	At_Offset_2
032e 0227       | '  |		Execute	Access,All_Reference
032f 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0330 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0331 0000 0000  |    |		.BLANK	0000[0x7]
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 0349       | I  |		.CONST	0x0349								; Address of begin
0339 0004       |    |		.CONST	0x0004								; Address of exception handler
033a 0003       |    |		.CONST	0x0003								; Number of locals
033b			INIT_0338:
033b e004       |    |		Load	0x0,0x4
033c 00db       |    |		Load_Top	At_Offset_3
033d 01db       |    |		Execute	Vector,Length
033e 00d8       |    |		Load_Top	At_Offset_0
033f e002       |    |		Load	0x0,0x2
0340 0260       | `  |		Execute	Discrete,In_Type
0341 7001       |p   |		Jump_Nonzero	0x343
0342 0801       |    |		Execute_Immediate	Raise,0x1
0343 8005       |    |		Call	0x0,0x5
0344 0039       | 9  |		Store_Top	Access,At_Offset_1
0345 00db       |    |		Load_Top	At_Offset_3
0346 01db       |    |		Execute	Vector,Length
0347 e002       |    |		Load	0x0,0x2
0348 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0349			BODY_0338:
0349 00d9       |    |		Load_Top	At_Offset_1
034a a5fe       |    |		Store_Unchecked	0x2,-0x2
034b e5ff       |    |		Load	0x2,-0x1
034c 01dd       |    |		Execute	Vector,First
034d e5ff       |    |		Load	0x2,-0x1
034e 01dd       |    |		Execute	Vector,First
034f 00da       |    |		Load_Top	At_Offset_2
0350 0273       | s  |		Execute	Discrete,Plus
0351 0aff       |    |		Execute_Immediate	Plus,-0x1
0352 e5ff       |    |		Load	0x2,-0x1
0353 01cf       |    |		Execute	Vector,Slice_Read
0354 4801       |H   |		Short_Literal	0x1
0355 00da       |    |		Load_Top	At_Offset_2
0356 e402       |    |		Load	0x2,0x2
0357 0229       | )  |		Execute	Access,All_Read
0358 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0359 01ce       |    |		Execute	Vector,Slice_Write
035a 00d8       |    |		Load_Top	At_Offset_0
035b 00da       |    |		Load_Top	At_Offset_2
035c 0227       | '  |		Execute	Access,All_Reference
035d 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
035e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
035f 0000       |    |		.XXX[0x1]
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 0367       | g  |		.CONST	0x0367								; Address of begin
0361 0004       |    |		.CONST	0x0004								; Address of exception handler
0362 0002       |    |		.CONST	0x0002								; Number of locals
0363			INIT_0360:
0363 e004       |    |		Load	0x0,0x4
0364 4801       |H   |		Short_Literal	0x1
0365 8005       |    |		Call	0x0,0x5
0366 0039       | 9  |		Store_Top	Access,At_Offset_1
0367			BODY_0360:
0367 00d8       |    |		Load_Top	At_Offset_0
0368 a5fe       |    |		Store_Unchecked	0x2,-0x2
0369 00db       |    |		Load_Top	At_Offset_3
036a 4801       |H   |		Short_Literal	0x1
036b 00da       |    |		Load_Top	At_Offset_2
036c 0227       | '  |		Execute	Access,All_Reference
036d 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
036e 01d6       |    |		Execute	Vector,Field_Write
036f 4801       |H   |		Short_Literal	0x1
0370 00d9       |    |		Load_Top	At_Offset_1
0371 0227       | '  |		Execute	Access,All_Reference
0372 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0373 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0374 0000 0000  |    |		.BLANK	0000[0x4]
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 037f       |    |		.CONST	0x037f								; Address of begin
0379 0004       |    |		.CONST	0x0004								; Address of exception handler
037a 0002       |    |		.CONST	0x0002								; Number of locals
037b			INIT_0378:
037b e004       |    |		Load	0x0,0x4
037c e5fe       |    |		Load	0x2,-0x2
037d 8005       |    |		Call	0x0,0x5
037e 0039       | 9  |		Store_Top	Access,At_Offset_1
037f			BODY_0378:
037f 00d8       |    |		Load_Top	At_Offset_0
0380 a5fd       |    |		Store_Unchecked	0x2,-0x3
0381 00d8       |    |		Load_Top	At_Offset_0
0382 0229       | )  |		Execute	Access,All_Read
0383 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0384 4801       |H   |		Short_Literal	0x1
0385 e5fe       |    |		Load	0x2,-0x2
0386 00d9       |    |		Load_Top	At_Offset_1
0387 00d9       |    |		Load_Top	At_Offset_1
0388 e403       |    |		Load	0x2,0x3
0389 035b       | [  |		Declare_Type	Array,Constrained
038a 00db       |    |		Load_Top	At_Offset_3
038b 01cd       |    |		Execute	Vector,Slice_Reference
038c 00d8       |    |		Load_Top	At_Offset_0
038d 0335       | 5  |		Declare_Variable	Array,Duplicate
038e 00cd       |    |		Action	Spare6_Action
038f 00d9       |    |		Load_Top	At_Offset_1
0390 01d9       |    |		Execute	Vector,Reverse_Bounds
0391 0263       | c  |		Execute	Discrete,Above_Bound
0392 7005       |p   |		Jump_Nonzero	0x398
0393 e5ff       |    |		Load	0x2,-0x1
0394 00d9       |    |		Load_Top	At_Offset_1
0395 e407       |    |		Load	0x2,0x7
0396 01d6       |    |		Execute	Vector,Field_Write
0397 3ffb       |?   |		Loop_Increasing	0x393
0398 00cd       |    |		Action	Spare6_Action
0399 00da       |    |		Load_Top	At_Offset_2
039a 00da       |    |		Load_Top	At_Offset_2
039b e403       |    |		Load	0x2,0x3
039c 01ce       |    |		Execute	Vector,Slice_Write
039d 00d3       |    |		Pop_Control	Pop_Count_3
039e e5fe       |    |		Load	0x2,-0x2
039f 00d9       |    |		Load_Top	At_Offset_1
03a0 0227       | '  |		Execute	Access,All_Reference
03a1 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
03a2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03a3 0000 0000  |    |		.BLANK	0000[0x5]
03a8 ; --------------------------------------------------------------------------------------
03a8 ; SUBPROGRAM
03a8 ; --------------------------------------------------------------------------------------
03a8 03b2       |    |		.CONST	0x03b2								; Address of begin
03a9 0004       |    |		.CONST	0x0004								; Address of exception handler
03aa 0002       |    |		.CONST	0x0002								; Number of locals
03ab			INIT_03a8:
03ab 00db       |    |		Load_Top	At_Offset_3
03ac 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
03ad e5fe       |    |		Load	0x2,-0x2
03ae 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03af 0272       | r  |		Execute	Discrete,Minus
03b0 e002       |    |		Load	0x0,0x2
03b1 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
03b2			BODY_03a8:
03b2 00d8       |    |		Load_Top	At_Offset_0
03b3 e5ff       |    |		Load	0x2,-0x1
03b4 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03b5 027d       | }  |		Execute	Discrete,Greater
03b6 6803       |h   |		Jump_Zero	0x3ba
03b7 00db       |    |		Load_Top	At_Offset_3
03b8 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03b9 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
03ba 4801       |H   |		Short_Literal	0x1
03bb 00d9       |    |		Load_Top	At_Offset_1
03bc e5ff       |    |		Load	0x2,-0x1
03bd 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03be 01cf       |    |		Execute	Vector,Slice_Read
03bf e5fe       |    |		Load	0x2,-0x2
03c0 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03c1 0a01       |    |		Execute_Immediate	Plus,0x1
03c2 e5fe       |    |		Load	0x2,-0x2
03c3 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03c4 00db       |    |		Load_Top	At_Offset_3
03c5 0273       | s  |		Execute	Discrete,Plus
03c6 e5fe       |    |		Load	0x2,-0x2
03c7 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03c8 01ce       |    |		Execute	Vector,Slice_Write
03c9 e5fe       |    |		Load	0x2,-0x2
03ca 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03cb 00d9       |    |		Load_Top	At_Offset_1
03cc 0273       | s  |		Execute	Discrete,Plus
03cd e5fe       |    |		Load	0x2,-0x2
03ce 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
03cf 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03da       |    |		.CONST	0x03da								; Address of begin
03d1 0004       |    |		.CONST	0x0004								; Address of exception handler
03d2 0002       |    |		.CONST	0x0002								; Number of locals
03d3			INIT_03d0:
03d3 00db       |    |		Load_Top	At_Offset_3
03d4 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
03d5 e5fe       |    |		Load	0x2,-0x2
03d6 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03d7 0272       | r  |		Execute	Discrete,Minus
03d8 e002       |    |		Load	0x0,0x2
03d9 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
03da			BODY_03d0:
03da 00d8       |    |		Load_Top	At_Offset_0
03db e5ff       |    |		Load	0x2,-0x1
03dc 0227       | '  |		Execute	Access,All_Reference
03dd 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03de 027d       | }  |		Execute	Discrete,Greater
03df 6804       |h   |		Jump_Zero	0x3e4
03e0 00db       |    |		Load_Top	At_Offset_3
03e1 0227       | '  |		Execute	Access,All_Reference
03e2 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03e3 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
03e4 4801       |H   |		Short_Literal	0x1
03e5 00d9       |    |		Load_Top	At_Offset_1
03e6 e5ff       |    |		Load	0x2,-0x1
03e7 0227       | '  |		Execute	Access,All_Reference
03e8 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03e9 01cf       |    |		Execute	Vector,Slice_Read
03ea e5fe       |    |		Load	0x2,-0x2
03eb 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03ec 0a01       |    |		Execute_Immediate	Plus,0x1
03ed e5fe       |    |		Load	0x2,-0x2
03ee 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03ef 00db       |    |		Load_Top	At_Offset_3
03f0 0273       | s  |		Execute	Discrete,Plus
03f1 e5fe       |    |		Load	0x2,-0x2
03f2 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03f3 01ce       |    |		Execute	Vector,Slice_Write
03f4 e5fe       |    |		Load	0x2,-0x2
03f5 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03f6 00d9       |    |		Load_Top	At_Offset_1
03f7 0273       | s  |		Execute	Discrete,Plus
03f8 e5fe       |    |		Load	0x2,-0x2
03f9 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
03fa 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03fb 0000 0000  |    |		.BLANK	0000[0x5]
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 040a       |    |		.CONST	0x040a								; Address of begin
0401 0004       |    |		.CONST	0x0004								; Address of exception handler
0402 0002       |    |		.CONST	0x0002								; Number of locals
0403			INIT_0400:
0403 00db       |    |		Load_Top	At_Offset_3
0404 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0405 e5fe       |    |		Load	0x2,-0x2
0406 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0407 0272       | r  |		Execute	Discrete,Minus
0408 e002       |    |		Load	0x0,0x2
0409 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
040a			BODY_0400:
040a 00d8       |    |		Load_Top	At_Offset_0
040b e5ff       |    |		Load	0x2,-0x1
040c 01db       |    |		Execute	Vector,Length
040d 027d       | }  |		Execute	Discrete,Greater
040e 6803       |h   |		Jump_Zero	0x412
040f 00db       |    |		Load_Top	At_Offset_3
0410 01db       |    |		Execute	Vector,Length
0411 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0412 00db       |    |		Load_Top	At_Offset_3
0413 01dd       |    |		Execute	Vector,First
0414 e5ff       |    |		Load	0x2,-0x1
0415 01dd       |    |		Execute	Vector,First
0416 00da       |    |		Load_Top	At_Offset_2
0417 0273       | s  |		Execute	Discrete,Plus
0418 0aff       |    |		Execute_Immediate	Plus,-0x1
0419 e5ff       |    |		Load	0x2,-0x1
041a 01cf       |    |		Execute	Vector,Slice_Read
041b e5fe       |    |		Load	0x2,-0x2
041c 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
041d 0a01       |    |		Execute_Immediate	Plus,0x1
041e e5fe       |    |		Load	0x2,-0x2
041f 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0420 00db       |    |		Load_Top	At_Offset_3
0421 0273       | s  |		Execute	Discrete,Plus
0422 e5fe       |    |		Load	0x2,-0x2
0423 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0424 01ce       |    |		Execute	Vector,Slice_Write
0425 e5fe       |    |		Load	0x2,-0x2
0426 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0427 00d9       |    |		Load_Top	At_Offset_1
0428 0273       | s  |		Execute	Discrete,Plus
0429 e5fe       |    |		Load	0x2,-0x2
042a 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
042b 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
042c 0000 0000  |    |		.BLANK	0000[0x4]
0430 ; --------------------------------------------------------------------------------------
0430 ; SUBPROGRAM
0430 ; --------------------------------------------------------------------------------------
0430 043a       | :  |		.CONST	0x043a								; 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 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0435 e5fe       |    |		Load	0x2,-0x2
0436 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0437 0272       | r  |		Execute	Discrete,Minus
0438 e002       |    |		Load	0x0,0x2
0439 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
043a			BODY_0430:
043a 00d8       |    |		Load_Top	At_Offset_0
043b 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
043c 680c       |h   |		Jump_Zero	0x449
043d 00db       |    |		Load_Top	At_Offset_3
043e e5fe       |    |		Load	0x2,-0x2
043f 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0440 0a01       |    |		Execute_Immediate	Plus,0x1
0441 e5fe       |    |		Load	0x2,-0x2
0442 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0443 01d6       |    |		Execute	Vector,Field_Write
0444 e5fe       |    |		Load	0x2,-0x2
0445 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0446 0a01       |    |		Execute_Immediate	Plus,0x1
0447 e5fe       |    |		Load	0x2,-0x2
0448 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0449 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
044a 0000 0000  |    |		.BLANK	0000[0x6]
0450 ; --------------------------------------------------------------------------------------
0450 ; SUBPROGRAM
0450 ; --------------------------------------------------------------------------------------
0450 045a       | Z  |		.CONST	0x045a								; Address of begin
0451 0004       |    |		.CONST	0x0004								; Address of exception handler
0452 0002       |    |		.CONST	0x0002								; Number of locals
0453			INIT_0450:
0453 e5fd       |    |		Load	0x2,-0x3
0454 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0455 e5fd       |    |		Load	0x2,-0x3
0456 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0457 0272       | r  |		Execute	Discrete,Minus
0458 e002       |    |		Load	0x0,0x2
0459 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
045a			BODY_0450:
045a 00d8       |    |		Load_Top	At_Offset_0
045b e5fe       |    |		Load	0x2,-0x2
045c 027d       | }  |		Execute	Discrete,Greater
045d 6802       |h   |		Jump_Zero	0x460
045e e5fe       |    |		Load	0x2,-0x2
045f 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0460 e5fd       |    |		Load	0x2,-0x3
0461 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0462 e5fd       |    |		Load	0x2,-0x3
0463 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0464 0a01       |    |		Execute_Immediate	Plus,0x1
0465 e5fd       |    |		Load	0x2,-0x3
0466 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0467 00db       |    |		Load_Top	At_Offset_3
0468 0273       | s  |		Execute	Discrete,Plus
0469 00d9       |    |		Load_Top	At_Offset_1
046a 00d9       |    |		Load_Top	At_Offset_1
046b e403       |    |		Load	0x2,0x3
046c 035b       | [  |		Declare_Type	Array,Constrained
046d 00db       |    |		Load_Top	At_Offset_3
046e 01cd       |    |		Execute	Vector,Slice_Reference
046f 00d8       |    |		Load_Top	At_Offset_0
0470 0335       | 5  |		Declare_Variable	Array,Duplicate
0471 00cd       |    |		Action	Spare6_Action
0472 00d9       |    |		Load_Top	At_Offset_1
0473 01d9       |    |		Execute	Vector,Reverse_Bounds
0474 0263       | c  |		Execute	Discrete,Above_Bound
0475 7005       |p   |		Jump_Nonzero	0x47b
0476 e5ff       |    |		Load	0x2,-0x1
0477 00d9       |    |		Load_Top	At_Offset_1
0478 e407       |    |		Load	0x2,0x7
0479 01d6       |    |		Execute	Vector,Field_Write
047a 3ffb       |?   |		Loop_Increasing	0x476
047b 00cd       |    |		Action	Spare6_Action
047c 00da       |    |		Load_Top	At_Offset_2
047d 00da       |    |		Load_Top	At_Offset_2
047e e403       |    |		Load	0x2,0x3
047f 01ce       |    |		Execute	Vector,Slice_Write
0480 00d3       |    |		Pop_Control	Pop_Count_3
0481 e5fd       |    |		Load	0x2,-0x3
0482 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0483 e5fe       |    |		Load	0x2,-0x2
0484 0273       | s  |		Execute	Discrete,Plus
0485 e5fd       |    |		Load	0x2,-0x3
0486 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0487 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0488 ; --------------------------------------------------------------------------------------
0488 ; SUBPROGRAM
0488 ; --------------------------------------------------------------------------------------
0488 0494       |    |		.CONST	0x0494								; Address of begin
0489 0004       |    |		.CONST	0x0004								; Address of exception handler
048a 0002       |    |		.CONST	0x0002								; Number of locals
048b			INIT_0488:
048b 00da       |    |		Load_Top	At_Offset_2
048c 0227       | '  |		Execute	Access,All_Reference
048d 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
048e 00db       |    |		Load_Top	At_Offset_3
048f 0227       | '  |		Execute	Access,All_Reference
0490 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0491 0272       | r  |		Execute	Discrete,Minus
0492 e002       |    |		Load	0x0,0x2
0493 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0494			BODY_0488:
0494 00d8       |    |		Load_Top	At_Offset_0
0495 e5fe       |    |		Load	0x2,-0x2
0496 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0497 027d       | }  |		Execute	Discrete,Greater
0498 6803       |h   |		Jump_Zero	0x49c
0499 e5fe       |    |		Load	0x2,-0x2
049a 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
049b 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
049c 4801       |H   |		Short_Literal	0x1
049d 00d9       |    |		Load_Top	At_Offset_1
049e e5fe       |    |		Load	0x2,-0x2
049f 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
04a0 01cf       |    |		Execute	Vector,Slice_Read
04a1 e5ff       |    |		Load	0x2,-0x1
04a2 0227       | '  |		Execute	Access,All_Reference
04a3 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
04a4 0a01       |    |		Execute_Immediate	Plus,0x1
04a5 e5ff       |    |		Load	0x2,-0x1
04a6 0227       | '  |		Execute	Access,All_Reference
04a7 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
04a8 00db       |    |		Load_Top	At_Offset_3
04a9 0273       | s  |		Execute	Discrete,Plus
04aa e5ff       |    |		Load	0x2,-0x1
04ab 0229       | )  |		Execute	Access,All_Read
04ac 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
04ad 01ce       |    |		Execute	Vector,Slice_Write
04ae 00db       |    |		Load_Top	At_Offset_3
04af 0227       | '  |		Execute	Access,All_Reference
04b0 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
04b1 00d9       |    |		Load_Top	At_Offset_1
04b2 0273       | s  |		Execute	Discrete,Plus
04b3 e5ff       |    |		Load	0x2,-0x1
04b4 0227       | '  |		Execute	Access,All_Reference
04b5 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
04b6 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04b7 0000       |    |		.XXX[0x1]
04b8 ; --------------------------------------------------------------------------------------
04b8 ; SUBPROGRAM
04b8 ; --------------------------------------------------------------------------------------
04b8 04c4       |    |		.CONST	0x04c4								; Address of begin
04b9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ba 0002       |    |		.CONST	0x0002								; Number of locals
04bb			INIT_04b8:
04bb 00da       |    |		Load_Top	At_Offset_2
04bc 0227       | '  |		Execute	Access,All_Reference
04bd 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
04be 00db       |    |		Load_Top	At_Offset_3
04bf 0227       | '  |		Execute	Access,All_Reference
04c0 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
04c1 0272       | r  |		Execute	Discrete,Minus
04c2 e002       |    |		Load	0x0,0x2
04c3 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
04c4			BODY_04b8:
04c4 00d8       |    |		Load_Top	At_Offset_0
04c5 e5fe       |    |		Load	0x2,-0x2
04c6 0227       | '  |		Execute	Access,All_Reference
04c7 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
04c8 027d       | }  |		Execute	Discrete,Greater
04c9 6804       |h   |		Jump_Zero	0x4ce
04ca e5fe       |    |		Load	0x2,-0x2
04cb 0227       | '  |		Execute	Access,All_Reference
04cc 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
04cd 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
04ce 4801       |H   |		Short_Literal	0x1
04cf 00d9       |    |		Load_Top	At_Offset_1
04d0 e5fe       |    |		Load	0x2,-0x2
04d1 0227       | '  |		Execute	Access,All_Reference
04d2 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
04d3 01cf       |    |		Execute	Vector,Slice_Read
04d4 e5ff       |    |		Load	0x2,-0x1
04d5 0227       | '  |		Execute	Access,All_Reference
04d6 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
04d7 0a01       |    |		Execute_Immediate	Plus,0x1
04d8 e5ff       |    |		Load	0x2,-0x1
04d9 0227       | '  |		Execute	Access,All_Reference
04da 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
04db 00db       |    |		Load_Top	At_Offset_3
04dc 0273       | s  |		Execute	Discrete,Plus
04dd e5ff       |    |		Load	0x2,-0x1
04de 0229       | )  |		Execute	Access,All_Read
04df 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
04e0 01ce       |    |		Execute	Vector,Slice_Write
04e1 00db       |    |		Load_Top	At_Offset_3
04e2 0227       | '  |		Execute	Access,All_Reference
04e3 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
04e4 00d9       |    |		Load_Top	At_Offset_1
04e5 0273       | s  |		Execute	Discrete,Plus
04e6 e5ff       |    |		Load	0x2,-0x1
04e7 0227       | '  |		Execute	Access,All_Reference
04e8 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
04e9 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04ea 0000 0000  |    |		.BLANK	0000[0x6]
04f0 ; --------------------------------------------------------------------------------------
04f0 ; SUBPROGRAM
04f0 ; --------------------------------------------------------------------------------------
04f0 04fc       |    |		.CONST	0x04fc								; Address of begin
04f1 0004       |    |		.CONST	0x0004								; Address of exception handler
04f2 0002       |    |		.CONST	0x0002								; Number of locals
04f3			INIT_04f0:
04f3 00da       |    |		Load_Top	At_Offset_2
04f4 0227       | '  |		Execute	Access,All_Reference
04f5 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
04f6 00db       |    |		Load_Top	At_Offset_3
04f7 0227       | '  |		Execute	Access,All_Reference
04f8 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
04f9 0272       | r  |		Execute	Discrete,Minus
04fa e002       |    |		Load	0x0,0x2
04fb 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
04fc			BODY_04f0:
04fc 00d8       |    |		Load_Top	At_Offset_0
04fd e5fe       |    |		Load	0x2,-0x2
04fe 01db       |    |		Execute	Vector,Length
04ff 027d       | }  |		Execute	Discrete,Greater
0500 6803       |h   |		Jump_Zero	0x504
0501 e5fe       |    |		Load	0x2,-0x2
0502 01db       |    |		Execute	Vector,Length
0503 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0504 e5fe       |    |		Load	0x2,-0x2
0505 01dd       |    |		Execute	Vector,First
0506 e5fe       |    |		Load	0x2,-0x2
0507 01dd       |    |		Execute	Vector,First
0508 00da       |    |		Load_Top	At_Offset_2
0509 0273       | s  |		Execute	Discrete,Plus
050a 0aff       |    |		Execute_Immediate	Plus,-0x1
050b e5fe       |    |		Load	0x2,-0x2
050c 01cf       |    |		Execute	Vector,Slice_Read
050d e5ff       |    |		Load	0x2,-0x1
050e 0227       | '  |		Execute	Access,All_Reference
050f 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0510 0a01       |    |		Execute_Immediate	Plus,0x1
0511 e5ff       |    |		Load	0x2,-0x1
0512 0227       | '  |		Execute	Access,All_Reference
0513 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0514 00db       |    |		Load_Top	At_Offset_3
0515 0273       | s  |		Execute	Discrete,Plus
0516 e5ff       |    |		Load	0x2,-0x1
0517 0229       | )  |		Execute	Access,All_Read
0518 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0519 01ce       |    |		Execute	Vector,Slice_Write
051a 00db       |    |		Load_Top	At_Offset_3
051b 0227       | '  |		Execute	Access,All_Reference
051c 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
051d 00d9       |    |		Load_Top	At_Offset_1
051e 0273       | s  |		Execute	Discrete,Plus
051f e5ff       |    |		Load	0x2,-0x1
0520 0227       | '  |		Execute	Access,All_Reference
0521 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0522 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0523 0000 0000  |    |		.BLANK	0000[0x5]
0528 ; --------------------------------------------------------------------------------------
0528 ; SUBPROGRAM
0528 ; --------------------------------------------------------------------------------------
0528 0534       | 4  |		.CONST	0x0534								; Address of begin
0529 0004       |    |		.CONST	0x0004								; Address of exception handler
052a 0002       |    |		.CONST	0x0002								; Number of locals
052b			INIT_0528:
052b 00da       |    |		Load_Top	At_Offset_2
052c 0227       | '  |		Execute	Access,All_Reference
052d 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
052e 00db       |    |		Load_Top	At_Offset_3
052f 0227       | '  |		Execute	Access,All_Reference
0530 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0531 0272       | r  |		Execute	Discrete,Minus
0532 e002       |    |		Load	0x0,0x2
0533 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0534			BODY_0528:
0534 00d8       |    |		Load_Top	At_Offset_0
0535 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0536 6810       |h   |		Jump_Zero	0x547
0537 e5fe       |    |		Load	0x2,-0x2
0538 e5ff       |    |		Load	0x2,-0x1
0539 0227       | '  |		Execute	Access,All_Reference
053a 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
053b 0a01       |    |		Execute_Immediate	Plus,0x1
053c e5ff       |    |		Load	0x2,-0x1
053d 0227       | '  |		Execute	Access,All_Reference
053e 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
053f 01d6       |    |		Execute	Vector,Field_Write
0540 00db       |    |		Load_Top	At_Offset_3
0541 0227       | '  |		Execute	Access,All_Reference
0542 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0543 0a01       |    |		Execute_Immediate	Plus,0x1
0544 e5ff       |    |		Load	0x2,-0x1
0545 0227       | '  |		Execute	Access,All_Reference
0546 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0547 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0548 ; --------------------------------------------------------------------------------------
0548 ; SUBPROGRAM
0548 ; --------------------------------------------------------------------------------------
0548 0554       | T  |		.CONST	0x0554								; Address of begin
0549 0004       |    |		.CONST	0x0004								; Address of exception handler
054a 0002       |    |		.CONST	0x0002								; Number of locals
054b			INIT_0548:
054b 00da       |    |		Load_Top	At_Offset_2
054c 0227       | '  |		Execute	Access,All_Reference
054d 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
054e 00db       |    |		Load_Top	At_Offset_3
054f 0227       | '  |		Execute	Access,All_Reference
0550 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0551 0272       | r  |		Execute	Discrete,Minus
0552 e002       |    |		Load	0x0,0x2
0553 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0554			BODY_0548:
0554 00d8       |    |		Load_Top	At_Offset_0
0555 e5fd       |    |		Load	0x2,-0x3
0556 027d       | }  |		Execute	Discrete,Greater
0557 6802       |h   |		Jump_Zero	0x55a
0558 e5fd       |    |		Load	0x2,-0x3
0559 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
055a 00db       |    |		Load_Top	At_Offset_3
055b 0229       | )  |		Execute	Access,All_Read
055c 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
055d e5ff       |    |		Load	0x2,-0x1
055e 0227       | '  |		Execute	Access,All_Reference
055f 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0560 0a01       |    |		Execute_Immediate	Plus,0x1
0561 e5ff       |    |		Load	0x2,-0x1
0562 0227       | '  |		Execute	Access,All_Reference
0563 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0564 00db       |    |		Load_Top	At_Offset_3
0565 0273       | s  |		Execute	Discrete,Plus
0566 00d9       |    |		Load_Top	At_Offset_1
0567 00d9       |    |		Load_Top	At_Offset_1
0568 e403       |    |		Load	0x2,0x3
0569 035b       | [  |		Declare_Type	Array,Constrained
056a 00db       |    |		Load_Top	At_Offset_3
056b 01cd       |    |		Execute	Vector,Slice_Reference
056c 00d8       |    |		Load_Top	At_Offset_0
056d 0335       | 5  |		Declare_Variable	Array,Duplicate
056e 00cd       |    |		Action	Spare6_Action
056f 00d9       |    |		Load_Top	At_Offset_1
0570 01d9       |    |		Execute	Vector,Reverse_Bounds
0571 0263       | c  |		Execute	Discrete,Above_Bound
0572 7005       |p   |		Jump_Nonzero	0x578
0573 e5fe       |    |		Load	0x2,-0x2
0574 00d9       |    |		Load_Top	At_Offset_1
0575 e407       |    |		Load	0x2,0x7
0576 01d6       |    |		Execute	Vector,Field_Write
0577 3ffb       |?   |		Loop_Increasing	0x573
0578 00cd       |    |		Action	Spare6_Action
0579 00da       |    |		Load_Top	At_Offset_2
057a 00da       |    |		Load_Top	At_Offset_2
057b e403       |    |		Load	0x2,0x3
057c 01ce       |    |		Execute	Vector,Slice_Write
057d 00d3       |    |		Pop_Control	Pop_Count_3
057e 00db       |    |		Load_Top	At_Offset_3
057f 0227       | '  |		Execute	Access,All_Reference
0580 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0581 e5fd       |    |		Load	0x2,-0x3
0582 0273       | s  |		Execute	Discrete,Plus
0583 e5ff       |    |		Load	0x2,-0x1
0584 0227       | '  |		Execute	Access,All_Reference
0585 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0586 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0587 0000       |    |		.XXX[0x1]
0588 ; --------------------------------------------------------------------------------------
0588 ; SUBPROGRAM
0588 ; --------------------------------------------------------------------------------------
0588 0591       |    |		.CONST	0x0591								; Address of begin
0589 0004       |    |		.CONST	0x0004								; Address of exception handler
058a 0003       |    |		.CONST	0x0003								; Number of locals
058b			INIT_0588:
058b e002       |    |		Load	0x0,0x2
058c 0007       |    |		Action	Break_Optional
058d 00db       |    |		Load_Top	At_Offset_3
058e 01db       |    |		Execute	Vector,Length
058f e002       |    |		Load	0x0,0x2
0590 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0591			BODY_0588:
0591 e5fd       |    |		Load	0x2,-0x3
0592 0227       | '  |		Execute	Access,All_Reference
0593 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0594 00d9       |    |		Load_Top	At_Offset_1
0595 0273       | s  |		Execute	Discrete,Plus
0596 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0597 e5fd       |    |		Load	0x2,-0x3
0598 0227       | '  |		Execute	Access,All_Reference
0599 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
059a 00da       |    |		Load_Top	At_Offset_2
059b 027c       | |  |		Execute	Discrete,Less
059c 680f       |h   |		Jump_Zero	0x5ac
059d 00d9       |    |		Load_Top	At_Offset_1
059e e5fe       |    |		Load	0x2,-0x2
059f 0273       | s  |		Execute	Discrete,Plus
05a0 0aff       |    |		Execute_Immediate	Plus,-0x1
05a1 005a       | Z  |		Store_Top	Discrete,At_Offset_2
05a2 00d9       |    |		Load_Top	At_Offset_1
05a3 00da       |    |		Load_Top	At_Offset_2
05a4 e5fe       |    |		Load	0x2,-0x2
05a5 026f       | o  |		Execute	Discrete,Remainder
05a6 0272       | r  |		Execute	Discrete,Minus
05a7 005a       | Z  |		Store_Top	Discrete,At_Offset_2
05a8 e5fd       |    |		Load	0x2,-0x3
05a9 00da       |    |		Load_Top	At_Offset_2
05aa 8003       |    |		Call	0x0,0x3
05ab c5fd       |    |		Store	0x2,-0x3
05ac e5ff       |    |		Load	0x2,-0x1
05ad 01dd       |    |		Execute	Vector,First
05ae e5ff       |    |		Load	0x2,-0x1
05af 01dc       |    |		Execute	Vector,Last
05b0 e5ff       |    |		Load	0x2,-0x1
05b1 01cf       |    |		Execute	Vector,Slice_Read
05b2 e5fd       |    |		Load	0x2,-0x3
05b3 0227       | '  |		Execute	Access,All_Reference
05b4 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
05b5 0a01       |    |		Execute_Immediate	Plus,0x1
05b6 e5fd       |    |		Load	0x2,-0x3
05b7 0227       | '  |		Execute	Access,All_Reference
05b8 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
05b9 00db       |    |		Load_Top	At_Offset_3
05ba 0273       | s  |		Execute	Discrete,Plus
05bb e5fd       |    |		Load	0x2,-0x3
05bc 0229       | )  |		Execute	Access,All_Read
05bd 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
05be 01ce       |    |		Execute	Vector,Slice_Write
05bf e5fd       |    |		Load	0x2,-0x3
05c0 0227       | '  |		Execute	Access,All_Reference
05c1 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
05c2 00d9       |    |		Load_Top	At_Offset_1
05c3 0273       | s  |		Execute	Discrete,Plus
05c4 e5fd       |    |		Load	0x2,-0x3
05c5 0227       | '  |		Execute	Access,All_Reference
05c6 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
05c7 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05cd       |    |		.CONST	0x05cd								; Address of begin
05c9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ca 0002       |    |		.CONST	0x0002								; Number of locals
05cb			INIT_05c8:
05cb e002       |    |		Load	0x0,0x2
05cc 0007       |    |		Action	Break_Optional
05cd			BODY_05c8:
05cd e5fd       |    |		Load	0x2,-0x3
05ce 0227       | '  |		Execute	Access,All_Reference
05cf 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
05d0 0a01       |    |		Execute_Immediate	Plus,0x1
05d1 0059       | Y  |		Store_Top	Discrete,At_Offset_1
05d2 e5fd       |    |		Load	0x2,-0x3
05d3 0227       | '  |		Execute	Access,All_Reference
05d4 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
05d5 00d9       |    |		Load_Top	At_Offset_1
05d6 027c       | |  |		Execute	Discrete,Less
05d7 680f       |h   |		Jump_Zero	0x5e7
05d8 00d8       |    |		Load_Top	At_Offset_0
05d9 e5fe       |    |		Load	0x2,-0x2
05da 0273       | s  |		Execute	Discrete,Plus
05db 0aff       |    |		Execute_Immediate	Plus,-0x1
05dc 0059       | Y  |		Store_Top	Discrete,At_Offset_1
05dd 00d8       |    |		Load_Top	At_Offset_0
05de 00d9       |    |		Load_Top	At_Offset_1
05df e5fe       |    |		Load	0x2,-0x2
05e0 026f       | o  |		Execute	Discrete,Remainder
05e1 0272       | r  |		Execute	Discrete,Minus
05e2 0059       | Y  |		Store_Top	Discrete,At_Offset_1
05e3 e5fd       |    |		Load	0x2,-0x3
05e4 00d9       |    |		Load_Top	At_Offset_1
05e5 8003       |    |		Call	0x0,0x3
05e6 c5fd       |    |		Store	0x2,-0x3
05e7 00db       |    |		Load_Top	At_Offset_3
05e8 e5fd       |    |		Load	0x2,-0x3
05e9 0227       | '  |		Execute	Access,All_Reference
05ea 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
05eb 0a01       |    |		Execute_Immediate	Plus,0x1
05ec e5fd       |    |		Load	0x2,-0x3
05ed 0227       | '  |		Execute	Access,All_Reference
05ee 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
05ef 01d6       |    |		Execute	Vector,Field_Write
05f0 e5fd       |    |		Load	0x2,-0x3
05f1 0227       | '  |		Execute	Access,All_Reference
05f2 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
05f3 0a01       |    |		Execute_Immediate	Plus,0x1
05f4 e5fd       |    |		Load	0x2,-0x3
05f5 0227       | '  |		Execute	Access,All_Reference
05f6 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
05f7 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05f8 ; --------------------------------------------------------------------------------------
05f8 ; SUBPROGRAM
05f8 ; --------------------------------------------------------------------------------------
05f8 05fd       |    |		.CONST	0x05fd								; Address of begin
05f9 0004       |    |		.CONST	0x0004								; Address of exception handler
05fa 0002       |    |		.CONST	0x0002								; Number of locals
05fb			INIT_05f8:
05fb e002       |    |		Load	0x0,0x2
05fc 0007       |    |		Action	Break_Optional
05fd			BODY_05f8:
05fd e5fc       |    |		Load	0x2,-0x4
05fe 0227       | '  |		Execute	Access,All_Reference
05ff 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0600 e5fe       |    |		Load	0x2,-0x2
0601 0273       | s  |		Execute	Discrete,Plus
0602 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0603 e5fc       |    |		Load	0x2,-0x4
0604 0227       | '  |		Execute	Access,All_Reference
0605 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0606 00d9       |    |		Load_Top	At_Offset_1
0607 027c       | |  |		Execute	Discrete,Less
0608 680f       |h   |		Jump_Zero	0x618
0609 00d8       |    |		Load_Top	At_Offset_0
060a e5fd       |    |		Load	0x2,-0x3
060b 0273       | s  |		Execute	Discrete,Plus
060c 0aff       |    |		Execute_Immediate	Plus,-0x1
060d 0059       | Y  |		Store_Top	Discrete,At_Offset_1
060e 00d8       |    |		Load_Top	At_Offset_0
060f 00d9       |    |		Load_Top	At_Offset_1
0610 e5fd       |    |		Load	0x2,-0x3
0611 026f       | o  |		Execute	Discrete,Remainder
0612 0272       | r  |		Execute	Discrete,Minus
0613 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0614 e5fc       |    |		Load	0x2,-0x4
0615 00d9       |    |		Load_Top	At_Offset_1
0616 8003       |    |		Call	0x0,0x3
0617 c5fc       |    |		Store	0x2,-0x4
0618 e5fc       |    |		Load	0x2,-0x4
0619 0229       | )  |		Execute	Access,All_Read
061a 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
061b e5fc       |    |		Load	0x2,-0x4
061c 0227       | '  |		Execute	Access,All_Reference
061d 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
061e 0a01       |    |		Execute_Immediate	Plus,0x1
061f e5fc       |    |		Load	0x2,-0x4
0620 0227       | '  |		Execute	Access,All_Reference
0621 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0622 e5fe       |    |		Load	0x2,-0x2
0623 0273       | s  |		Execute	Discrete,Plus
0624 00d9       |    |		Load_Top	At_Offset_1
0625 00d9       |    |		Load_Top	At_Offset_1
0626 e403       |    |		Load	0x2,0x3
0627 035b       | [  |		Declare_Type	Array,Constrained
0628 00db       |    |		Load_Top	At_Offset_3
0629 01cd       |    |		Execute	Vector,Slice_Reference
062a 00d8       |    |		Load_Top	At_Offset_0
062b 0335       | 5  |		Declare_Variable	Array,Duplicate
062c 00cd       |    |		Action	Spare6_Action
062d 00d9       |    |		Load_Top	At_Offset_1
062e 01d9       |    |		Execute	Vector,Reverse_Bounds
062f 0263       | c  |		Execute	Discrete,Above_Bound
0630 7005       |p   |		Jump_Nonzero	0x636
0631 e5ff       |    |		Load	0x2,-0x1
0632 00d9       |    |		Load_Top	At_Offset_1
0633 e407       |    |		Load	0x2,0x7
0634 01d6       |    |		Execute	Vector,Field_Write
0635 3ffb       |?   |		Loop_Increasing	0x631
0636 00cd       |    |		Action	Spare6_Action
0637 00da       |    |		Load_Top	At_Offset_2
0638 00da       |    |		Load_Top	At_Offset_2
0639 e403       |    |		Load	0x2,0x3
063a 01ce       |    |		Execute	Vector,Slice_Write
063b 00d3       |    |		Pop_Control	Pop_Count_3
063c e5fc       |    |		Load	0x2,-0x4
063d 0227       | '  |		Execute	Access,All_Reference
063e 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
063f e5fe       |    |		Load	0x2,-0x2
0640 0273       | s  |		Execute	Discrete,Plus
0641 e5fc       |    |		Load	0x2,-0x4
0642 0227       | '  |		Execute	Access,All_Reference
0643 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0644 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0645 0000 0000  |    |		.XXX[0x3]
0647 0000       |    |
0648 ; --------------------------------------------------------------------------------------
0648 ; SUBPROGRAM
0648 ; --------------------------------------------------------------------------------------
0648 064d       | M  |		.CONST	0x064d								; Address of begin
0649 0004       |    |		.CONST	0x0004								; Address of exception handler
064a 0002       |    |		.CONST	0x0002								; Number of locals
064b			INIT_0648:
064b e002       |    |		Load	0x0,0x2
064c 0007       |    |		Action	Break_Optional
064d			BODY_0648:
064d e5fd       |    |		Load	0x2,-0x3
064e 0227       | '  |		Execute	Access,All_Reference
064f 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0650 e5ff       |    |		Load	0x2,-0x1
0651 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0652 0273       | s  |		Execute	Discrete,Plus
0653 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0654 e5fd       |    |		Load	0x2,-0x3
0655 0227       | '  |		Execute	Access,All_Reference
0656 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0657 00d9       |    |		Load_Top	At_Offset_1
0658 027c       | |  |		Execute	Discrete,Less
0659 680f       |h   |		Jump_Zero	0x669
065a 00d8       |    |		Load_Top	At_Offset_0
065b e5fe       |    |		Load	0x2,-0x2
065c 0273       | s  |		Execute	Discrete,Plus
065d 0aff       |    |		Execute_Immediate	Plus,-0x1
065e 0059       | Y  |		Store_Top	Discrete,At_Offset_1
065f 00d8       |    |		Load_Top	At_Offset_0
0660 00d9       |    |		Load_Top	At_Offset_1
0661 e5fe       |    |		Load	0x2,-0x2
0662 026f       | o  |		Execute	Discrete,Remainder
0663 0272       | r  |		Execute	Discrete,Minus
0664 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0665 e5fd       |    |		Load	0x2,-0x3
0666 00d9       |    |		Load_Top	At_Offset_1
0667 8003       |    |		Call	0x0,0x3
0668 c5fd       |    |		Store	0x2,-0x3
0669 4801       |H   |		Short_Literal	0x1
066a e5ff       |    |		Load	0x2,-0x1
066b 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
066c e5ff       |    |		Load	0x2,-0x1
066d 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
066e 01cf       |    |		Execute	Vector,Slice_Read
066f e5fd       |    |		Load	0x2,-0x3
0670 0227       | '  |		Execute	Access,All_Reference
0671 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0672 0a01       |    |		Execute_Immediate	Plus,0x1
0673 e5fd       |    |		Load	0x2,-0x3
0674 0227       | '  |		Execute	Access,All_Reference
0675 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0676 e5ff       |    |		Load	0x2,-0x1
0677 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0678 0273       | s  |		Execute	Discrete,Plus
0679 e5fd       |    |		Load	0x2,-0x3
067a 0229       | )  |		Execute	Access,All_Read
067b 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
067c 01ce       |    |		Execute	Vector,Slice_Write
067d e5fd       |    |		Load	0x2,-0x3
067e 0227       | '  |		Execute	Access,All_Reference
067f 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0680 e5ff       |    |		Load	0x2,-0x1
0681 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0682 0273       | s  |		Execute	Discrete,Plus
0683 e5fd       |    |		Load	0x2,-0x3
0684 0227       | '  |		Execute	Access,All_Reference
0685 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0686 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0687 0000       |    |		.XXX[0x1]
0688 ; --------------------------------------------------------------------------------------
0688 ; SUBPROGRAM
0688 ; --------------------------------------------------------------------------------------
0688 068d       |    |		.CONST	0x068d								; Address of begin
0689 0004       |    |		.CONST	0x0004								; Address of exception handler
068a 0002       |    |		.CONST	0x0002								; Number of locals
068b			INIT_0688:
068b e002       |    |		Load	0x0,0x2
068c 0007       |    |		Action	Break_Optional
068d			BODY_0688:
068d e5fd       |    |		Load	0x2,-0x3
068e 0227       | '  |		Execute	Access,All_Reference
068f 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0690 e5ff       |    |		Load	0x2,-0x1
0691 0227       | '  |		Execute	Access,All_Reference
0692 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0693 0273       | s  |		Execute	Discrete,Plus
0694 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0695 e5fd       |    |		Load	0x2,-0x3
0696 0227       | '  |		Execute	Access,All_Reference
0697 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0698 00d9       |    |		Load_Top	At_Offset_1
0699 027c       | |  |		Execute	Discrete,Less
069a 680f       |h   |		Jump_Zero	0x6aa
069b 00d8       |    |		Load_Top	At_Offset_0
069c e5fe       |    |		Load	0x2,-0x2
069d 0273       | s  |		Execute	Discrete,Plus
069e 0aff       |    |		Execute_Immediate	Plus,-0x1
069f 0059       | Y  |		Store_Top	Discrete,At_Offset_1
06a0 00d8       |    |		Load_Top	At_Offset_0
06a1 00d9       |    |		Load_Top	At_Offset_1
06a2 e5fe       |    |		Load	0x2,-0x2
06a3 026f       | o  |		Execute	Discrete,Remainder
06a4 0272       | r  |		Execute	Discrete,Minus
06a5 0059       | Y  |		Store_Top	Discrete,At_Offset_1
06a6 e5fd       |    |		Load	0x2,-0x3
06a7 00d9       |    |		Load_Top	At_Offset_1
06a8 8003       |    |		Call	0x0,0x3
06a9 c5fd       |    |		Store	0x2,-0x3
06aa 4801       |H   |		Short_Literal	0x1
06ab e5ff       |    |		Load	0x2,-0x1
06ac 0227       | '  |		Execute	Access,All_Reference
06ad 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06ae e5ff       |    |		Load	0x2,-0x1
06af 0227       | '  |		Execute	Access,All_Reference
06b0 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06b1 01cf       |    |		Execute	Vector,Slice_Read
06b2 e5fd       |    |		Load	0x2,-0x3
06b3 0227       | '  |		Execute	Access,All_Reference
06b4 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06b5 0a01       |    |		Execute_Immediate	Plus,0x1
06b6 e5fd       |    |		Load	0x2,-0x3
06b7 0227       | '  |		Execute	Access,All_Reference
06b8 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06b9 e5ff       |    |		Load	0x2,-0x1
06ba 0227       | '  |		Execute	Access,All_Reference
06bb 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06bc 0273       | s  |		Execute	Discrete,Plus
06bd e5fd       |    |		Load	0x2,-0x3
06be 0229       | )  |		Execute	Access,All_Read
06bf 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06c0 01ce       |    |		Execute	Vector,Slice_Write
06c1 e5fd       |    |		Load	0x2,-0x3
06c2 0227       | '  |		Execute	Access,All_Reference
06c3 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06c4 e5ff       |    |		Load	0x2,-0x1
06c5 0227       | '  |		Execute	Access,All_Reference
06c6 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06c7 0273       | s  |		Execute	Discrete,Plus
06c8 e5fd       |    |		Load	0x2,-0x3
06c9 0227       | '  |		Execute	Access,All_Reference
06ca 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
06cb 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
06cc 0000 0000  |    |		.BLANK	0000[0x4]
06d0 ; --------------------------------------------------------------------------------------
06d0 ; SUBPROGRAM
06d0 ; --------------------------------------------------------------------------------------
06d0 06dc       |    |		.CONST	0x06dc								; Address of begin
06d1 0004       |    |		.CONST	0x0004								; Address of exception handler
06d2 0003       |    |		.CONST	0x0003								; Number of locals
06d3			INIT_06d0:
06d3 00db       |    |		Load_Top	At_Offset_3
06d4 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06d5 e5fe       |    |		Load	0x2,-0x2
06d6 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06d7 0272       | r  |		Execute	Discrete,Minus
06d8 e002       |    |		Load	0x0,0x2
06d9 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
06da e002       |    |		Load	0x0,0x2
06db 0007       |    |		Action	Break_Optional
06dc			BODY_06d0:
06dc 00d9       |    |		Load_Top	At_Offset_1
06dd e5ff       |    |		Load	0x2,-0x1
06de 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06df 027b       | {  |		Execute	Discrete,Greater_Equal
06e0 6825       |h%  |		Jump_Zero	0x706
06e1 4801       |H   |		Short_Literal	0x1
06e2 e5fe       |    |		Load	0x2,-0x2
06e3 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06e4 e5fe       |    |		Load	0x2,-0x2
06e5 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06e6 01cf       |    |		Execute	Vector,Slice_Read
06e7 e5ff       |    |		Load	0x2,-0x1
06e8 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06e9 0a01       |    |		Execute_Immediate	Plus,0x1
06ea e5ff       |    |		Load	0x2,-0x1
06eb 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06ec e5fe       |    |		Load	0x2,-0x2
06ed 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06ee 0273       | s  |		Execute	Discrete,Plus
06ef e5fe       |    |		Load	0x2,-0x2
06f0 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06f1 01ce       |    |		Execute	Vector,Slice_Write
06f2 4801       |H   |		Short_Literal	0x1
06f3 e5ff       |    |		Load	0x2,-0x1
06f4 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06f5 e5ff       |    |		Load	0x2,-0x1
06f6 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06f7 01cf       |    |		Execute	Vector,Slice_Read
06f8 4801       |H   |		Short_Literal	0x1
06f9 e5ff       |    |		Load	0x2,-0x1
06fa 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06fb e5fe       |    |		Load	0x2,-0x2
06fc 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06fd 01ce       |    |		Execute	Vector,Slice_Write
06fe e5fe       |    |		Load	0x2,-0x2
06ff 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0700 e5ff       |    |		Load	0x2,-0x1
0701 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0702 0273       | s  |		Execute	Discrete,Plus
0703 e5fe       |    |		Load	0x2,-0x2
0704 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0705 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0706 e5ff       |    |		Load	0x2,-0x1
0707 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0708 e5fe       |    |		Load	0x2,-0x2
0709 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
070a 027d       | }  |		Execute	Discrete,Greater
070b 680d       |h   |		Jump_Zero	0x719
070c 4801       |H   |		Short_Literal	0x1
070d e5fe       |    |		Load	0x2,-0x2
070e 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
070f e5ff       |    |		Load	0x2,-0x1
0710 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0711 01cf       |    |		Execute	Vector,Slice_Read
0712 e5fe       |    |		Load	0x2,-0x2
0713 2903       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0714 e5fe       |    |		Load	0x2,-0x2
0715 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0716 e5fe       |    |		Load	0x2,-0x2
0717 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0718 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0719 4801       |H   |		Short_Literal	0x1
071a e5fe       |    |		Load	0x2,-0x2
071b 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
071c 00da       |    |		Load_Top	At_Offset_2
071d 0272       | r  |		Execute	Discrete,Minus
071e e5fe       |    |		Load	0x2,-0x2
071f 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0720 01cf       |    |		Execute	Vector,Slice_Read
0721 e5ff       |    |		Load	0x2,-0x1
0722 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0723 0a01       |    |		Execute_Immediate	Plus,0x1
0724 e5fe       |    |		Load	0x2,-0x2
0725 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0726 e5fe       |    |		Load	0x2,-0x2
0727 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0728 01ce       |    |		Execute	Vector,Slice_Write
0729 4801       |H   |		Short_Literal	0x1
072a e5ff       |    |		Load	0x2,-0x1
072b 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
072c e5ff       |    |		Load	0x2,-0x1
072d 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
072e 01cf       |    |		Execute	Vector,Slice_Read
072f 4801       |H   |		Short_Literal	0x1
0730 e5ff       |    |		Load	0x2,-0x1
0731 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0732 e5fe       |    |		Load	0x2,-0x2
0733 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0734 01ce       |    |		Execute	Vector,Slice_Write
0735 e5fe       |    |		Load	0x2,-0x2
0736 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0737 e5fe       |    |		Load	0x2,-0x2
0738 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0739 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
073a 0000 0000  |    |		.BLANK	0000[0x6]
0740 ; --------------------------------------------------------------------------------------
0740 ; SUBPROGRAM
0740 ; --------------------------------------------------------------------------------------
0740 074c       | L  |		.CONST	0x074c								; Address of begin
0741 0004       |    |		.CONST	0x0004								; Address of exception handler
0742 0003       |    |		.CONST	0x0003								; Number of locals
0743			INIT_0740:
0743 00db       |    |		Load_Top	At_Offset_3
0744 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0745 e5fe       |    |		Load	0x2,-0x2
0746 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0747 0272       | r  |		Execute	Discrete,Minus
0748 e002       |    |		Load	0x0,0x2
0749 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
074a e002       |    |		Load	0x0,0x2
074b 0007       |    |		Action	Break_Optional
074c			BODY_0740:
074c 00d9       |    |		Load_Top	At_Offset_1
074d e5ff       |    |		Load	0x2,-0x1
074e 0227       | '  |		Execute	Access,All_Reference
074f 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0750 027b       | {  |		Execute	Discrete,Greater_Equal
0751 682b       |h+  |		Jump_Zero	0x77d
0752 4801       |H   |		Short_Literal	0x1
0753 e5fe       |    |		Load	0x2,-0x2
0754 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0755 e5fe       |    |		Load	0x2,-0x2
0756 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0757 01cf       |    |		Execute	Vector,Slice_Read
0758 e5ff       |    |		Load	0x2,-0x1
0759 0227       | '  |		Execute	Access,All_Reference
075a 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
075b 0a01       |    |		Execute_Immediate	Plus,0x1
075c e5ff       |    |		Load	0x2,-0x1
075d 0227       | '  |		Execute	Access,All_Reference
075e 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
075f e5fe       |    |		Load	0x2,-0x2
0760 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0761 0273       | s  |		Execute	Discrete,Plus
0762 e5fe       |    |		Load	0x2,-0x2
0763 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0764 01ce       |    |		Execute	Vector,Slice_Write
0765 4801       |H   |		Short_Literal	0x1
0766 e5ff       |    |		Load	0x2,-0x1
0767 0227       | '  |		Execute	Access,All_Reference
0768 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0769 e5ff       |    |		Load	0x2,-0x1
076a 0227       | '  |		Execute	Access,All_Reference
076b 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
076c 01cf       |    |		Execute	Vector,Slice_Read
076d 4801       |H   |		Short_Literal	0x1
076e e5ff       |    |		Load	0x2,-0x1
076f 0227       | '  |		Execute	Access,All_Reference
0770 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0771 e5fe       |    |		Load	0x2,-0x2
0772 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0773 01ce       |    |		Execute	Vector,Slice_Write
0774 e5fe       |    |		Load	0x2,-0x2
0775 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0776 e5ff       |    |		Load	0x2,-0x1
0777 0227       | '  |		Execute	Access,All_Reference
0778 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0779 0273       | s  |		Execute	Discrete,Plus
077a e5fe       |    |		Load	0x2,-0x2
077b 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
077c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
077d e5ff       |    |		Load	0x2,-0x1
077e 0227       | '  |		Execute	Access,All_Reference
077f 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0780 e5fe       |    |		Load	0x2,-0x2
0781 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0782 027d       | }  |		Execute	Discrete,Greater
0783 680e       |h   |		Jump_Zero	0x792
0784 4801       |H   |		Short_Literal	0x1
0785 e5fe       |    |		Load	0x2,-0x2
0786 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0787 e5ff       |    |		Load	0x2,-0x1
0788 0227       | '  |		Execute	Access,All_Reference
0789 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
078a 01cf       |    |		Execute	Vector,Slice_Read
078b e5fe       |    |		Load	0x2,-0x2
078c 2903       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
078d e5fe       |    |		Load	0x2,-0x2
078e 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
078f e5fe       |    |		Load	0x2,-0x2
0790 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0791 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0792 4801       |H   |		Short_Literal	0x1
0793 e5fe       |    |		Load	0x2,-0x2
0794 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0795 00da       |    |		Load_Top	At_Offset_2
0796 0272       | r  |		Execute	Discrete,Minus
0797 e5fe       |    |		Load	0x2,-0x2
0798 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0799 01cf       |    |		Execute	Vector,Slice_Read
079a e5ff       |    |		Load	0x2,-0x1
079b 0227       | '  |		Execute	Access,All_Reference
079c 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
079d 0a01       |    |		Execute_Immediate	Plus,0x1
079e e5fe       |    |		Load	0x2,-0x2
079f 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
07a0 e5fe       |    |		Load	0x2,-0x2
07a1 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07a2 01ce       |    |		Execute	Vector,Slice_Write
07a3 4801       |H   |		Short_Literal	0x1
07a4 e5ff       |    |		Load	0x2,-0x1
07a5 0227       | '  |		Execute	Access,All_Reference
07a6 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
07a7 e5ff       |    |		Load	0x2,-0x1
07a8 0227       | '  |		Execute	Access,All_Reference
07a9 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07aa 01cf       |    |		Execute	Vector,Slice_Read
07ab 4801       |H   |		Short_Literal	0x1
07ac e5ff       |    |		Load	0x2,-0x1
07ad 0227       | '  |		Execute	Access,All_Reference
07ae 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
07af e5fe       |    |		Load	0x2,-0x2
07b0 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07b1 01ce       |    |		Execute	Vector,Slice_Write
07b2 e5fe       |    |		Load	0x2,-0x2
07b3 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
07b4 e5fe       |    |		Load	0x2,-0x2
07b5 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
07b6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
07b7 0000       |    |		.XXX[0x1]
07b8 ; --------------------------------------------------------------------------------------
07b8 ; SUBPROGRAM
07b8 ; --------------------------------------------------------------------------------------
07b8 07c8       |    |		.CONST	0x07c8								; Address of begin
07b9 0004       |    |		.CONST	0x0004								; Address of exception handler
07ba 0004       |    |		.CONST	0x0004								; Number of locals
07bb			INIT_07b8:
07bb 00db       |    |		Load_Top	At_Offset_3
07bc 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
07bd e5fe       |    |		Load	0x2,-0x2
07be 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
07bf 0272       | r  |		Execute	Discrete,Minus
07c0 e002       |    |		Load	0x0,0x2
07c1 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
07c2 e002       |    |		Load	0x0,0x2
07c3 0007       |    |		Action	Break_Optional
07c4 e5ff       |    |		Load	0x2,-0x1
07c5 01db       |    |		Execute	Vector,Length
07c6 e002       |    |		Load	0x0,0x2
07c7 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
07c8			BODY_07b8:
07c8 00da       |    |		Load_Top	At_Offset_2
07c9 00d9       |    |		Load_Top	At_Offset_1
07ca 027b       | {  |		Execute	Discrete,Greater_Equal
07cb 681f       |h   |		Jump_Zero	0x7eb
07cc 4801       |H   |		Short_Literal	0x1
07cd e5fe       |    |		Load	0x2,-0x2
07ce 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
07cf e5fe       |    |		Load	0x2,-0x2
07d0 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07d1 01cf       |    |		Execute	Vector,Slice_Read
07d2 00d9       |    |		Load_Top	At_Offset_1
07d3 0a01       |    |		Execute_Immediate	Plus,0x1
07d4 00da       |    |		Load_Top	At_Offset_2
07d5 e5fe       |    |		Load	0x2,-0x2
07d6 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
07d7 0273       | s  |		Execute	Discrete,Plus
07d8 e5fe       |    |		Load	0x2,-0x2
07d9 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07da 01ce       |    |		Execute	Vector,Slice_Write
07db 4801       |H   |		Short_Literal	0x1
07dc 00d9       |    |		Load_Top	At_Offset_1
07dd e5ff       |    |		Load	0x2,-0x1
07de 01cf       |    |		Execute	Vector,Slice_Read
07df 4801       |H   |		Short_Literal	0x1
07e0 00da       |    |		Load_Top	At_Offset_2
07e1 e5fe       |    |		Load	0x2,-0x2
07e2 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07e3 01ce       |    |		Execute	Vector,Slice_Write
07e4 e5fe       |    |		Load	0x2,-0x2
07e5 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
07e6 00d9       |    |		Load_Top	At_Offset_1
07e7 0273       | s  |		Execute	Discrete,Plus
07e8 e5fe       |    |		Load	0x2,-0x2
07e9 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
07ea 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
07eb 00d8       |    |		Load_Top	At_Offset_0
07ec e5fe       |    |		Load	0x2,-0x2
07ed 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
07ee 027d       | }  |		Execute	Discrete,Greater
07ef 6811       |h   |		Jump_Zero	0x801
07f0 e5ff       |    |		Load	0x2,-0x1
07f1 01dd       |    |		Execute	Vector,First
07f2 e5ff       |    |		Load	0x2,-0x1
07f3 01dd       |    |		Execute	Vector,First
07f4 e5fe       |    |		Load	0x2,-0x2
07f5 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
07f6 0273       | s  |		Execute	Discrete,Plus
07f7 0aff       |    |		Execute_Immediate	Plus,-0x1
07f8 e5ff       |    |		Load	0x2,-0x1
07f9 01cf       |    |		Execute	Vector,Slice_Read
07fa e5fe       |    |		Load	0x2,-0x2
07fb 2903       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
07fc e5fe       |    |		Load	0x2,-0x2
07fd 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
07fe e5fe       |    |		Load	0x2,-0x2
07ff 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0800 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0801 4801       |H   |		Short_Literal	0x1
0802 e5fe       |    |		Load	0x2,-0x2
0803 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0804 00db       |    |		Load_Top	At_Offset_3
0805 0272       | r  |		Execute	Discrete,Minus
0806 e5fe       |    |		Load	0x2,-0x2
0807 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0808 01cf       |    |		Execute	Vector,Slice_Read
0809 00d9       |    |		Load_Top	At_Offset_1
080a 0a01       |    |		Execute_Immediate	Plus,0x1
080b e5fe       |    |		Load	0x2,-0x2
080c 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
080d e5fe       |    |		Load	0x2,-0x2
080e 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
080f 01ce       |    |		Execute	Vector,Slice_Write
0810 e5ff       |    |		Load	0x2,-0x1
0811 4801       |H   |		Short_Literal	0x1
0812 00da       |    |		Load_Top	At_Offset_2
0813 e5fe       |    |		Load	0x2,-0x2
0814 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0815 01ce       |    |		Execute	Vector,Slice_Write
0816 e5fe       |    |		Load	0x2,-0x2
0817 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0818 e5fe       |    |		Load	0x2,-0x2
0819 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
081a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
081b 0000 0000  |    |		.BLANK	0000[0x5]
0820 ; --------------------------------------------------------------------------------------
0820 ; SUBPROGRAM
0820 ; --------------------------------------------------------------------------------------
0820 082c       | ,  |		.CONST	0x082c								; Address of begin
0821 0004       |    |		.CONST	0x0004								; Address of exception handler
0822 0003       |    |		.CONST	0x0003								; Number of locals
0823			INIT_0820:
0823 00db       |    |		Load_Top	At_Offset_3
0824 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0825 e5fe       |    |		Load	0x2,-0x2
0826 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0827 0272       | r  |		Execute	Discrete,Minus
0828 e002       |    |		Load	0x0,0x2
0829 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
082a e002       |    |		Load	0x0,0x2
082b 0007       |    |		Action	Break_Optional
082c			BODY_0820:
082c 00d9       |    |		Load_Top	At_Offset_1
082d 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
082e 6818       |h   |		Jump_Zero	0x847
082f 4801       |H   |		Short_Literal	0x1
0830 e5fe       |    |		Load	0x2,-0x2
0831 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0832 e5fe       |    |		Load	0x2,-0x2
0833 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0834 01cf       |    |		Execute	Vector,Slice_Read
0835 4802       |H   |		Short_Literal	0x2
0836 e5fe       |    |		Load	0x2,-0x2
0837 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0838 0a01       |    |		Execute_Immediate	Plus,0x1
0839 e5fe       |    |		Load	0x2,-0x2
083a 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
083b 01ce       |    |		Execute	Vector,Slice_Write
083c e5ff       |    |		Load	0x2,-0x1
083d 4801       |H   |		Short_Literal	0x1
083e e5fe       |    |		Load	0x2,-0x2
083f 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0840 01d6       |    |		Execute	Vector,Field_Write
0841 e5fe       |    |		Load	0x2,-0x2
0842 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0843 0a01       |    |		Execute_Immediate	Plus,0x1
0844 e5fe       |    |		Load	0x2,-0x2
0845 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0846 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0847 e5fe       |    |		Load	0x2,-0x2
0848 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0849 0d01       |    |		Execute_Immediate	Less,0x1
084a 6802       |h   |		Jump_Zero	0x84d
084b 0008       |    |		Action	Idle
084c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
084d 4801       |H   |		Short_Literal	0x1
084e e5fe       |    |		Load	0x2,-0x2
084f 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0850 0aff       |    |		Execute_Immediate	Plus,-0x1
0851 e5fe       |    |		Load	0x2,-0x2
0852 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0853 01cf       |    |		Execute	Vector,Slice_Read
0854 4802       |H   |		Short_Literal	0x2
0855 e5fe       |    |		Load	0x2,-0x2
0856 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0857 e5fe       |    |		Load	0x2,-0x2
0858 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0859 01ce       |    |		Execute	Vector,Slice_Write
085a e5ff       |    |		Load	0x2,-0x1
085b 4801       |H   |		Short_Literal	0x1
085c e5fe       |    |		Load	0x2,-0x2
085d 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
085e 01d6       |    |		Execute	Vector,Field_Write
085f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0860 ; --------------------------------------------------------------------------------------
0860 ; SUBPROGRAM
0860 ; --------------------------------------------------------------------------------------
0860 086c       | l  |		.CONST	0x086c								; Address of begin
0861 0004       |    |		.CONST	0x0004								; Address of exception handler
0862 0003       |    |		.CONST	0x0003								; Number of locals
0863			INIT_0860:
0863 e5fd       |    |		Load	0x2,-0x3
0864 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0865 e5fd       |    |		Load	0x2,-0x3
0866 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0867 0272       | r  |		Execute	Discrete,Minus
0868 e002       |    |		Load	0x0,0x2
0869 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
086a e002       |    |		Load	0x0,0x2
086b 0007       |    |		Action	Break_Optional
086c			BODY_0860:
086c 00d9       |    |		Load_Top	At_Offset_1
086d e5fe       |    |		Load	0x2,-0x2
086e 027b       | {  |		Execute	Discrete,Greater_Equal
086f 6832       |h2  |		Jump_Zero	0x8a2
0870 4801       |H   |		Short_Literal	0x1
0871 e5fd       |    |		Load	0x2,-0x3
0872 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0873 e5fd       |    |		Load	0x2,-0x3
0874 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0875 01cf       |    |		Execute	Vector,Slice_Read
0876 e5fe       |    |		Load	0x2,-0x2
0877 0a01       |    |		Execute_Immediate	Plus,0x1
0878 e5fe       |    |		Load	0x2,-0x2
0879 e5fd       |    |		Load	0x2,-0x3
087a 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
087b 0273       | s  |		Execute	Discrete,Plus
087c e5fd       |    |		Load	0x2,-0x3
087d 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
087e 01ce       |    |		Execute	Vector,Slice_Write
087f e5fd       |    |		Load	0x2,-0x3
0880 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0881 4801       |H   |		Short_Literal	0x1
0882 e5fe       |    |		Load	0x2,-0x2
0883 00d9       |    |		Load_Top	At_Offset_1
0884 00d9       |    |		Load_Top	At_Offset_1
0885 e404       |    |		Load	0x2,0x4
0886 035b       | [  |		Declare_Type	Array,Constrained
0887 00db       |    |		Load_Top	At_Offset_3
0888 01cd       |    |		Execute	Vector,Slice_Reference
0889 00d8       |    |		Load_Top	At_Offset_0
088a 0335       | 5  |		Declare_Variable	Array,Duplicate
088b 00cd       |    |		Action	Spare6_Action
088c 00d9       |    |		Load_Top	At_Offset_1
088d 01d9       |    |		Execute	Vector,Reverse_Bounds
088e 0263       | c  |		Execute	Discrete,Above_Bound
088f 7005       |p   |		Jump_Nonzero	0x895
0890 e5ff       |    |		Load	0x2,-0x1
0891 00d9       |    |		Load_Top	At_Offset_1
0892 e408       |    |		Load	0x2,0x8
0893 01d6       |    |		Execute	Vector,Field_Write
0894 3ffb       |?   |		Loop_Increasing	0x890
0895 00cd       |    |		Action	Spare6_Action
0896 00da       |    |		Load_Top	At_Offset_2
0897 00da       |    |		Load_Top	At_Offset_2
0898 e404       |    |		Load	0x2,0x4
0899 01ce       |    |		Execute	Vector,Slice_Write
089a 00d3       |    |		Pop_Control	Pop_Count_3
089b e5fd       |    |		Load	0x2,-0x3
089c 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
089d e5fe       |    |		Load	0x2,-0x2
089e 0273       | s  |		Execute	Discrete,Plus
089f e5fd       |    |		Load	0x2,-0x3
08a0 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
08a1 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
08a2 e5fe       |    |		Load	0x2,-0x2
08a3 e5fd       |    |		Load	0x2,-0x3
08a4 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
08a5 027d       | }  |		Execute	Discrete,Greater
08a6 6818       |h   |		Jump_Zero	0x8bf
08a7 e5fd       |    |		Load	0x2,-0x3
08a8 00d8       |    |		Load_Top	At_Offset_0
08a9 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08aa 00d8       |    |		Load_Top	At_Offset_0
08ab 0335       | 5  |		Declare_Variable	Array,Duplicate
08ac 00cd       |    |		Action	Spare6_Action
08ad 00d9       |    |		Load_Top	At_Offset_1
08ae 01d9       |    |		Execute	Vector,Reverse_Bounds
08af 0263       | c  |		Execute	Discrete,Above_Bound
08b0 7005       |p   |		Jump_Nonzero	0x8b6
08b1 e5ff       |    |		Load	0x2,-0x1
08b2 00d9       |    |		Load_Top	At_Offset_1
08b3 e406       |    |		Load	0x2,0x6
08b4 01d6       |    |		Execute	Vector,Field_Write
08b5 3ffb       |?   |		Loop_Increasing	0x8b1
08b6 00cd       |    |		Action	Spare6_Action
08b7 00d9       |    |		Load_Top	At_Offset_1
08b8 2903       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
08b9 00d1       |    |		Pop_Control	Pop_Count_1
08ba e5fd       |    |		Load	0x2,-0x3
08bb 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
08bc e5fd       |    |		Load	0x2,-0x3
08bd 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
08be 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
08bf 4801       |H   |		Short_Literal	0x1
08c0 e5fd       |    |		Load	0x2,-0x3
08c1 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
08c2 00da       |    |		Load_Top	At_Offset_2
08c3 0272       | r  |		Execute	Discrete,Minus
08c4 e5fd       |    |		Load	0x2,-0x3
08c5 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08c6 01cf       |    |		Execute	Vector,Slice_Read
08c7 e5fe       |    |		Load	0x2,-0x2
08c8 0a01       |    |		Execute_Immediate	Plus,0x1
08c9 e5fd       |    |		Load	0x2,-0x3
08ca 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
08cb e5fd       |    |		Load	0x2,-0x3
08cc 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08cd 01ce       |    |		Execute	Vector,Slice_Write
08ce e5fd       |    |		Load	0x2,-0x3
08cf 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08d0 4801       |H   |		Short_Literal	0x1
08d1 e5fe       |    |		Load	0x2,-0x2
08d2 00d9       |    |		Load_Top	At_Offset_1
08d3 00d9       |    |		Load_Top	At_Offset_1
08d4 e404       |    |		Load	0x2,0x4
08d5 035b       | [  |		Declare_Type	Array,Constrained
08d6 00db       |    |		Load_Top	At_Offset_3
08d7 01cd       |    |		Execute	Vector,Slice_Reference
08d8 00d8       |    |		Load_Top	At_Offset_0
08d9 0335       | 5  |		Declare_Variable	Array,Duplicate
08da 00cd       |    |		Action	Spare6_Action
08db 00d9       |    |		Load_Top	At_Offset_1
08dc 01d9       |    |		Execute	Vector,Reverse_Bounds
08dd 0263       | c  |		Execute	Discrete,Above_Bound
08de 7005       |p   |		Jump_Nonzero	0x8e4
08df e5ff       |    |		Load	0x2,-0x1
08e0 00d9       |    |		Load_Top	At_Offset_1
08e1 e408       |    |		Load	0x2,0x8
08e2 01d6       |    |		Execute	Vector,Field_Write
08e3 3ffb       |?   |		Loop_Increasing	0x8df
08e4 00cd       |    |		Action	Spare6_Action
08e5 00da       |    |		Load_Top	At_Offset_2
08e6 00da       |    |		Load_Top	At_Offset_2
08e7 e404       |    |		Load	0x2,0x4
08e8 01ce       |    |		Execute	Vector,Slice_Write
08e9 00d3       |    |		Pop_Control	Pop_Count_3
08ea e5fd       |    |		Load	0x2,-0x3
08eb 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
08ec e5fd       |    |		Load	0x2,-0x3
08ed 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
08ee 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
08ef 0000       |    |		.XXX[0x1]
08f0 ; --------------------------------------------------------------------------------------
08f0 ; SUBPROGRAM
08f0 ; --------------------------------------------------------------------------------------
08f0 08fe       |    |		.CONST	0x08fe								; Address of begin
08f1 0004       |    |		.CONST	0x0004								; Address of exception handler
08f2 0003       |    |		.CONST	0x0003								; Number of locals
08f3			INIT_08f0:
08f3 00da       |    |		Load_Top	At_Offset_2
08f4 0227       | '  |		Execute	Access,All_Reference
08f5 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
08f6 00db       |    |		Load_Top	At_Offset_3
08f7 0227       | '  |		Execute	Access,All_Reference
08f8 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
08f9 0272       | r  |		Execute	Discrete,Minus
08fa e002       |    |		Load	0x0,0x2
08fb 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
08fc e002       |    |		Load	0x0,0x2
08fd 0007       |    |		Action	Break_Optional
08fe			BODY_08f0:
08fe 00d9       |    |		Load_Top	At_Offset_1
08ff e5fe       |    |		Load	0x2,-0x2
0900 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0901 027b       | {  |		Execute	Discrete,Greater_Equal
0902 682c       |h,  |		Jump_Zero	0x92f
0903 4801       |H   |		Short_Literal	0x1
0904 e5ff       |    |		Load	0x2,-0x1
0905 0227       | '  |		Execute	Access,All_Reference
0906 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0907 e5ff       |    |		Load	0x2,-0x1
0908 0227       | '  |		Execute	Access,All_Reference
0909 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
090a 01cf       |    |		Execute	Vector,Slice_Read
090b e5fe       |    |		Load	0x2,-0x2
090c 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
090d 0a01       |    |		Execute_Immediate	Plus,0x1
090e e5fe       |    |		Load	0x2,-0x2
090f 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0910 e5ff       |    |		Load	0x2,-0x1
0911 0227       | '  |		Execute	Access,All_Reference
0912 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0913 0273       | s  |		Execute	Discrete,Plus
0914 e5ff       |    |		Load	0x2,-0x1
0915 0229       | )  |		Execute	Access,All_Read
0916 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0917 01ce       |    |		Execute	Vector,Slice_Write
0918 4801       |H   |		Short_Literal	0x1
0919 e5fe       |    |		Load	0x2,-0x2
091a 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
091b e5fe       |    |		Load	0x2,-0x2
091c 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
091d 01cf       |    |		Execute	Vector,Slice_Read
091e 4801       |H   |		Short_Literal	0x1
091f e5fe       |    |		Load	0x2,-0x2
0920 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0921 e5ff       |    |		Load	0x2,-0x1
0922 0229       | )  |		Execute	Access,All_Read
0923 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0924 01ce       |    |		Execute	Vector,Slice_Write
0925 e5ff       |    |		Load	0x2,-0x1
0926 0227       | '  |		Execute	Access,All_Reference
0927 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0928 e5fe       |    |		Load	0x2,-0x2
0929 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
092a 0273       | s  |		Execute	Discrete,Plus
092b e5ff       |    |		Load	0x2,-0x1
092c 0227       | '  |		Execute	Access,All_Reference
092d 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
092e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
092f e5fe       |    |		Load	0x2,-0x2
0930 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0931 e5ff       |    |		Load	0x2,-0x1
0932 0227       | '  |		Execute	Access,All_Reference
0933 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0934 027d       | }  |		Execute	Discrete,Greater
0935 6811       |h   |		Jump_Zero	0x947
0936 4801       |H   |		Short_Literal	0x1
0937 e5ff       |    |		Load	0x2,-0x1
0938 0227       | '  |		Execute	Access,All_Reference
0939 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
093a e5fe       |    |		Load	0x2,-0x2
093b 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
093c 01cf       |    |		Execute	Vector,Slice_Read
093d e5ff       |    |		Load	0x2,-0x1
093e 0227       | '  |		Execute	Access,All_Reference
093f 2903       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0940 e5ff       |    |		Load	0x2,-0x1
0941 0227       | '  |		Execute	Access,All_Reference
0942 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0943 e5ff       |    |		Load	0x2,-0x1
0944 0227       | '  |		Execute	Access,All_Reference
0945 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0946 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0947 4801       |H   |		Short_Literal	0x1
0948 e5ff       |    |		Load	0x2,-0x1
0949 0227       | '  |		Execute	Access,All_Reference
094a 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
094b 00da       |    |		Load_Top	At_Offset_2
094c 0272       | r  |		Execute	Discrete,Minus
094d e5ff       |    |		Load	0x2,-0x1
094e 0227       | '  |		Execute	Access,All_Reference
094f 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0950 01cf       |    |		Execute	Vector,Slice_Read
0951 e5fe       |    |		Load	0x2,-0x2
0952 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0953 0a01       |    |		Execute_Immediate	Plus,0x1
0954 e5ff       |    |		Load	0x2,-0x1
0955 0227       | '  |		Execute	Access,All_Reference
0956 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0957 e5ff       |    |		Load	0x2,-0x1
0958 0229       | )  |		Execute	Access,All_Read
0959 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
095a 01ce       |    |		Execute	Vector,Slice_Write
095b 4801       |H   |		Short_Literal	0x1
095c e5fe       |    |		Load	0x2,-0x2
095d 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
095e e5fe       |    |		Load	0x2,-0x2
095f 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0960 01cf       |    |		Execute	Vector,Slice_Read
0961 4801       |H   |		Short_Literal	0x1
0962 e5fe       |    |		Load	0x2,-0x2
0963 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0964 e5ff       |    |		Load	0x2,-0x1
0965 0229       | )  |		Execute	Access,All_Read
0966 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0967 01ce       |    |		Execute	Vector,Slice_Write
0968 e5ff       |    |		Load	0x2,-0x1
0969 0227       | '  |		Execute	Access,All_Reference
096a 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
096b e5ff       |    |		Load	0x2,-0x1
096c 0227       | '  |		Execute	Access,All_Reference
096d 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
096e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
096f 0000       |    |		.XXX[0x1]
0970 ; --------------------------------------------------------------------------------------
0970 ; SUBPROGRAM
0970 ; --------------------------------------------------------------------------------------
0970 097e       | ~  |		.CONST	0x097e								; Address of begin
0971 0004       |    |		.CONST	0x0004								; Address of exception handler
0972 0003       |    |		.CONST	0x0003								; Number of locals
0973			INIT_0970:
0973 00da       |    |		Load_Top	At_Offset_2
0974 0227       | '  |		Execute	Access,All_Reference
0975 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0976 00db       |    |		Load_Top	At_Offset_3
0977 0227       | '  |		Execute	Access,All_Reference
0978 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0979 0272       | r  |		Execute	Discrete,Minus
097a e002       |    |		Load	0x0,0x2
097b 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
097c e002       |    |		Load	0x0,0x2
097d 0007       |    |		Action	Break_Optional
097e			BODY_0970:
097e 00d9       |    |		Load_Top	At_Offset_1
097f e5fe       |    |		Load	0x2,-0x2
0980 0227       | '  |		Execute	Access,All_Reference
0981 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0982 027b       | {  |		Execute	Discrete,Greater_Equal
0983 6832       |h2  |		Jump_Zero	0x9b6
0984 4801       |H   |		Short_Literal	0x1
0985 e5ff       |    |		Load	0x2,-0x1
0986 0227       | '  |		Execute	Access,All_Reference
0987 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0988 e5ff       |    |		Load	0x2,-0x1
0989 0227       | '  |		Execute	Access,All_Reference
098a 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
098b 01cf       |    |		Execute	Vector,Slice_Read
098c e5fe       |    |		Load	0x2,-0x2
098d 0227       | '  |		Execute	Access,All_Reference
098e 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
098f 0a01       |    |		Execute_Immediate	Plus,0x1
0990 e5fe       |    |		Load	0x2,-0x2
0991 0227       | '  |		Execute	Access,All_Reference
0992 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0993 e5ff       |    |		Load	0x2,-0x1
0994 0227       | '  |		Execute	Access,All_Reference
0995 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0996 0273       | s  |		Execute	Discrete,Plus
0997 e5ff       |    |		Load	0x2,-0x1
0998 0229       | )  |		Execute	Access,All_Read
0999 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
099a 01ce       |    |		Execute	Vector,Slice_Write
099b 4801       |H   |		Short_Literal	0x1
099c e5fe       |    |		Load	0x2,-0x2
099d 0227       | '  |		Execute	Access,All_Reference
099e 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
099f e5fe       |    |		Load	0x2,-0x2
09a0 0227       | '  |		Execute	Access,All_Reference
09a1 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
09a2 01cf       |    |		Execute	Vector,Slice_Read
09a3 4801       |H   |		Short_Literal	0x1
09a4 e5fe       |    |		Load	0x2,-0x2
09a5 0227       | '  |		Execute	Access,All_Reference
09a6 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
09a7 e5ff       |    |		Load	0x2,-0x1
09a8 0229       | )  |		Execute	Access,All_Read
09a9 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
09aa 01ce       |    |		Execute	Vector,Slice_Write
09ab e5ff       |    |		Load	0x2,-0x1
09ac 0227       | '  |		Execute	Access,All_Reference
09ad 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
09ae e5fe       |    |		Load	0x2,-0x2
09af 0227       | '  |		Execute	Access,All_Reference
09b0 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
09b1 0273       | s  |		Execute	Discrete,Plus
09b2 e5ff       |    |		Load	0x2,-0x1
09b3 0227       | '  |		Execute	Access,All_Reference
09b4 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
09b5 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
09b6 e5fe       |    |		Load	0x2,-0x2
09b7 0227       | '  |		Execute	Access,All_Reference
09b8 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
09b9 e5ff       |    |		Load	0x2,-0x1
09ba 0227       | '  |		Execute	Access,All_Reference
09bb 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
09bc 027d       | }  |		Execute	Discrete,Greater
09bd 6812       |h   |		Jump_Zero	0x9d0
09be 4801       |H   |		Short_Literal	0x1
09bf e5ff       |    |		Load	0x2,-0x1
09c0 0227       | '  |		Execute	Access,All_Reference
09c1 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
09c2 e5fe       |    |		Load	0x2,-0x2
09c3 0227       | '  |		Execute	Access,All_Reference
09c4 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
09c5 01cf       |    |		Execute	Vector,Slice_Read
09c6 e5ff       |    |		Load	0x2,-0x1
09c7 0227       | '  |		Execute	Access,All_Reference
09c8 2903       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
09c9 e5ff       |    |		Load	0x2,-0x1
09ca 0227       | '  |		Execute	Access,All_Reference
09cb 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
09cc e5ff       |    |		Load	0x2,-0x1
09cd 0227       | '  |		Execute	Access,All_Reference
09ce 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
09cf 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
09d0 4801       |H   |		Short_Literal	0x1
09d1 e5ff       |    |		Load	0x2,-0x1
09d2 0227       | '  |		Execute	Access,All_Reference
09d3 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
09d4 00da       |    |		Load_Top	At_Offset_2
09d5 0272       | r  |		Execute	Discrete,Minus
09d6 e5ff       |    |		Load	0x2,-0x1
09d7 0227       | '  |		Execute	Access,All_Reference
09d8 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
09d9 01cf       |    |		Execute	Vector,Slice_Read
09da e5fe       |    |		Load	0x2,-0x2
09db 0227       | '  |		Execute	Access,All_Reference
09dc 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
09dd 0a01       |    |		Execute_Immediate	Plus,0x1
09de e5ff       |    |		Load	0x2,-0x1
09df 0227       | '  |		Execute	Access,All_Reference
09e0 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
09e1 e5ff       |    |		Load	0x2,-0x1
09e2 0229       | )  |		Execute	Access,All_Read
09e3 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
09e4 01ce       |    |		Execute	Vector,Slice_Write
09e5 4801       |H   |		Short_Literal	0x1
09e6 e5fe       |    |		Load	0x2,-0x2
09e7 0227       | '  |		Execute	Access,All_Reference
09e8 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
09e9 e5fe       |    |		Load	0x2,-0x2
09ea 0227       | '  |		Execute	Access,All_Reference
09eb 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
09ec 01cf       |    |		Execute	Vector,Slice_Read
09ed 4801       |H   |		Short_Literal	0x1
09ee e5fe       |    |		Load	0x2,-0x2
09ef 0227       | '  |		Execute	Access,All_Reference
09f0 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
09f1 e5ff       |    |		Load	0x2,-0x1
09f2 0229       | )  |		Execute	Access,All_Read
09f3 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
09f4 01ce       |    |		Execute	Vector,Slice_Write
09f5 e5ff       |    |		Load	0x2,-0x1
09f6 0227       | '  |		Execute	Access,All_Reference
09f7 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
09f8 e5ff       |    |		Load	0x2,-0x1
09f9 0227       | '  |		Execute	Access,All_Reference
09fa 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
09fb 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
09fc 0000 0000  |    |		.BLANK	0000[0x4]
0a00 ; --------------------------------------------------------------------------------------
0a00 ; SUBPROGRAM
0a00 ; --------------------------------------------------------------------------------------
0a00 0a12       |    |		.CONST	0x0a12								; Address of begin
0a01 0004       |    |		.CONST	0x0004								; Address of exception handler
0a02 0004       |    |		.CONST	0x0004								; Number of locals
0a03			INIT_0a00:
0a03 00da       |    |		Load_Top	At_Offset_2
0a04 0227       | '  |		Execute	Access,All_Reference
0a05 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a06 00db       |    |		Load_Top	At_Offset_3
0a07 0227       | '  |		Execute	Access,All_Reference
0a08 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0a09 0272       | r  |		Execute	Discrete,Minus
0a0a e002       |    |		Load	0x0,0x2
0a0b 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0a0c e002       |    |		Load	0x0,0x2
0a0d 0007       |    |		Action	Break_Optional
0a0e e5fe       |    |		Load	0x2,-0x2
0a0f 01db       |    |		Execute	Vector,Length
0a10 e002       |    |		Load	0x0,0x2
0a11 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0a12			BODY_0a00:
0a12 00da       |    |		Load_Top	At_Offset_2
0a13 00d9       |    |		Load_Top	At_Offset_1
0a14 027b       | {  |		Execute	Discrete,Greater_Equal
0a15 6823       |h#  |		Jump_Zero	0xa39
0a16 4801       |H   |		Short_Literal	0x1
0a17 e5ff       |    |		Load	0x2,-0x1
0a18 0227       | '  |		Execute	Access,All_Reference
0a19 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0a1a e5ff       |    |		Load	0x2,-0x1
0a1b 0227       | '  |		Execute	Access,All_Reference
0a1c 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a1d 01cf       |    |		Execute	Vector,Slice_Read
0a1e 00d9       |    |		Load_Top	At_Offset_1
0a1f 0a01       |    |		Execute_Immediate	Plus,0x1
0a20 00da       |    |		Load_Top	At_Offset_2
0a21 e5ff       |    |		Load	0x2,-0x1
0a22 0227       | '  |		Execute	Access,All_Reference
0a23 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0a24 0273       | s  |		Execute	Discrete,Plus
0a25 e5ff       |    |		Load	0x2,-0x1
0a26 0229       | )  |		Execute	Access,All_Read
0a27 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a28 01ce       |    |		Execute	Vector,Slice_Write
0a29 e5fe       |    |		Load	0x2,-0x2
0a2a 4801       |H   |		Short_Literal	0x1
0a2b 00da       |    |		Load_Top	At_Offset_2
0a2c e5ff       |    |		Load	0x2,-0x1
0a2d 0229       | )  |		Execute	Access,All_Read
0a2e 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a2f 01ce       |    |		Execute	Vector,Slice_Write
0a30 e5ff       |    |		Load	0x2,-0x1
0a31 0227       | '  |		Execute	Access,All_Reference
0a32 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0a33 00d9       |    |		Load_Top	At_Offset_1
0a34 0273       | s  |		Execute	Discrete,Plus
0a35 e5ff       |    |		Load	0x2,-0x1
0a36 0227       | '  |		Execute	Access,All_Reference
0a37 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0a38 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0a39 00d8       |    |		Load_Top	At_Offset_0
0a3a e5ff       |    |		Load	0x2,-0x1
0a3b 0227       | '  |		Execute	Access,All_Reference
0a3c 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a3d 027d       | }  |		Execute	Discrete,Greater
0a3e 6815       |h   |		Jump_Zero	0xa54
0a3f e5fe       |    |		Load	0x2,-0x2
0a40 01dd       |    |		Execute	Vector,First
0a41 e5fe       |    |		Load	0x2,-0x2
0a42 01dd       |    |		Execute	Vector,First
0a43 e5ff       |    |		Load	0x2,-0x1
0a44 0227       | '  |		Execute	Access,All_Reference
0a45 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a46 0273       | s  |		Execute	Discrete,Plus
0a47 0aff       |    |		Execute_Immediate	Plus,-0x1
0a48 e5fe       |    |		Load	0x2,-0x2
0a49 01cf       |    |		Execute	Vector,Slice_Read
0a4a e5ff       |    |		Load	0x2,-0x1
0a4b 0227       | '  |		Execute	Access,All_Reference
0a4c 2903       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0a4d e5ff       |    |		Load	0x2,-0x1
0a4e 0227       | '  |		Execute	Access,All_Reference
0a4f 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a50 e5ff       |    |		Load	0x2,-0x1
0a51 0227       | '  |		Execute	Access,All_Reference
0a52 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0a53 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0a54 4801       |H   |		Short_Literal	0x1
0a55 e5ff       |    |		Load	0x2,-0x1
0a56 0227       | '  |		Execute	Access,All_Reference
0a57 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a58 00db       |    |		Load_Top	At_Offset_3
0a59 0272       | r  |		Execute	Discrete,Minus
0a5a e5ff       |    |		Load	0x2,-0x1
0a5b 0227       | '  |		Execute	Access,All_Reference
0a5c 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a5d 01cf       |    |		Execute	Vector,Slice_Read
0a5e 00d9       |    |		Load_Top	At_Offset_1
0a5f 0a01       |    |		Execute_Immediate	Plus,0x1
0a60 e5ff       |    |		Load	0x2,-0x1
0a61 0227       | '  |		Execute	Access,All_Reference
0a62 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a63 e5ff       |    |		Load	0x2,-0x1
0a64 0229       | )  |		Execute	Access,All_Read
0a65 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a66 01ce       |    |		Execute	Vector,Slice_Write
0a67 e5fe       |    |		Load	0x2,-0x2
0a68 4801       |H   |		Short_Literal	0x1
0a69 00da       |    |		Load_Top	At_Offset_2
0a6a e5ff       |    |		Load	0x2,-0x1
0a6b 0229       | )  |		Execute	Access,All_Read
0a6c 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a6d 01ce       |    |		Execute	Vector,Slice_Write
0a6e e5ff       |    |		Load	0x2,-0x1
0a6f 0227       | '  |		Execute	Access,All_Reference
0a70 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a71 e5ff       |    |		Load	0x2,-0x1
0a72 0227       | '  |		Execute	Access,All_Reference
0a73 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0a74 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0a75 0000 0000  |    |		.XXX[0x3]
0a77 0000       |    |
0a78 ; --------------------------------------------------------------------------------------
0a78 ; SUBPROGRAM
0a78 ; --------------------------------------------------------------------------------------
0a78 0a86       |    |		.CONST	0x0a86								; Address of begin
0a79 0004       |    |		.CONST	0x0004								; Address of exception handler
0a7a 0003       |    |		.CONST	0x0003								; Number of locals
0a7b			INIT_0a78:
0a7b 00da       |    |		Load_Top	At_Offset_2
0a7c 0227       | '  |		Execute	Access,All_Reference
0a7d 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a7e 00db       |    |		Load_Top	At_Offset_3
0a7f 0227       | '  |		Execute	Access,All_Reference
0a80 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0a81 0272       | r  |		Execute	Discrete,Minus
0a82 e002       |    |		Load	0x0,0x2
0a83 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0a84 e002       |    |		Load	0x0,0x2
0a85 0007       |    |		Action	Break_Optional
0a86			BODY_0a78:
0a86 00d9       |    |		Load_Top	At_Offset_1
0a87 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0a88 681f       |h   |		Jump_Zero	0xaa8
0a89 4801       |H   |		Short_Literal	0x1
0a8a e5ff       |    |		Load	0x2,-0x1
0a8b 0227       | '  |		Execute	Access,All_Reference
0a8c 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0a8d e5ff       |    |		Load	0x2,-0x1
0a8e 0227       | '  |		Execute	Access,All_Reference
0a8f 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a90 01cf       |    |		Execute	Vector,Slice_Read
0a91 4802       |H   |		Short_Literal	0x2
0a92 e5ff       |    |		Load	0x2,-0x1
0a93 0227       | '  |		Execute	Access,All_Reference
0a94 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0a95 0a01       |    |		Execute_Immediate	Plus,0x1
0a96 e5ff       |    |		Load	0x2,-0x1
0a97 0229       | )  |		Execute	Access,All_Read
0a98 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a99 01ce       |    |		Execute	Vector,Slice_Write
0a9a e5fe       |    |		Load	0x2,-0x2
0a9b 4801       |H   |		Short_Literal	0x1
0a9c e5ff       |    |		Load	0x2,-0x1
0a9d 0227       | '  |		Execute	Access,All_Reference
0a9e 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a9f 01d6       |    |		Execute	Vector,Field_Write
0aa0 e5ff       |    |		Load	0x2,-0x1
0aa1 0227       | '  |		Execute	Access,All_Reference
0aa2 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0aa3 0a01       |    |		Execute_Immediate	Plus,0x1
0aa4 e5ff       |    |		Load	0x2,-0x1
0aa5 0227       | '  |		Execute	Access,All_Reference
0aa6 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0aa7 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0aa8 e5ff       |    |		Load	0x2,-0x1
0aa9 0227       | '  |		Execute	Access,All_Reference
0aaa 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0aab 0d01       |    |		Execute_Immediate	Less,0x1
0aac 6802       |h   |		Jump_Zero	0xaaf
0aad 0008       |    |		Action	Idle
0aae 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0aaf 4801       |H   |		Short_Literal	0x1
0ab0 e5ff       |    |		Load	0x2,-0x1
0ab1 0227       | '  |		Execute	Access,All_Reference
0ab2 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0ab3 0aff       |    |		Execute_Immediate	Plus,-0x1
0ab4 e5ff       |    |		Load	0x2,-0x1
0ab5 0227       | '  |		Execute	Access,All_Reference
0ab6 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0ab7 01cf       |    |		Execute	Vector,Slice_Read
0ab8 4802       |H   |		Short_Literal	0x2
0ab9 e5ff       |    |		Load	0x2,-0x1
0aba 0227       | '  |		Execute	Access,All_Reference
0abb 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0abc e5ff       |    |		Load	0x2,-0x1
0abd 0229       | )  |		Execute	Access,All_Read
0abe 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0abf 01ce       |    |		Execute	Vector,Slice_Write
0ac0 e5fe       |    |		Load	0x2,-0x2
0ac1 4801       |H   |		Short_Literal	0x1
0ac2 e5ff       |    |		Load	0x2,-0x1
0ac3 0227       | '  |		Execute	Access,All_Reference
0ac4 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0ac5 01d6       |    |		Execute	Vector,Field_Write
0ac6 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0ac7 0000       |    |		.XXX[0x1]
0ac8 ; --------------------------------------------------------------------------------------
0ac8 ; SUBPROGRAM
0ac8 ; --------------------------------------------------------------------------------------
0ac8 0ad6       |    |		.CONST	0x0ad6								; Address of begin
0ac9 0004       |    |		.CONST	0x0004								; Address of exception handler
0aca 0003       |    |		.CONST	0x0003								; Number of locals
0acb			INIT_0ac8:
0acb 00da       |    |		Load_Top	At_Offset_2
0acc 0227       | '  |		Execute	Access,All_Reference
0acd 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0ace 00db       |    |		Load_Top	At_Offset_3
0acf 0227       | '  |		Execute	Access,All_Reference
0ad0 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0ad1 0272       | r  |		Execute	Discrete,Minus
0ad2 e002       |    |		Load	0x0,0x2
0ad3 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0ad4 e002       |    |		Load	0x0,0x2
0ad5 0007       |    |		Action	Break_Optional
0ad6			BODY_0ac8:
0ad6 00d9       |    |		Load_Top	At_Offset_1
0ad7 e5fd       |    |		Load	0x2,-0x3
0ad8 027b       | {  |		Execute	Discrete,Greater_Equal
0ad9 6839       |h9  |		Jump_Zero	0xb13
0ada 4801       |H   |		Short_Literal	0x1
0adb e5ff       |    |		Load	0x2,-0x1
0adc 0227       | '  |		Execute	Access,All_Reference
0add 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0ade e5ff       |    |		Load	0x2,-0x1
0adf 0227       | '  |		Execute	Access,All_Reference
0ae0 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0ae1 01cf       |    |		Execute	Vector,Slice_Read
0ae2 e5fd       |    |		Load	0x2,-0x3
0ae3 0a01       |    |		Execute_Immediate	Plus,0x1
0ae4 e5fd       |    |		Load	0x2,-0x3
0ae5 e5ff       |    |		Load	0x2,-0x1
0ae6 0227       | '  |		Execute	Access,All_Reference
0ae7 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0ae8 0273       | s  |		Execute	Discrete,Plus
0ae9 e5ff       |    |		Load	0x2,-0x1
0aea 0229       | )  |		Execute	Access,All_Read
0aeb 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0aec 01ce       |    |		Execute	Vector,Slice_Write
0aed e5ff       |    |		Load	0x2,-0x1
0aee 0229       | )  |		Execute	Access,All_Read
0aef 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0af0 4801       |H   |		Short_Literal	0x1
0af1 e5fd       |    |		Load	0x2,-0x3
0af2 00d9       |    |		Load_Top	At_Offset_1
0af3 00d9       |    |		Load_Top	At_Offset_1
0af4 e404       |    |		Load	0x2,0x4
0af5 035b       | [  |		Declare_Type	Array,Constrained
0af6 00db       |    |		Load_Top	At_Offset_3
0af7 01cd       |    |		Execute	Vector,Slice_Reference
0af8 00d8       |    |		Load_Top	At_Offset_0
0af9 0335       | 5  |		Declare_Variable	Array,Duplicate
0afa 00cd       |    |		Action	Spare6_Action
0afb 00d9       |    |		Load_Top	At_Offset_1
0afc 01d9       |    |		Execute	Vector,Reverse_Bounds
0afd 0263       | c  |		Execute	Discrete,Above_Bound
0afe 7005       |p   |		Jump_Nonzero	0xb04
0aff e5fe       |    |		Load	0x2,-0x2
0b00 00d9       |    |		Load_Top	At_Offset_1
0b01 e408       |    |		Load	0x2,0x8
0b02 01d6       |    |		Execute	Vector,Field_Write
0b03 3ffb       |?   |		Loop_Increasing	0xaff
0b04 00cd       |    |		Action	Spare6_Action
0b05 00da       |    |		Load_Top	At_Offset_2
0b06 00da       |    |		Load_Top	At_Offset_2
0b07 e404       |    |		Load	0x2,0x4
0b08 01ce       |    |		Execute	Vector,Slice_Write
0b09 00d3       |    |		Pop_Control	Pop_Count_3
0b0a e5ff       |    |		Load	0x2,-0x1
0b0b 0227       | '  |		Execute	Access,All_Reference
0b0c 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0b0d e5fd       |    |		Load	0x2,-0x3
0b0e 0273       | s  |		Execute	Discrete,Plus
0b0f e5ff       |    |		Load	0x2,-0x1
0b10 0227       | '  |		Execute	Access,All_Reference
0b11 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0b12 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0b13 e5fd       |    |		Load	0x2,-0x3
0b14 e5ff       |    |		Load	0x2,-0x1
0b15 0227       | '  |		Execute	Access,All_Reference
0b16 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0b17 027d       | }  |		Execute	Discrete,Greater
0b18 681b       |h   |		Jump_Zero	0xb34
0b19 e5ff       |    |		Load	0x2,-0x1
0b1a 0229       | )  |		Execute	Access,All_Read
0b1b 00d8       |    |		Load_Top	At_Offset_0
0b1c 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b1d 00d8       |    |		Load_Top	At_Offset_0
0b1e 0335       | 5  |		Declare_Variable	Array,Duplicate
0b1f 00cd       |    |		Action	Spare6_Action
0b20 00d9       |    |		Load_Top	At_Offset_1
0b21 01d9       |    |		Execute	Vector,Reverse_Bounds
0b22 0263       | c  |		Execute	Discrete,Above_Bound
0b23 7005       |p   |		Jump_Nonzero	0xb29
0b24 e5fe       |    |		Load	0x2,-0x2
0b25 00d9       |    |		Load_Top	At_Offset_1
0b26 e406       |    |		Load	0x2,0x6
0b27 01d6       |    |		Execute	Vector,Field_Write
0b28 3ffb       |?   |		Loop_Increasing	0xb24
0b29 00cd       |    |		Action	Spare6_Action
0b2a 00d9       |    |		Load_Top	At_Offset_1
0b2b 2903       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0b2c 00d1       |    |		Pop_Control	Pop_Count_1
0b2d e5ff       |    |		Load	0x2,-0x1
0b2e 0227       | '  |		Execute	Access,All_Reference
0b2f 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0b30 e5ff       |    |		Load	0x2,-0x1
0b31 0227       | '  |		Execute	Access,All_Reference
0b32 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0b33 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0b34 4801       |H   |		Short_Literal	0x1
0b35 e5ff       |    |		Load	0x2,-0x1
0b36 0227       | '  |		Execute	Access,All_Reference
0b37 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0b38 00da       |    |		Load_Top	At_Offset_2
0b39 0272       | r  |		Execute	Discrete,Minus
0b3a e5ff       |    |		Load	0x2,-0x1
0b3b 0227       | '  |		Execute	Access,All_Reference
0b3c 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b3d 01cf       |    |		Execute	Vector,Slice_Read
0b3e e5fd       |    |		Load	0x2,-0x3
0b3f 0a01       |    |		Execute_Immediate	Plus,0x1
0b40 e5ff       |    |		Load	0x2,-0x1
0b41 0227       | '  |		Execute	Access,All_Reference
0b42 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0b43 e5ff       |    |		Load	0x2,-0x1
0b44 0229       | )  |		Execute	Access,All_Read
0b45 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b46 01ce       |    |		Execute	Vector,Slice_Write
0b47 e5ff       |    |		Load	0x2,-0x1
0b48 0229       | )  |		Execute	Access,All_Read
0b49 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b4a 4801       |H   |		Short_Literal	0x1
0b4b e5fd       |    |		Load	0x2,-0x3
0b4c 00d9       |    |		Load_Top	At_Offset_1
0b4d 00d9       |    |		Load_Top	At_Offset_1
0b4e e404       |    |		Load	0x2,0x4
0b4f 035b       | [  |		Declare_Type	Array,Constrained
0b50 00db       |    |		Load_Top	At_Offset_3
0b51 01cd       |    |		Execute	Vector,Slice_Reference
0b52 00d8       |    |		Load_Top	At_Offset_0
0b53 0335       | 5  |		Declare_Variable	Array,Duplicate
0b54 00cd       |    |		Action	Spare6_Action
0b55 00d9       |    |		Load_Top	At_Offset_1
0b56 01d9       |    |		Execute	Vector,Reverse_Bounds
0b57 0263       | c  |		Execute	Discrete,Above_Bound
0b58 7005       |p   |		Jump_Nonzero	0xb5e
0b59 e5fe       |    |		Load	0x2,-0x2
0b5a 00d9       |    |		Load_Top	At_Offset_1
0b5b e408       |    |		Load	0x2,0x8
0b5c 01d6       |    |		Execute	Vector,Field_Write
0b5d 3ffb       |?   |		Loop_Increasing	0xb59
0b5e 00cd       |    |		Action	Spare6_Action
0b5f 00da       |    |		Load_Top	At_Offset_2
0b60 00da       |    |		Load_Top	At_Offset_2
0b61 e404       |    |		Load	0x2,0x4
0b62 01ce       |    |		Execute	Vector,Slice_Write
0b63 00d3       |    |		Pop_Control	Pop_Count_3
0b64 e5ff       |    |		Load	0x2,-0x1
0b65 0227       | '  |		Execute	Access,All_Reference
0b66 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0b67 e5ff       |    |		Load	0x2,-0x1
0b68 0227       | '  |		Execute	Access,All_Reference
0b69 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0b6a 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0b6b 0000 0000  |    |		.BLANK	0000[0x5]
0b70 ; --------------------------------------------------------------------------------------
0b70 ; Debug Table
0b70 ; --------------------------------------------------------------------------------------
0b70 0004 0000  |    |		.DEBUG4	0x0004,0x0000,0x4d26,0x0000,0x0001,0x002d
0b76 000b 0c2a  |   *|		.DBG4T	0x000b,0x0c2a,0x8000,0x0000
0b7a 0062 0c57  | b W|		.DBG4T	0x0062,0x0c57,0x8000,0x0000
0b7e 00c3 0c84  |    |		.DBG4T	0x00c3,0x0c84,0x0001,0x0000
0b82 00e3 0c8b  |    |		.DBG4T	0x00e3,0x0c8b,0x0001,0x0000
0b86 0103 0c92  |    |		.DBG4T	0x0103,0x0c92,0x0001,0x0000
0b8a 012b 0c99  | +  |		.DBG4T	0x012b,0x0c99,0x0001,0x0000
0b8e 0143 0c9f  | C  |		.DBG4T	0x0143,0x0c9f,0x0001,0x0000
0b92 0183 0ca6  |    |		.DBG4T	0x0183,0x0ca6,0x0001,0x0000
0b96 01ab 0cad  |    |		.DBG4T	0x01ab,0x0cad,0x0001,0x0000
0b9a 01d3 0cb4  |    |		.DBG4T	0x01d3,0x0cb4,0x0001,0x0000
0b9e 01fb 0cbb  |    |		.DBG4T	0x01fb,0x0cbb,0x0001,0x0000
0ba2 0213 0cc1  |    |		.DBG4T	0x0213,0x0cc1,0x0001,0x0000
0ba6 025b 0cc8  | [  |		.DBG4T	0x025b,0x0cc8,0x0001,0x0000
0baa 028b 0cd3  |    |		.DBG4T	0x028b,0x0cd3,0x0001,0x0000
0bae 02bb 0cdd  |    |		.DBG4T	0x02bb,0x0cdd,0x0001,0x0000
0bb2 02f3 0ce7  |    |		.DBG4T	0x02f3,0x0ce7,0x0001,0x0000
0bb6 0313 0cee  |    |		.DBG4T	0x0313,0x0cee,0x0001,0x0000
0bba 033b 0cf5  | ;  |		.DBG4T	0x033b,0x0cf5,0x0001,0x0000
0bbe 0363 0cfc  | c  |		.DBG4T	0x0363,0x0cfc,0x0001,0x0000
0bc2 037b 0d02  | {  |		.DBG4T	0x037b,0x0d02,0x0001,0x0000
0bc6 03ab 0d08  |    |		.DBG4T	0x03ab,0x0d08,0x0001,0x0000
0bca 03d3 0d0f  |    |		.DBG4T	0x03d3,0x0d0f,0x0001,0x0000
0bce 0403 0d16  |    |		.DBG4T	0x0403,0x0d16,0x0001,0x0000
0bd2 0433 0d1d  | 3  |		.DBG4T	0x0433,0x0d1d,0x0001,0x0000
0bd6 0453 0d23  | S #|		.DBG4T	0x0453,0x0d23,0x0001,0x0000
0bda 048b 0d2a  |   *|		.DBG4T	0x048b,0x0d2a,0x0001,0x0000
0bde 04bb 0d31  |   1|		.DBG4T	0x04bb,0x0d31,0x0001,0x0000
0be2 04f3 0d38  |   8|		.DBG4T	0x04f3,0x0d38,0x0001,0x0000
0be6 052b 0d3f  | + ?|		.DBG4T	0x052b,0x0d3f,0x0001,0x0000
0bea 054b 0d45  | K E|		.DBG4T	0x054b,0x0d45,0x0001,0x0000
0bee 058b 0d4c  |   L|		.DBG4T	0x058b,0x0d4c,0x0001,0x0000
0bf2 05cb 0d57  |   W|		.DBG4T	0x05cb,0x0d57,0x0001,0x0000
0bf6 05fb 0d61  |   a|		.DBG4T	0x05fb,0x0d61,0x0001,0x0000
0bfa 064b 0d6b  | K k|		.DBG4T	0x064b,0x0d6b,0x0001,0x0000
0bfe 068b 0d75  |   u|		.DBG4T	0x068b,0x0d75,0x0001,0x0000
0c02 06d3 0d7f  |    |		.DBG4T	0x06d3,0x0d7f,0x0001,0x0000
0c06 0743 0d8d  | C  |		.DBG4T	0x0743,0x0d8d,0x0001,0x0000
0c0a 07bb 0d9b  |    |		.DBG4T	0x07bb,0x0d9b,0x0001,0x0000
0c0e 0823 0daa  | #  |		.DBG4T	0x0823,0x0daa,0x0001,0x0000
0c12 0863 0db6  | c  |		.DBG4T	0x0863,0x0db6,0x0001,0x0000
0c16 08f3 0dc4  |    |		.DBG4T	0x08f3,0x0dc4,0x0001,0x0000
0c1a 0973 0dd2  | s  |		.DBG4T	0x0973,0x0dd2,0x0001,0x0000
0c1e 0a03 0de0  |    |		.DBG4T	0x0a03,0x0de0,0x0001,0x0000
0c22 0a7b 0def  | {  |		.DBG4T	0x0a7b,0x0def,0x0001,0x0000
0c26 0acb 0dfb  |    |		.DBG4T	0x0acb,0x0dfb,0x0001,0x0000
0c2a ; --------------------------------------------------------------------------------------
0c2a ; Debug chain
0c2a ; --------------------------------------------------------------------------------------
0c2a 002b 0000  | +  |		.DBGLEN	0x002b,0x0000
0c2c 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,0x0047,0x0049,0x004b,0x004d,0x004f,0x0051,0x0053,0x0055,0x0057,0x0059,0x005b,0x005d,0x005f
0c57 ; --------------------------------------------------------------------------------------
0c57 ; Debug chain
0c57 ; --------------------------------------------------------------------------------------
0c57 002b 0000  | +  |		.DBGLEN	0x002b,0x0000
0c59 0062 0064  | b d|		.DBGLNO	0x0062,0x0064,0x0066,0x0068,0x006a,0x006c,0x006e,0x0070,0x0072,0x0074,0x0076,0x0078,0x007a,0x007c,0x007e,0x0080,0x0082,0x0084,0x0086,0x0088,0x008a,0x008c,0x008e,0x0090,0x0092,0x0094,0x0096,0x0098,0x009a,0x009c,0x009e,0x00a0,0x00a2,0x00a4,0x00a6,0x00a8,0x00aa,0x00ac,0x00ae,0x00b0,0x00b2,0x00b4,0x00b6
0c84 ; --------------------------------------------------------------------------------------
0c84 ; Debug chain
0c84 ; --------------------------------------------------------------------------------------
0c84 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0c86 00c3 00c7  |    |		.DBGLNO	0x00c3,0x00c7,0x00cc,0x00cf,0x00d9
0c8b ; --------------------------------------------------------------------------------------
0c8b ; Debug chain
0c8b ; --------------------------------------------------------------------------------------
0c8b 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0c8d 00e3 00e8  |    |		.DBGLNO	0x00e3,0x00e8,0x00ed,0x00f0,0x00fb
0c92 ; --------------------------------------------------------------------------------------
0c92 ; Debug chain
0c92 ; --------------------------------------------------------------------------------------
0c92 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0c94 0103 0107  |    |		.DBGLNO	0x0103,0x0107,0x010c,0x010f,0x011d
0c99 ; --------------------------------------------------------------------------------------
0c99 ; Debug chain
0c99 ; --------------------------------------------------------------------------------------
0c99 0000 0004  |    |		.DBGLEN	0x0000,0x0004
0c9b 012b 012f  | + /|		.DBGLNO	0x012b,0x012f,0x0130,0x0135
0c9f ; --------------------------------------------------------------------------------------
0c9f ; Debug chain
0c9f ; --------------------------------------------------------------------------------------
0c9f 0000 0005  |    |		.DBGLEN	0x0000,0x0005
0ca1 0143 0148  | C H|		.DBGLNO	0x0143,0x0148,0x015b,0x0160,0x017c
0ca6 ; --------------------------------------------------------------------------------------
0ca6 ; Debug chain
0ca6 ; --------------------------------------------------------------------------------------
0ca6 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0ca8 0183 0187  |    |		.DBGLNO	0x0183,0x0187,0x018d,0x0191,0x019c
0cad ; --------------------------------------------------------------------------------------
0cad ; Debug chain
0cad ; --------------------------------------------------------------------------------------
0cad 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0caf 01ab 01b0  |    |		.DBGLNO	0x01ab,0x01b0,0x01b6,0x01ba,0x01c6
0cb4 ; --------------------------------------------------------------------------------------
0cb4 ; Debug chain
0cb4 ; --------------------------------------------------------------------------------------
0cb4 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0cb6 01d3 01d7  |    |		.DBGLNO	0x01d3,0x01d7,0x01dd,0x01e1,0x01f0
0cbb ; --------------------------------------------------------------------------------------
0cbb ; Debug chain
0cbb ; --------------------------------------------------------------------------------------
0cbb 0000 0004  |    |		.DBGLEN	0x0000,0x0004
0cbd 01fb 0200  |    |		.DBGLNO	0x01fb,0x0200,0x0201,0x0207
0cc1 ; --------------------------------------------------------------------------------------
0cc1 ; Debug chain
0cc1 ; --------------------------------------------------------------------------------------
0cc1 0000 0005  |    |		.DBGLEN	0x0000,0x0005
0cc3 0213 0219  |    |		.DBGLNO	0x0213,0x0219,0x022d,0x0234,0x0251
0cc8 ; --------------------------------------------------------------------------------------
0cc8 ; Debug chain
0cc8 ; --------------------------------------------------------------------------------------
0cc8 0002 0007  |    |		.DBGLEN	0x0002,0x0007
0cca 025b 025d  | [ ]|		.DBGLNO	0x025b,0x025d,0x0261,0x0263,0x0269,0x026e,0x0274,0x0278,0x027f
0cd3 ; --------------------------------------------------------------------------------------
0cd3 ; Debug chain
0cd3 ; --------------------------------------------------------------------------------------
0cd3 0001 0007  |    |		.DBGLEN	0x0001,0x0007
0cd5 028b 028d  |    |		.DBGLNO	0x028b,0x028d,0x0290,0x0296,0x029b,0x02a1,0x02a5,0x02b2
0cdd ; --------------------------------------------------------------------------------------
0cdd ; Debug chain
0cdd ; --------------------------------------------------------------------------------------
0cdd 0001 0007  |    |		.DBGLEN	0x0001,0x0007
0cdf 02bb 02bd  |    |		.DBGLNO	0x02bb,0x02bd,0x02c1,0x02c7,0x02cc,0x02d2,0x02d6,0x02e6
0ce7 ; --------------------------------------------------------------------------------------
0ce7 ; Debug chain
0ce7 ; --------------------------------------------------------------------------------------
0ce7 0002 0003  |    |		.DBGLEN	0x0002,0x0003
0ce9 02f3 02f8  |    |		.DBGLNO	0x02f3,0x02f8,0x02fc,0x02fe,0x0309
0cee ; --------------------------------------------------------------------------------------
0cee ; Debug chain
0cee ; --------------------------------------------------------------------------------------
0cee 0002 0003  |    |		.DBGLEN	0x0002,0x0003
0cf0 0313 0319  |    |		.DBGLNO	0x0313,0x0319,0x031e,0x0320,0x032c
0cf5 ; --------------------------------------------------------------------------------------
0cf5 ; Debug chain
0cf5 ; --------------------------------------------------------------------------------------
0cf5 0002 0003  |    |		.DBGLEN	0x0002,0x0003
0cf7 033b 0345  | ; E|		.DBGLNO	0x033b,0x0345,0x0349,0x034b,0x035a
0cfc ; --------------------------------------------------------------------------------------
0cfc ; Debug chain
0cfc ; --------------------------------------------------------------------------------------
0cfc 0001 0003  |    |		.DBGLEN	0x0001,0x0003
0cfe 0363 0367  | c g|		.DBGLNO	0x0363,0x0367,0x0369,0x036f
0d02 ; --------------------------------------------------------------------------------------
0d02 ; Debug chain
0d02 ; --------------------------------------------------------------------------------------
0d02 0001 0003  |    |		.DBGLEN	0x0001,0x0003
0d04 037b 037f  | {  |		.DBGLNO	0x037b,0x037f,0x0381,0x039e
0d08 ; --------------------------------------------------------------------------------------
0d08 ; Debug chain
0d08 ; --------------------------------------------------------------------------------------
0d08 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0d0a 03ab 03b2  |    |		.DBGLNO	0x03ab,0x03b2,0x03b7,0x03ba,0x03c9
0d0f ; --------------------------------------------------------------------------------------
0d0f ; Debug chain
0d0f ; --------------------------------------------------------------------------------------
0d0f 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0d11 03d3 03da  |    |		.DBGLNO	0x03d3,0x03da,0x03e0,0x03e4,0x03f4
0d16 ; --------------------------------------------------------------------------------------
0d16 ; Debug chain
0d16 ; --------------------------------------------------------------------------------------
0d16 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0d18 0403 040a  |    |		.DBGLNO	0x0403,0x040a,0x040f,0x0412,0x0425
0d1d ; --------------------------------------------------------------------------------------
0d1d ; Debug chain
0d1d ; --------------------------------------------------------------------------------------
0d1d 0001 0003  |    |		.DBGLEN	0x0001,0x0003
0d1f 0433 043a  | 3 :|		.DBGLNO	0x0433,0x043a,0x043d,0x0444
0d23 ; --------------------------------------------------------------------------------------
0d23 ; Debug chain
0d23 ; --------------------------------------------------------------------------------------
0d23 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0d25 0453 045a  | S Z|		.DBGLNO	0x0453,0x045a,0x045e,0x0460,0x0481
0d2a ; --------------------------------------------------------------------------------------
0d2a ; Debug chain
0d2a ; --------------------------------------------------------------------------------------
0d2a 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0d2c 048b 0494  |    |		.DBGLNO	0x048b,0x0494,0x0499,0x049c,0x04ae
0d31 ; --------------------------------------------------------------------------------------
0d31 ; Debug chain
0d31 ; --------------------------------------------------------------------------------------
0d31 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0d33 04bb 04c4  |    |		.DBGLNO	0x04bb,0x04c4,0x04ca,0x04ce,0x04e1
0d38 ; --------------------------------------------------------------------------------------
0d38 ; Debug chain
0d38 ; --------------------------------------------------------------------------------------
0d38 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0d3a 04f3 04fc  |    |		.DBGLNO	0x04f3,0x04fc,0x0501,0x0504,0x051a
0d3f ; --------------------------------------------------------------------------------------
0d3f ; Debug chain
0d3f ; --------------------------------------------------------------------------------------
0d3f 0001 0003  |    |		.DBGLEN	0x0001,0x0003
0d41 052b 0534  | + 4|		.DBGLNO	0x052b,0x0534,0x0537,0x0540
0d45 ; --------------------------------------------------------------------------------------
0d45 ; Debug chain
0d45 ; --------------------------------------------------------------------------------------
0d45 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0d47 054b 0554  | K T|		.DBGLNO	0x054b,0x0554,0x0558,0x055a,0x057e
0d4c ; --------------------------------------------------------------------------------------
0d4c ; Debug chain
0d4c ; --------------------------------------------------------------------------------------
0d4c 0002 0007  |    |		.DBGLEN	0x0002,0x0007
0d4e 058b 058d  |    |		.DBGLNO	0x058b,0x058d,0x0591,0x0597,0x059d,0x05a2,0x05a8,0x05ac,0x05bf
0d57 ; --------------------------------------------------------------------------------------
0d57 ; Debug chain
0d57 ; --------------------------------------------------------------------------------------
0d57 0001 0007  |    |		.DBGLEN	0x0001,0x0007
0d59 05cb 05cd  |    |		.DBGLNO	0x05cb,0x05cd,0x05d2,0x05d8,0x05dd,0x05e3,0x05e7,0x05f0
0d61 ; --------------------------------------------------------------------------------------
0d61 ; Debug chain
0d61 ; --------------------------------------------------------------------------------------
0d61 0001 0007  |    |		.DBGLEN	0x0001,0x0007
0d63 05fb 05fd  |    |		.DBGLNO	0x05fb,0x05fd,0x0603,0x0609,0x060e,0x0614,0x0618,0x063c
0d6b ; --------------------------------------------------------------------------------------
0d6b ; Debug chain
0d6b ; --------------------------------------------------------------------------------------
0d6b 0001 0007  |    |		.DBGLEN	0x0001,0x0007
0d6d 064b 064d  | K M|		.DBGLNO	0x064b,0x064d,0x0654,0x065a,0x065f,0x0665,0x0669,0x067d
0d75 ; --------------------------------------------------------------------------------------
0d75 ; Debug chain
0d75 ; --------------------------------------------------------------------------------------
0d75 0001 0007  |    |		.DBGLEN	0x0001,0x0007
0d77 068b 068d  |    |		.DBGLNO	0x068b,0x068d,0x0695,0x069b,0x06a0,0x06a6,0x06aa,0x06c1
0d7f ; --------------------------------------------------------------------------------------
0d7f ; Debug chain
0d7f ; --------------------------------------------------------------------------------------
0d7f 0002 000a  |    |		.DBGLEN	0x0002,0x000a
0d81 06d3 06da  |    |		.DBGLNO	0x06d3,0x06da,0x06dc,0x06e1,0x06f2,0x06fe,0x0706,0x070c,0x0714,0x0719,0x0729,0x0735
0d8d ; --------------------------------------------------------------------------------------
0d8d ; Debug chain
0d8d ; --------------------------------------------------------------------------------------
0d8d 0002 000a  |    |		.DBGLEN	0x0002,0x000a
0d8f 0743 074a  | C J|		.DBGLNO	0x0743,0x074a,0x074c,0x0752,0x0765,0x0774,0x077d,0x0784,0x078d,0x0792,0x07a3,0x07b2
0d9b ; --------------------------------------------------------------------------------------
0d9b ; Debug chain
0d9b ; --------------------------------------------------------------------------------------
0d9b 0003 000a  |    |		.DBGLEN	0x0003,0x000a
0d9d 07bb 07c2  |    |		.DBGLNO	0x07bb,0x07c2,0x07c4,0x07c8,0x07cc,0x07db,0x07e4,0x07eb,0x07f0,0x07fc,0x0801,0x0810,0x0816
0daa ; --------------------------------------------------------------------------------------
0daa ; Debug chain
0daa ; --------------------------------------------------------------------------------------
0daa 0002 0008  |    |		.DBGLEN	0x0002,0x0008
0dac 0823 082a  | # *|		.DBGLNO	0x0823,0x082a,0x082c,0x082f,0x083c,0x0841,0x0847,0x084b,0x084d,0x085a
0db6 ; --------------------------------------------------------------------------------------
0db6 ; Debug chain
0db6 ; --------------------------------------------------------------------------------------
0db6 0002 000a  |    |		.DBGLEN	0x0002,0x000a
0db8 0863 086a  | c j|		.DBGLNO	0x0863,0x086a,0x086c,0x0870,0x087f,0x089b,0x08a2,0x08a7,0x08ba,0x08bf,0x08ce,0x08ea
0dc4 ; --------------------------------------------------------------------------------------
0dc4 ; Debug chain
0dc4 ; --------------------------------------------------------------------------------------
0dc4 0002 000a  |    |		.DBGLEN	0x0002,0x000a
0dc6 08f3 08fc  |    |		.DBGLNO	0x08f3,0x08fc,0x08fe,0x0903,0x0918,0x0925,0x092f,0x0936,0x0940,0x0947,0x095b,0x0968
0dd2 ; --------------------------------------------------------------------------------------
0dd2 ; Debug chain
0dd2 ; --------------------------------------------------------------------------------------
0dd2 0002 000a  |    |		.DBGLEN	0x0002,0x000a
0dd4 0973 097c  | s ||		.DBGLNO	0x0973,0x097c,0x097e,0x0984,0x099b,0x09ab,0x09b6,0x09be,0x09c9,0x09d0,0x09e5,0x09f5
0de0 ; --------------------------------------------------------------------------------------
0de0 ; Debug chain
0de0 ; --------------------------------------------------------------------------------------
0de0 0003 000a  |    |		.DBGLEN	0x0003,0x000a
0de2 0a03 0a0c  |    |		.DBGLNO	0x0a03,0x0a0c,0x0a0e,0x0a12,0x0a16,0x0a29,0x0a30,0x0a39,0x0a3f,0x0a4d,0x0a54,0x0a67,0x0a6e
0def ; --------------------------------------------------------------------------------------
0def ; Debug chain
0def ; --------------------------------------------------------------------------------------
0def 0002 0008  |    |		.DBGLEN	0x0002,0x0008
0df1 0a7b 0a84  | {  |		.DBGLNO	0x0a7b,0x0a84,0x0a86,0x0a89,0x0a9a,0x0aa0,0x0aa8,0x0aad,0x0aaf,0x0ac0
0dfb ; --------------------------------------------------------------------------------------
0dfb ; Debug chain
0dfb ; --------------------------------------------------------------------------------------
0dfb 0002 000a  |    |		.DBGLEN	0x0002,0x000a
0dfd 0acb 0ad4  |    |		.DBGLNO	0x0acb,0x0ad4,0x0ad6,0x0ada,0x0aed,0x0b0a,0x0b13,0x0b19,0x0b2d,0x0b34,0x0b47,0x0b64
0e09 0000 0000  |    |		.BLANK	0000[0x1f7]