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

⟦790f93f97⟧

    Length: 6144 (0x1800)
    Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0340e4

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 5900       |Y   |		.CONST	0x5900								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 07f8       |    |		.CONST	0x07f8								; 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 0005       |    |		.CONST	0x0005								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00c8       |    |		.CONST	0x00c8								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0038       | 8  |		.CONST	0x0038								; Number of locals
000b			INIT_0008:
000b 4800       |H   |		Short_Literal	0x0
000c 4802       |H   |		Short_Literal	0x2
000d 029f 00e3  |    |		Declare_Subprogram	INIT_00e0,For_Call
000f 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0010 029a 010b  |    |		Declare_Subprogram	INIT_0108,For_Outer_Call,Visible,Unelaborated
0012 029a 012b  |   +|		Declare_Subprogram	INIT_0128,For_Outer_Call,Visible,Unelaborated
0014 029a 0173  |   s|		Declare_Subprogram	INIT_0170,For_Outer_Call,Visible,Unelaborated
0016 029a 0193  |    |		Declare_Subprogram	INIT_0190,For_Outer_Call,Visible,Unelaborated
0018 029a 01ab  |    |		Declare_Subprogram	INIT_01a8,For_Outer_Call,Visible,Unelaborated
001a 029a 01cb  |    |		Declare_Subprogram	INIT_01c8,For_Outer_Call,Visible,Unelaborated
001c 00e2       |    |		Load_Encached	Integer_Cache
001d 0266       | f  |		Execute	Discrete,Bounds
001e 00e2       |    |		Load_Encached	Integer_Cache
001f 02a0       |    |		Declare_Subprogram	Null_Subprogram
0020 4801       |H   |		Short_Literal	0x1
0021 0351       | Q  |		Declare_Type	Array,Defined,Visible,Bounds_With_Object
0022 029a 01f3  |    |		Declare_Subprogram	INIT_01f0,For_Outer_Call,Visible,Unelaborated
0024 029a 0223  |   #|		Declare_Subprogram	INIT_0220,For_Outer_Call,Visible,Unelaborated
0026 00bf       |    |		Action	Accept_Activation
0027 4801       |H   |		Short_Literal	0x1
0028 e20f       |    |		Load	0x1,0xf
0029 00e3       |    |		Load_Encached	Natural_Cache
002a 03f8       |    |		Declare_Type	Discrete,Constrained
002b 4801       |H   |		Short_Literal	0x1
002c 00d9       |    |		Load_Top	At_Offset_1
002d 0269       | i  |		Execute	Discrete,Last
002e 00e3       |    |		Load_Encached	Natural_Cache
002f 02a0       |    |		Declare_Subprogram	Null_Subprogram
0030 4801       |H   |		Short_Literal	0x1
0031 035d       | ]  |		Declare_Type	Array,Defined
0032 00e9       |    |		Load_Encached	String_Cache
0033 02a0       |    |		Declare_Subprogram	Null_Subprogram
0034 4818       |H   |		Short_Literal	0x18
0035 03d3       |    |		Declare_Type	Access,Defined,Accesses_Protected
0036 00e3       |    |		Load_Encached	Natural_Cache
0037 00e3       |    |		Load_Encached	Natural_Cache
0038 4800       |H   |		Short_Literal	0x0
0039 4802       |H   |		Short_Literal	0x2
003a 4802       |H   |		Short_Literal	0x2
003b 4807       |H   |		Short_Literal	0x7
003c 0318       |    |		Declare_Type	Variant_Record,Incomplete
003d 029f 0263  |   c|		Declare_Subprogram	INIT_0260,For_Call
003f 00d9       |    |		Load_Top	At_Offset_1
0040 012a       | *  |		Execute	Any,Change_Utility
0041 0007       |    |		Action	Break_Optional
0042 00d8       |    |		Load_Top	At_Offset_0
0043 02a0       |    |		Declare_Subprogram	Null_Subprogram
0044 4818       |H   |		Short_Literal	0x18
0045 03d3       |    |		Declare_Type	Access,Defined,Accesses_Protected
0046 e001       |    |		Load	0x0,0x1
0047 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0048 e002       |    |		Load	0x0,0x2
0049 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
004a 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
004b 00da       |    |		Load_Top	At_Offset_2
004c 00e9       |    |		Load_Encached	String_Cache
004d 00e9       |    |		Load_Encached	String_Cache
004e 029f 0263  |   c|		Declare_Subprogram	INIT_0260,For_Call
0050 4800       |H   |		Short_Literal	0x0
0051 4802       |H   |		Short_Literal	0x2
0052 4803       |H   |		Short_Literal	0x3
0053 e21e       |    |		Load	0x1,0x1e
0054 0307       |    |		Complete_Type	Variant_Record,By_Defining
0055 4801       |H   |		Short_Literal	0x1
0056 e21b       |    |		Load	0x1,0x1b
0057 0269       | i  |		Execute	Discrete,Last
0058 00da       |    |		Load_Top	At_Offset_2
0059 02a0       |    |		Declare_Subprogram	Null_Subprogram
005a 4801       |H   |		Short_Literal	0x1
005b 035d       | ]  |		Declare_Type	Array,Defined
005c 4803       |H   |		Short_Literal	0x3
005d 032a       | *  |		Declare_Type	Record,Incomplete
005e 00d8       |    |		Load_Top	At_Offset_0
005f 02a0       |    |		Declare_Subprogram	Null_Subprogram
0060 4818       |H   |		Short_Literal	0x18
0061 03d3       |    |		Declare_Type	Access,Defined,Accesses_Protected
0062 00e2       |    |		Load_Encached	Integer_Cache
0063 0266       | f  |		Execute	Discrete,Bounds
0064 00da       |    |		Load_Top	At_Offset_2
0065 02a0       |    |		Declare_Subprogram	Null_Subprogram
0066 4801       |H   |		Short_Literal	0x1
0067 0350       | P  |		Declare_Type	Array,Defined,Bounds_With_Object
0068 00d9       |    |		Load_Top	At_Offset_1
0069 0007       |    |		Action	Break_Optional
006a e220       |    |		Load	0x1,0x20
006b e21c       |    |		Load	0x1,0x1c
006c e222       | "  |		Load	0x1,0x22
006d 029f 029b  |    |		Declare_Subprogram	INIT_0298,For_Call
006f e221       | !  |		Load	0x1,0x21
0070 0326       | &  |		Complete_Type	Record,By_Defining
0071 e21b       |    |		Load	0x1,0x1b
0072 0269       | i  |		Execute	Discrete,Last
0073 e21b       |    |		Load	0x1,0x1b
0074 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0075 00e1       |    |		Load_Encached	Boolean_Cache
0076 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0077 e21c       |    |		Load	0x1,0x1c
0078 0337       | 7  |		Declare_Variable	Array
0079 00d8       |    |		Load_Top	At_Offset_0
007a 0335       | 5  |		Declare_Variable	Array,Duplicate
007b 00cd       |    |		Action	Spare6_Action
007c 00d9       |    |		Load_Top	At_Offset_1
007d 01d9       |    |		Execute	Vector,Reverse_Bounds
007e 0263       | c  |		Execute	Discrete,Above_Bound
007f 7005       |p   |		Jump_Nonzero	0x85
0080 4800       |H   |		Short_Literal	0x0
0081 00d9       |    |		Load_Top	At_Offset_1
0082 e228       | (  |		Load	0x1,0x28
0083 01d6       |    |		Execute	Vector,Field_Write
0084 3ffb       |?   |		Loop_Increasing	0x80
0085 00d9       |    |		Load_Top	At_Offset_1
0086 01d4       |    |		Execute	Vector,Structure_Write
0087 4801       |H   |		Short_Literal	0x1
0088 e21b       |    |		Load	0x1,0x1b
0089 0269       | i  |		Execute	Discrete,Last
008a e21d       |    |		Load	0x1,0x1d
008b 02a0       |    |		Declare_Subprogram	Null_Subprogram
008c 4801       |H   |		Short_Literal	0x1
008d 035d       | ]  |		Declare_Type	Array,Defined
008e 00d8       |    |		Load_Top	At_Offset_0
008f 0337       | 7  |		Declare_Variable	Array
0090 00e3       |    |		Load_Encached	Natural_Cache
0091 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0092 4801       |H   |		Short_Literal	0x1
0093 e21b       |    |		Load	0x1,0x1b
0094 0269       | i  |		Execute	Discrete,Last
0095 e211       |    |		Load	0x1,0x11
0096 02a0       |    |		Declare_Subprogram	Null_Subprogram
0097 4801       |H   |		Short_Literal	0x1
0098 035d       | ]  |		Declare_Type	Array,Defined
0099 00d8       |    |		Load_Top	At_Offset_0
009a 0337       | 7  |		Declare_Variable	Array
009b 4801       |H   |		Short_Literal	0x1
009c e21b       |    |		Load	0x1,0x1b
009d 0269       | i  |		Execute	Discrete,Last
009e 00e1       |    |		Load_Encached	Boolean_Cache
009f 02a0       |    |		Declare_Subprogram	Null_Subprogram
00a0 4801       |H   |		Short_Literal	0x1
00a1 035d       | ]  |		Declare_Type	Array,Defined
00a2 00d8       |    |		Load_Top	At_Offset_0
00a3 0337       | 7  |		Declare_Variable	Array
00a4 029d 02c3  |    |		Declare_Subprogram	INIT_02c0,For_Outer_Call
00a6 029d 02d3  |    |		Declare_Subprogram	INIT_02d0,For_Outer_Call
00a8 029d 02e3  |    |		Declare_Subprogram	INIT_02e0,For_Outer_Call
00aa 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
00ab 00c7       |    |		Action	Elaborate_Subprogram
00ac 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
00ad 00c7       |    |		Action	Elaborate_Subprogram
00ae 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
00af 00c7       |    |		Action	Elaborate_Subprogram
00b0 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
00b1 00c7       |    |		Action	Elaborate_Subprogram
00b2 029d 0373  |   s|		Declare_Subprogram	INIT_0370,For_Outer_Call
00b4 029d 038b  |    |		Declare_Subprogram	INIT_0388,For_Outer_Call
00b6 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
00b7 00c7       |    |		Action	Elaborate_Subprogram
00b8 029d 03a3  |    |		Declare_Subprogram	INIT_03a0,For_Outer_Call
00ba 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
00bb 00c7       |    |		Action	Elaborate_Subprogram
00bc 029d 0403  |    |		Declare_Subprogram	INIT_0400,For_Outer_Call
00be 029d 04db  |    |		Declare_Subprogram	INIT_04d8,For_Outer_Call
00c0 029d 04f3  |    |		Declare_Subprogram	INIT_04f0,For_Outer_Call
00c2 029d 0523  |   #|		Declare_Subprogram	INIT_0520,For_Outer_Call
00c4 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
00c5 00c7       |    |		Action	Elaborate_Subprogram
00c6 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
00c7 00c7       |    |		Action	Elaborate_Subprogram
00c8			BODY_0008:
00c8 00cf       |    |		Action	Mark_Auxiliary
00c9 e21b       |    |		Load	0x1,0x1b
00ca 0269       | i  |		Execute	Discrete,Last
00cb 4801       |H   |		Short_Literal	0x1
00cc 0263       | c  |		Execute	Discrete,Above_Bound
00cd 700c       |p   |		Jump_Nonzero	0xda
00ce 4800       |H   |		Short_Literal	0x0
00cf 00d9       |    |		Load_Top	At_Offset_1
00d0 e22c       | ,  |		Load	0x1,0x2c
00d1 01d6       |    |		Execute	Vector,Field_Write
00d2 00ea       |    |		Load_Encached	Null_String_Cache
00d3 e21d       |    |		Load	0x1,0x1d
00d4 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
00d5 00d9       |    |		Load_Top	At_Offset_1
00d6 e229       | )  |		Load	0x1,0x29
00d7 01d6       |    |		Execute	Vector,Field_Write
00d8 00c8       |    |		Action	Pop_Auxiliary_Range
00d9 3ff4       |?   |		Loop_Increasing	0xce
00da 00ce       |    |		Action	Pop_Auxiliary
00db 00bc       |    |		Action	Signal_Activated
00dc 00bb       |    |		Action	Signal_Completion
00dd 0000 0000  |    |		.XXX[0x3]
00df 0000       |    |
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e3       |    |		.CONST	0x00e3								; Address of begin
00e1 0004       |    |		.CONST	0x0004								; Address of exception handler
00e2 0001       |    |		.CONST	0x0001								; Number of locals
00e3			BODY_00e0:
00e3			INIT_00e0:
00e3 4607       |F   |		Jump_Case	0x8
00e4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
00e5 7806       |x   |		Jump	0xec								; case 0x1
00e6 7809       |x   |		Jump	0xf0								; case 0x2
00e7 780d       |x   |		Jump	0xf5								; case 0x3
00e8 7810       |x   |		Jump	0xf9								; case 0x4
00e9 7811       |x   |		Jump	0xfb								; case 0x5
00ea 7812       |x   |		Jump	0xfd								; case 0x6
00eb 7815       |x   |		Jump	0x101								; case 0x7
00ec 00da       |    |		Load_Top	At_Offset_2
00ed 0091 07e7  |    |		Action	Push_String_Extended_Indexed,0x7e7				; "LEFT"
00ef 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00f0 00db       |    |		Load_Top	At_Offset_3
00f1 00db       |    |		Load_Top	At_Offset_3
00f2 00e0       |    |		Load_Encached	Standard_Cache
00f3 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
00f4 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00f5 00da       |    |		Load_Top	At_Offset_2
00f6 00e0       |    |		Load_Encached	Standard_Cache
00f7 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
00f8 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00f9 00db       |    |		Load_Top	At_Offset_3
00fa 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00fb 00db       |    |		Load_Top	At_Offset_3
00fc 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00fd e211       |    |		Load	0x1,0x11
00fe 00dc       |    |		Load_Top	At_Offset_4
00ff 0267       | g  |		Execute	Discrete,Predecessor
0100 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0101 e211       |    |		Load	0x1,0x11
0102 00dc       |    |		Load_Top	At_Offset_4
0103 0268       | h  |		Execute	Discrete,Successor
0104 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0105 0000 0000  |    |		.XXX[0x3]
0107 0000       |    |
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010b       |    |		.CONST	0x010b								; Address of begin
0109 0004       |    |		.CONST	0x0004								; Address of exception handler
010a 0001       |    |		.CONST	0x0001								; Number of locals
010b			BODY_0108:
010b			INIT_0108:
010b e22a       | *  |		Load	0x1,0x2a
010c 0a01       |    |		Execute_Immediate	Plus,0x1
010d c22a       | *  |		Store	0x1,0x2a
010e 00db       |    |		Load_Top	At_Offset_3
010f e22a       | *  |		Load	0x1,0x2a
0110 e22c       | ,  |		Load	0x1,0x2c
0111 01d6       |    |		Execute	Vector,Field_Write
0112 e5fd       |    |		Load	0x2,-0x3
0113 e22a       | *  |		Load	0x1,0x2a
0114 e22e       | .  |		Load	0x1,0x2e
0115 01d6       |    |		Execute	Vector,Field_Write
0116 00da       |    |		Load_Top	At_Offset_2
0117 e21d       |    |		Load	0x1,0x1d
0118 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0119 e22a       | *  |		Load	0x1,0x2a
011a e229       | )  |		Load	0x1,0x29
011b 01d6       |    |		Execute	Vector,Field_Write
011c 00da       |    |		Load_Top	At_Offset_2
011d 01db       |    |		Execute	Vector,Length
011e e22a       | *  |		Load	0x1,0x2a
011f e227       | '  |		Load	0x1,0x27
0120 01d6       |    |		Execute	Vector,Field_Write
0121 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0122 0000 0000  |    |		.BLANK	0000[0x6]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 013d       | =  |		.CONST	0x013d								; Address of begin
0129 0004       |    |		.CONST	0x0004								; Address of exception handler
012a 0005       |    |		.CONST	0x0005								; Number of locals
012b			INIT_0128:
012b e002       |    |		Load	0x0,0x2
012c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
012d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
012e 02c7       |    |		Declare_Variable	Any
012f e5fc       |    |		Load	0x2,-0x4
0130 a402       |    |		Store_Unchecked	0x2,0x2
0131 e002       |    |		Load	0x0,0x2
0132 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0133 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
0134 02c7       |    |		Declare_Variable	Any
0135 e5fb       |    |		Load	0x2,-0x5
0136 a403       |    |		Store_Unchecked	0x2,0x3
0137 e001       |    |		Load	0x0,0x1
0138 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0139 02c7       |    |		Declare_Variable	Any
013a e5fd       |    |		Load	0x2,-0x3
013b a404       |    |		Store_Unchecked	0x2,0x4
013c 00e1       |    |		Load_Encached	Boolean_Cache
013d			BODY_0128:
013d e225       | %  |		Load	0x1,0x25
013e e21b       |    |		Load	0x1,0x1b
013f 0269       | i  |		Execute	Discrete,Last
0140 027f       |    |		Execute	Discrete,Equal
0141 6809       |h   |		Jump_Zero	0x14b
0142 e222       | "  |		Load	0x1,0x22
0143 03bc       |    |		Declare_Variable	Access,By_Allocation
0144 00d8       |    |		Load_Top	At_Offset_0
0145 0227       | '  |		Execute	Access,All_Reference
0146 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0147 a224       | $  |		Store_Unchecked	0x1,0x24
0148 4801       |H   |		Short_Literal	0x1
0149 c225       | %  |		Store	0x1,0x25
014a 7803       |x   |		Jump	0x14e
014b e225       | %  |		Load	0x1,0x25
014c 0a01       |    |		Execute_Immediate	Plus,0x1
014d c225       | %  |		Store	0x1,0x25
014e 00db       |    |		Load_Top	At_Offset_3
014f e002       |    |		Load	0x0,0x2
0150 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0151 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0152 700a       |p   |		Jump_Nonzero	0x15d
0153 00e1       |    |		Load_Encached	Boolean_Cache
0154 e002       |    |		Load	0x0,0x2
0155 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0156 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0157 e402       |    |		Load	0x2,0x2
0158 e403       |    |		Load	0x2,0x3
0159 e002       |    |		Load	0x0,0x2
015a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
015b 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
015c 0059       | Y  |		Store_Top	Discrete,At_Offset_1
015d e5fe       |    |		Load	0x2,-0x2
015e e001       |    |		Load	0x0,0x1
015f 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0160 7005       |p   |		Jump_Nonzero	0x166
0161 00d9       |    |		Load_Top	At_Offset_1
0162 e5fe       |    |		Load	0x2,-0x2
0163 e001       |    |		Load	0x0,0x1
0164 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0165 c404       |    |		Store	0x2,0x4
0166 00da       |    |		Load_Top	At_Offset_2
0167 00da       |    |		Load_Top	At_Offset_2
0168 e5fa       |    |		Load	0x2,-0x6
0169 e5ff       |    |		Load	0x2,-0x1
016a 8231       | 1  |		Call	0x1,0x31
016b 4800       |H   |		Short_Literal	0x0
016c a226       | &  |		Store_Unchecked	0x1,0x26
016d 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
016e 0000 0000  |    |		.XXX[0x2]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0173       | s  |		.CONST	0x0173								; Address of begin
0171 0004       |    |		.CONST	0x0004								; Address of exception handler
0172 0001       |    |		.CONST	0x0001								; Number of locals
0173			BODY_0170:
0173			INIT_0170:
0173 e226       | &  |		Load	0x1,0x26
0174 6809       |h   |		Jump_Zero	0x17e
0175 e002       |    |		Load	0x0,0x2
0176 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0177 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0178 e001       |    |		Load	0x0,0x1
0179 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
017a 00ea       |    |		Load_Encached	Null_String_Cache
017b e5ff       |    |		Load	0x2,-0x1
017c 8231       | 1  |		Call	0x1,0x31
017d 780d       |x   |		Jump	0x18b
017e 00ea       |    |		Load_Encached	Null_String_Cache
017f e002       |    |		Load	0x0,0x2
0180 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0181 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0182 e002       |    |		Load	0x0,0x2
0183 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0184 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0185 e001       |    |		Load	0x0,0x1
0186 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0187 e001       |    |		Load	0x0,0x1
0188 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0189 e5ff       |    |		Load	0x2,-0x1
018a 8213       |    |		Call	0x1,0x13
018b 4801       |H   |		Short_Literal	0x1
018c a226       | &  |		Store_Unchecked	0x1,0x26
018d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
018e 0000 0000  |    |		.XXX[0x2]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0193       |    |		.CONST	0x0193								; Address of begin
0191 0004       |    |		.CONST	0x0004								; Address of exception handler
0192 0001       |    |		.CONST	0x0001								; Number of locals
0193			BODY_0190:
0193			INIT_0190:
0193 e226       | &  |		Load	0x1,0x26
0194 6803       |h   |		Jump_Zero	0x198
0195 4800       |H   |		Short_Literal	0x0
0196 a226       | &  |		Store_Unchecked	0x1,0x26
0197 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0198 00ea       |    |		Load_Encached	Null_String_Cache
0199 e002       |    |		Load	0x0,0x2
019a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
019b 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
019c e002       |    |		Load	0x0,0x2
019d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
019e 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
019f e001       |    |		Load	0x0,0x1
01a0 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
01a1 e001       |    |		Load	0x0,0x1
01a2 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01a3 0092 07ea  |    |		Action	Push_String_Extended,0x7ea					; "(none)"
01a5 8213       |    |		Call	0x1,0x13
01a6 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01a7 0000       |    |		.XXX[0x1]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01c5       |    |		.CONST	0x01c5								; Address of begin
01a9 0004       |    |		.CONST	0x0004								; Address of exception handler
01aa 000b       |    |		.CONST	0x000b								; Number of locals
01ab			INIT_01a8:
01ab 4801       |H   |		Short_Literal	0x1
01ac 8233       | 3  |		Call	0x1,0x33
01ad 00e9       |    |		Load_Encached	String_Cache
01ae 035b       | [  |		Declare_Type	Array,Constrained
01af 0337       | 7  |		Declare_Variable	Array
01b0 00e3       |    |		Load_Encached	Natural_Cache
01b1 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
01b2 e003       |    |		Load	0x0,0x3
01b3 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01b4 02c7       |    |		Declare_Variable	Any
01b5 00d8       |    |		Load_Top	At_Offset_0
01b6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01b7 029f 0533  |   3|		Declare_Subprogram	INIT_0530,For_Call
01b9 029f 054b  |   K|		Declare_Subprogram	INIT_0548,For_Call
01bb 029f 055b  |   [|		Declare_Subprogram	INIT_0558,For_Call
01bd 029f 0573  |   s|		Declare_Subprogram	INIT_0570,For_Call
01bf 029f 0583  |    |		Declare_Subprogram	INIT_0580,For_Call
01c1 029f 05db  |    |		Declare_Subprogram	INIT_05d8,For_Call
01c3 029f 0673  |   s|		Declare_Subprogram	INIT_0670,For_Call
01c5			BODY_01a8:
01c5 e224       | $  |		Load	0x1,0x24
01c6 840b       |    |		Call	0x2,0xb
01c7 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01d6       |    |		.CONST	0x01d6								; Address of begin
01c9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ca 0005       |    |		.CONST	0x0005								; Number of locals
01cb			INIT_01c8:
01cb e003       |    |		Load	0x0,0x3
01cc 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01cd 02c7       |    |		Declare_Variable	Any
01ce 00d8       |    |		Load_Top	At_Offset_0
01cf 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01d0 029f 06ab  |    |		Declare_Subprogram	INIT_06a8,For_Call
01d2 029f 06c3  |    |		Declare_Subprogram	INIT_06c0,For_Call
01d4 029f 06eb  |    |		Declare_Subprogram	INIT_06e8,For_Call
01d6			BODY_01c8:
01d6 e224       | $  |		Load	0x1,0x24
01d7 6815       |h   |		Jump_Zero	0x1ed
01d8 e004       |    |		Load	0x0,0x4
01d9 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
01da e004       |    |		Load	0x0,0x4
01db 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
01dc 4800       |H   |		Short_Literal	0x0
01dd 00ea       |    |		Load_Encached	Null_String_Cache
01de e5ff       |    |		Load	0x2,-0x1
01df e5fe       |    |		Load	0x2,-0x2
01e0 e004       |    |		Load	0x0,0x4
01e1 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
01e2 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
01e3 e224       | $  |		Load	0x1,0x24
01e4 8405       |    |		Call	0x2,0x5
01e5 e004       |    |		Load	0x0,0x4
01e6 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
01e7 e004       |    |		Load	0x0,0x4
01e8 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
01e9 e5fe       |    |		Load	0x2,-0x2
01ea e004       |    |		Load	0x0,0x4
01eb 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
01ec 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
01ed 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01ee 0000 0000  |    |		.XXX[0x2]
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 020c       |    |		.CONST	0x020c								; Address of begin
01f1 0004       |    |		.CONST	0x0004								; Address of exception handler
01f2 000c       |    |		.CONST	0x000c								; Number of locals
01f3			INIT_01f0:
01f3 4801       |H   |		Short_Literal	0x1
01f4 8235       | 5  |		Call	0x1,0x35
01f5 e223       | #  |		Load	0x1,0x23
01f6 035b       | [  |		Declare_Type	Array,Constrained
01f7 0337       | 7  |		Declare_Variable	Array
01f8 00e2       |    |		Load_Encached	Integer_Cache
01f9 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
01fa e5ff       |    |		Load	0x2,-0x1
01fb 8238       | 8  |		Call	0x1,0x38
01fc 00e4       |    |		Load_Encached	Positive_Cache
01fd 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
01fe 029f 070b  |    |		Declare_Subprogram	INIT_0708,For_Call
0200 a005       |    |		Store_Unchecked	0x0,0x5
0201 00c6       |    |		Action	Check_Subprogram_Elaborated
0202 e222       | "  |		Load	0x1,0x22
0203 00e2       |    |		Load_Encached	Integer_Cache
0204 e223       | #  |		Load	0x1,0x23
0205 4805       |H   |		Short_Literal	0x5
0206 4802       |H   |		Short_Literal	0x2
0207 0099       |    |		Action	Reference_Dynamic
0208 e006       |    |		Load	0x0,0x6
0209 e007       |    |		Load	0x0,0x7
020a 480c       |H   |		Short_Literal	0xc
020b 0007       |    |		Action	Break_Optional
020c			BODY_01f0:
020c e402       |    |		Load	0x2,0x2
020d 8236       | 6  |		Call	0x1,0x36
020e 00d1       |    |		Pop_Control	Pop_Count_1
020f e402       |    |		Load	0x2,0x2
0210 e406       |    |		Load	0x2,0x6
0211 e407       |    |		Load	0x2,0x7
0212 e408       |    |		Load	0x2,0x8
0213 4809       |H   |		Short_Literal	0x9
0214 4802       |H   |		Short_Literal	0x2
0215 0099       |    |		Action	Reference_Dynamic
0216 480a       |H   |		Short_Literal	0xa
0217 4802       |H   |		Short_Literal	0x2
0218 0099       |    |		Action	Reference_Dynamic
0219 8005       |    |		Call	0x0,0x5
021a 00d1       |    |		Pop_Control	Pop_Count_1
021b e402       |    |		Load	0x2,0x2
021c 8237       | 7  |		Call	0x1,0x37
021d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
021e 0000 0000  |    |		.XXX[0x2]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 023c       | <  |		.CONST	0x023c								; Address of begin
0221 0004       |    |		.CONST	0x0004								; Address of exception handler
0222 000c       |    |		.CONST	0x000c								; Number of locals
0223			INIT_0220:
0223 4801       |H   |		Short_Literal	0x1
0224 8235       | 5  |		Call	0x1,0x35
0225 e223       | #  |		Load	0x1,0x23
0226 035b       | [  |		Declare_Type	Array,Constrained
0227 0337       | 7  |		Declare_Variable	Array
0228 00e2       |    |		Load_Encached	Integer_Cache
0229 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
022a e5ff       |    |		Load	0x2,-0x1
022b 01da       |    |		Execute	Vector,Bounds
022c e218       |    |		Load	0x1,0x18
022d 035b       | [  |		Declare_Type	Array,Constrained
022e 0337       | 7  |		Declare_Variable	Array
022f 029f 076b  |   k|		Declare_Subprogram	INIT_0768,For_Call
0231 a005       |    |		Store_Unchecked	0x0,0x5
0232 00c6       |    |		Action	Check_Subprogram_Elaborated
0233 e222       | "  |		Load	0x1,0x22
0234 00e2       |    |		Load_Encached	Integer_Cache
0235 e223       | #  |		Load	0x1,0x23
0236 4805       |H   |		Short_Literal	0x5
0237 4802       |H   |		Short_Literal	0x2
0238 0099       |    |		Action	Reference_Dynamic
0239 e008       |    |		Load	0x0,0x8
023a e009       |    |		Load	0x0,0x9
023b 480c       |H   |		Short_Literal	0xc
023c			BODY_0220:
023c 00cf       |    |		Action	Mark_Auxiliary
023d e5ff       |    |		Load	0x2,-0x1
023e 01d9       |    |		Execute	Vector,Reverse_Bounds
023f 0263       | c  |		Execute	Discrete,Above_Bound
0240 7009       |p   |		Jump_Nonzero	0x24a
0241 00d8       |    |		Load_Top	At_Offset_0
0242 e5ff       |    |		Load	0x2,-0x1
0243 01d7       |    |		Execute	Vector,Field_Read
0244 8238       | 8  |		Call	0x1,0x38
0245 00d9       |    |		Load_Top	At_Offset_1
0246 e404       |    |		Load	0x2,0x4
0247 01d6       |    |		Execute	Vector,Field_Write
0248 00c8       |    |		Action	Pop_Auxiliary_Range
0249 3ff7       |?   |		Loop_Increasing	0x241
024a 00ce       |    |		Action	Pop_Auxiliary
024b e402       |    |		Load	0x2,0x2
024c 8236       | 6  |		Call	0x1,0x36
024d 00d1       |    |		Pop_Control	Pop_Count_1
024e e402       |    |		Load	0x2,0x2
024f e406       |    |		Load	0x2,0x6
0250 e407       |    |		Load	0x2,0x7
0251 e408       |    |		Load	0x2,0x8
0252 4809       |H   |		Short_Literal	0x9
0253 4802       |H   |		Short_Literal	0x2
0254 0099       |    |		Action	Reference_Dynamic
0255 480a       |H   |		Short_Literal	0xa
0256 4802       |H   |		Short_Literal	0x2
0257 0099       |    |		Action	Reference_Dynamic
0258 8005       |    |		Call	0x0,0x5
0259 00d1       |    |		Pop_Control	Pop_Count_1
025a e402       |    |		Load	0x2,0x2
025b 8237       | 7  |		Call	0x1,0x37
025c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
025d 0000 0000  |    |		.XXX[0x3]
025f 0000       |    |
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0263       | c  |		.CONST	0x0263								; Address of begin
0261 0004       |    |		.CONST	0x0004								; Address of exception handler
0262 0001       |    |		.CONST	0x0001								; Number of locals
0263			BODY_0260:
0263			BODY_0260:
0263			INIT_0260:
0263			INIT_0260:
0263 4608       |F   |		Jump_Case	0x9
0264 7808       |x   |		Jump	0x26d								; case 0x0
0265 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
0266 782f       |x/  |		Jump	0x296								; case 0x2
0267 782e       |x.  |		Jump	0x296								; case 0x3
0268 782d       |x-  |		Jump	0x296								; case 0x4
0269 782c       |x,  |		Jump	0x296								; case 0x5
026a 782b       |x+  |		Jump	0x296								; case 0x6
026b 780c       |x   |		Jump	0x278								; case 0x7
026c 7819       |x   |		Jump	0x286								; case 0x8
026d 00da       |    |		Load_Top	At_Offset_2
026e 2203       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x3
026f 00da       |    |		Load_Top	At_Offset_2
0270 2403       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x3
0271 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0272 00da       |    |		Load_Top	At_Offset_2
0273 2204       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x4
0274 00da       |    |		Load_Top	At_Offset_2
0275 2404       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x4
0276 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0277 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0278 e5fd       |    |		Load	0x2,-0x3
0279 e5fe       |    |		Load	0x2,-0x2
027a 4801       |H   |		Short_Literal	0x1
027b e5fd       |    |		Load	0x2,-0x3
027c 00e9       |    |		Load_Encached	String_Cache
027d 035b       | [  |		Declare_Type	Array,Constrained
027e 4801       |H   |		Short_Literal	0x1
027f e5fe       |    |		Load	0x2,-0x2
0280 00e9       |    |		Load_Encached	String_Cache
0281 035b       | [  |		Declare_Type	Array,Constrained
0282 4802       |H   |		Short_Literal	0x2
0283 e5ff       |    |		Load	0x2,-0x1
0284 031b       |    |		Declare_Type	Variant_Record,Constrained
0285 4203       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x3
0286 e5fd       |    |		Load	0x2,-0x3
0287 e5fe       |    |		Load	0x2,-0x2
0288 e5ff       |    |		Load	0x2,-0x1
0289 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
028a 4801       |H   |		Short_Literal	0x1
028b e5fd       |    |		Load	0x2,-0x3
028c 00e9       |    |		Load_Encached	String_Cache
028d 0334       | 4  |		Declare_Variable	Array,With_Constraint
028e 2d06       |-   |		Execute	Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x6
028f 4801       |H   |		Short_Literal	0x1
0290 e5fe       |    |		Load	0x2,-0x2
0291 00e9       |    |		Load_Encached	String_Cache
0292 0334       | 4  |		Declare_Variable	Array,With_Constraint
0293 2d07       |-   |		Execute	Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x7
0294 016a       | j  |		QQ_execute	Variant_Record,XXX
0295 4203       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x3
0296 0869       | i  |		Execute_Immediate	Raise,0x69
0297 0000       |    |		.XXX[0x1]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029b       |    |		.CONST	0x029b								; Address of begin
0299 0004       |    |		.CONST	0x0004								; Address of exception handler
029a 0001       |    |		.CONST	0x0001								; Number of locals
029b			BODY_0298:
029b			INIT_0298:
029b 4608       |F   |		Jump_Case	0x9
029c 7808       |x   |		Jump	0x2a5								; case 0x0
029d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
029e 781e       |x   |		Jump	0x2bd								; case 0x2
029f 781d       |x   |		Jump	0x2bd								; case 0x3
02a0 781c       |x   |		Jump	0x2bd								; case 0x4
02a1 781b       |x   |		Jump	0x2bd								; case 0x5
02a2 781a       |x   |		Jump	0x2bd								; case 0x6
02a3 7819       |x   |		Jump	0x2bd								; case 0x7
02a4 7818       |x   |		Jump	0x2bd								; case 0x8
02a5 e221       | !  |		Load	0x1,0x21
02a6 3001       |0   |		Execute	Record,Field_Type,Field_Number 0x1
02a7 0337       | 7  |		Declare_Variable	Array
02a8 e221       | !  |		Load	0x1,0x21
02a9 3001       |0   |		Execute	Record,Field_Type,Field_Number 0x1
02aa 01d9       |    |		Execute	Vector,Reverse_Bounds
02ab 0263       | c  |		Execute	Discrete,Above_Bound
02ac 7005       |p   |		Jump_Nonzero	0x2b2
02ad 4800       |H   |		Short_Literal	0x0
02ae 00d9       |    |		Load_Top	At_Offset_1
02af e402       |    |		Load	0x2,0x2
02b0 01d6       |    |		Execute	Vector,Field_Write
02b1 3ffb       |?   |		Loop_Increasing	0x2ad
02b2 00db       |    |		Load_Top	At_Offset_3
02b3 00d9       |    |		Load_Top	At_Offset_1
02b4 00d9       |    |		Load_Top	At_Offset_1
02b5 3001       |0   |		Execute	Record,Field_Type,Field_Number 0x1
02b6 0119       |    |		Execute	Any,Check_In_Formal_Type
02b7 00d1       |    |		Pop_Control	Pop_Count_1
02b8 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
02b9 e224       | $  |		Load	0x1,0x24
02ba 00db       |    |		Load_Top	At_Offset_3
02bb 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
02bc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
02bd 0869       | i  |		Execute_Immediate	Raise,0x69
02be 0000 0000  |    |		.XXX[0x2]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02c3       |    |		.CONST	0x02c3								; Address of begin
02c1 0004       |    |		.CONST	0x0004								; Address of exception handler
02c2 0001       |    |		.CONST	0x0001								; Number of locals
02c3			BODY_02c0:
02c3			INIT_02c0:
02c3 00da       |    |		Load_Top	At_Offset_2
02c4 4602       |F   |		Jump_Case	0x3
02c5 7804       |x   |		Jump	0x2ca								; case 0x0
02c6 7805       |x   |		Jump	0x2cc								; case 0x1
02c7 7800       |x   |		Jump	0x2c8								; case 0x2
02c8 4802       |H   |		Short_Literal	0x2
02c9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02ca 4800       |H   |		Short_Literal	0x0
02cb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02cc 4801       |H   |		Short_Literal	0x1
02cd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02ce 0000 0000  |    |		.XXX[0x2]
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02d3       |    |		.CONST	0x02d3								; Address of begin
02d1 0004       |    |		.CONST	0x0004								; Address of exception handler
02d2 0001       |    |		.CONST	0x0001								; Number of locals
02d3			BODY_02d0:
02d3			INIT_02d0:
02d3 00da       |    |		Load_Top	At_Offset_2
02d4 e5fe       |    |		Load	0x2,-0x2
02d5 027d       | }  |		Execute	Discrete,Greater
02d6 6802       |h   |		Jump_Zero	0x2d9
02d7 00da       |    |		Load_Top	At_Offset_2
02d8 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02d9 00db       |    |		Load_Top	At_Offset_3
02da 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02db 0000 0000  |    |		.BLANK	0000[0x5]
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 0310       |    |		.CONST	0x0310								; Address of begin
02e1 0004       |    |		.CONST	0x0004								; Address of exception handler
02e2 0007       |    |		.CONST	0x0007								; Number of locals
02e3			INIT_02e0:
02e3 e225       | %  |		Load	0x1,0x25
02e4 e224       | $  |		Load	0x1,0x24
02e5 0227       | '  |		Execute	Access,All_Reference
02e6 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
02e7 01d5       |    |		Execute	Vector,Field_Reference
02e8 0007       |    |		Action	Break_Optional
02e9 e225       | %  |		Load	0x1,0x25
02ea e224       | $  |		Load	0x1,0x24
02eb 0227       | '  |		Execute	Access,All_Reference
02ec 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
02ed 01d5       |    |		Execute	Vector,Field_Reference
02ee 0007       |    |		Action	Break_Optional
02ef e225       | %  |		Load	0x1,0x25
02f0 e227       | '  |		Load	0x1,0x27
02f1 01d5       |    |		Execute	Vector,Field_Reference
02f2 0007       |    |		Action	Break_Optional
02f3 4801       |H   |		Short_Literal	0x1
02f4 e5ff       |    |		Load	0x2,-0x1
02f5 01db       |    |		Execute	Vector,Length
02f6 00d8       |    |		Load_Top	At_Offset_0
02f7 00e2       |    |		Load_Encached	Integer_Cache
02f8 0260       | `  |		Execute	Discrete,In_Type
02f9 7001       |p   |		Jump_Nonzero	0x2fb
02fa 0801       |    |		Execute_Immediate	Raise,0x1
02fb 00e9       |    |		Load_Encached	String_Cache
02fc 035b       | [  |		Declare_Type	Array,Constrained
02fd 0337       | 7  |		Declare_Variable	Array
02fe e5ff       |    |		Load	0x2,-0x1
02ff 00d9       |    |		Load_Top	At_Offset_1
0300 01d4       |    |		Execute	Vector,Structure_Write
0301 4801       |H   |		Short_Literal	0x1
0302 e5fe       |    |		Load	0x2,-0x2
0303 01db       |    |		Execute	Vector,Length
0304 00d8       |    |		Load_Top	At_Offset_0
0305 00e2       |    |		Load_Encached	Integer_Cache
0306 0260       | `  |		Execute	Discrete,In_Type
0307 7001       |p   |		Jump_Nonzero	0x309
0308 0801       |    |		Execute_Immediate	Raise,0x1
0309 00e9       |    |		Load_Encached	String_Cache
030a 035b       | [  |		Declare_Type	Array,Constrained
030b 0337       | 7  |		Declare_Variable	Array
030c e5fe       |    |		Load	0x2,-0x2
030d 00d9       |    |		Load_Top	At_Offset_1
030e 01d4       |    |		Execute	Vector,Structure_Write
030f 00e5       |    |		Load_Encached	Long_Integer_Cache
0310			BODY_02e0:
0310 e225       | %  |		Load	0x1,0x25
0311 e22e       | .  |		Load	0x1,0x2e
0312 01d7       |    |		Execute	Vector,Field_Read
0313 6805       |h   |		Jump_Zero	0x319
0314 e5ff       |    |		Load	0x2,-0x1
0315 00e5       |    |		Load_Encached	Long_Integer_Cache
0316 00e0       |    |		Load_Encached	Standard_Cache
0317 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0318 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0319 e402       |    |		Load	0x2,0x2
031a 7004       |p   |		Jump_Nonzero	0x31f
031b e5ff       |    |		Load	0x2,-0x1
031c 01db       |    |		Execute	Vector,Length
031d c403       |    |		Store	0x2,0x3
031e 7808       |x   |		Jump	0x327
031f e403       |    |		Load	0x2,0x3
0320 e210       |    |		Load	0x1,0x10
0321 01db       |    |		Execute	Vector,Length
0322 0273       | s  |		Execute	Discrete,Plus
0323 e5ff       |    |		Load	0x2,-0x1
0324 01db       |    |		Execute	Vector,Length
0325 0273       | s  |		Execute	Discrete,Plus
0326 c403       |    |		Store	0x2,0x3
0327 e403       |    |		Load	0x2,0x3
0328 e404       |    |		Load	0x2,0x4
0329 027d       | }  |		Execute	Discrete,Greater
032a 6802       |h   |		Jump_Zero	0x32d
032b e403       |    |		Load	0x2,0x3
032c a404       |    |		Store_Unchecked	0x2,0x4
032d 00da       |    |		Load_Top	At_Offset_2
032e 01db       |    |		Execute	Vector,Length
032f 00da       |    |		Load_Top	At_Offset_2
0330 01db       |    |		Execute	Vector,Length
0331 e21e       |    |		Load	0x1,0x1e
0332 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0333 00db       |    |		Load_Top	At_Offset_3
0334 00d9       |    |		Load_Top	At_Offset_1
0335 00d8       |    |		Load_Top	At_Offset_0
0336 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0337 00da       |    |		Load_Top	At_Offset_2
0338 01da       |    |		Execute	Vector,Bounds
0339 00da       |    |		Load_Top	At_Offset_2
033a 01da       |    |		Execute	Vector,Bounds
033b 00da       |    |		Load_Top	At_Offset_2
033c 027f       |    |		Execute	Discrete,Equal
033d 7001       |p   |		Jump_Nonzero	0x33f
033e 08e0       |    |		Execute_Immediate	Raise,0xe0
033f 00cd       |    |		Action	Spare6_Action
0340 027f       |    |		Execute	Discrete,Equal
0341 7001       |p   |		Jump_Nonzero	0x343
0342 08e0       |    |		Execute_Immediate	Raise,0xe0
0343 00d2       |    |		Pop_Control	Pop_Count_2
0344 00d9       |    |		Load_Top	At_Offset_1
0345 2906       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x6
0346 00da       |    |		Load_Top	At_Offset_2
0347 00d9       |    |		Load_Top	At_Offset_1
0348 00d8       |    |		Load_Top	At_Offset_0
0349 2507       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x7
034a 00da       |    |		Load_Top	At_Offset_2
034b 01da       |    |		Execute	Vector,Bounds
034c 00da       |    |		Load_Top	At_Offset_2
034d 01da       |    |		Execute	Vector,Bounds
034e 00da       |    |		Load_Top	At_Offset_2
034f 027f       |    |		Execute	Discrete,Equal
0350 7001       |p   |		Jump_Nonzero	0x352
0351 08e0       |    |		Execute_Immediate	Raise,0xe0
0352 00cd       |    |		Action	Spare6_Action
0353 027f       |    |		Execute	Discrete,Equal
0354 7001       |p   |		Jump_Nonzero	0x356
0355 08e0       |    |		Execute_Immediate	Raise,0xe0
0356 00d2       |    |		Pop_Control	Pop_Count_2
0357 00d9       |    |		Load_Top	At_Offset_1
0358 2907       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x7
0359 e5fd       |    |		Load	0x2,-0x3
035a e21e       |    |		Load	0x1,0x1e
035b 2303       |#   |		Execute	Variant_Record,Field_Type,Field_Number 0x3
035c 0119       |    |		Execute	Any,Check_In_Formal_Type
035d 00d9       |    |		Load_Top	At_Offset_1
035e 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
035f e5fc       |    |		Load	0x2,-0x4
0360 e21e       |    |		Load	0x1,0x1e
0361 2304       |#   |		Execute	Variant_Record,Field_Type,Field_Number 0x4
0362 0119       |    |		Execute	Any,Check_In_Formal_Type
0363 00d9       |    |		Load_Top	At_Offset_1
0364 2804       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4
0365 e402       |    |		Load	0x2,0x2
0366 00d9       |    |		Load_Top	At_Offset_1
0367 2805       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5
0368 e21f       |    |		Load	0x1,0x1f
0369 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
036a a402       |    |		Store_Unchecked	0x2,0x2
036b 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
036c 0000 0000  |    |		.BLANK	0000[0x4]
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 0373       | s  |		.CONST	0x0373								; Address of begin
0371 0004       |    |		.CONST	0x0004								; Address of exception handler
0372 0001       |    |		.CONST	0x0001								; Number of locals
0373			BODY_0370:
0373			INIT_0370:
0373 00da       |    |		Load_Top	At_Offset_2
0374 0227       | '  |		Execute	Access,All_Reference
0375 2c05       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x5
0376 7006       |p   |		Jump_Nonzero	0x37d
0377 00da       |    |		Load_Top	At_Offset_2
0378 0227       | '  |		Execute	Access,All_Reference
0379 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
037a 0335       | 5  |		Declare_Variable	Array,Duplicate
037b 00cd       |    |		Action	Spare6_Action
037c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
037d 00da       |    |		Load_Top	At_Offset_2
037e 0227       | '  |		Execute	Access,All_Reference
037f 2c05       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x5
0380 8232       | 2  |		Call	0x1,0x32
0381 e210       |    |		Load	0x1,0x10
0382 01cc       |    |		Execute	Vector,Catenate
0383 00db       |    |		Load_Top	At_Offset_3
0384 0227       | '  |		Execute	Access,All_Reference
0385 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0386 01cc       |    |		Execute	Vector,Catenate
0387 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 0390       |    |		.CONST	0x0390								; Address of begin
0389 0004       |    |		.CONST	0x0004								; Address of exception handler
038a 0002       |    |		.CONST	0x0002								; Number of locals
038b			INIT_0388:
038b e20f       |    |		Load	0x1,0xf
038c 0901       |    |		Execute_Immediate	Binary_Scale,0x1
038d 0a20       |    |		Execute_Immediate	Plus,0x20
038e 00e4       |    |		Load_Encached	Positive_Cache
038f 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0390			BODY_0388:
0390 00cf       |    |		Action	Mark_Auxiliary
0391 e227       | '  |		Load	0x1,0x27
0392 01d9       |    |		Execute	Vector,Reverse_Bounds
0393 0263       | c  |		Execute	Discrete,Above_Bound
0394 7008       |p   |		Jump_Nonzero	0x39d
0395 00db       |    |		Load_Top	At_Offset_3
0396 00d9       |    |		Load_Top	At_Offset_1
0397 e227       | '  |		Load	0x1,0x27
0398 01d7       |    |		Execute	Vector,Field_Read
0399 0273       | s  |		Execute	Discrete,Plus
039a c402       |    |		Store	0x2,0x2
039b 00c8       |    |		Action	Pop_Auxiliary_Range
039c 3ff8       |?   |		Loop_Increasing	0x395
039d 00ce       |    |		Action	Pop_Auxiliary
039e 00d8       |    |		Load_Top	At_Offset_0
039f 00ca       |    |		Action	Exit_Nullary_Function
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03bb       |    |		.CONST	0x03bb								; Address of begin
03a1 0004       |    |		.CONST	0x0004								; Address of exception handler
03a2 0005       |    |		.CONST	0x0005								; Number of locals
03a3			INIT_03a0:
03a3 e001       |    |		Load	0x0,0x1
03a4 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
03a5 02c7       |    |		Declare_Variable	Any
03a6 00db       |    |		Load_Top	At_Offset_3
03a7 0227       | '  |		Execute	Access,All_Reference
03a8 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
03a9 a402       |    |		Store_Unchecked	0x2,0x2
03aa e00a       |    |		Load	0x0,0xa
03ab 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03ac 02c7       |    |		Declare_Variable	Any
03ad e00a       |    |		Load	0x0,0xa
03ae 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
03af a403       |    |		Store_Unchecked	0x2,0x3
03b0 e00a       |    |		Load	0x0,0xa
03b1 1b22       | "  |		Execute	Package,Field_Read,Field_Number 0x22
03b2 02c7       |    |		Declare_Variable	Any
03b3 e00a       |    |		Load	0x0,0xa
03b4 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
03b5 a404       |    |		Store_Unchecked	0x2,0x4
03b6 e003       |    |		Load	0x0,0x3
03b7 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
03b8 02c7       |    |		Declare_Variable	Any
03b9 00d8       |    |		Load_Top	At_Offset_0
03ba 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03bb			BODY_03a0:
03bb e5ff       |    |		Load	0x2,-0x1
03bc 0227       | '  |		Execute	Access,All_Reference
03bd 2c04       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
03be e002       |    |		Load	0x0,0x2
03bf 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03c0 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
03c1 00cf       |    |		Action	Mark_Auxiliary
03c2 781d       |x   |		Jump	0x3e0
03c3 00d9       |    |		Load_Top	At_Offset_1
03c4 e403       |    |		Load	0x2,0x3
03c5 4804       |H   |		Short_Literal	0x4
03c6 e5ff       |    |		Load	0x2,-0x1
03c7 0227       | '  |		Execute	Access,All_Reference
03c8 2c04       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
03c9 e002       |    |		Load	0x0,0x2
03ca 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03cb 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
03cc e00a       |    |		Load	0x0,0xa
03cd 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
03ce c403       |    |		Store	0x2,0x3
03cf c405       |    |		Store	0x2,0x5
03d0 00da       |    |		Load_Top	At_Offset_2
03d1 e403       |    |		Load	0x2,0x3
03d2 e00a       |    |		Load	0x0,0xa
03d3 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
03d4 c404       |    |		Store	0x2,0x4
03d5 e5ff       |    |		Load	0x2,-0x1
03d6 0229       | )  |		Execute	Access,All_Read
03d7 00d8       |    |		Load_Top	At_Offset_0
03d8 2c04       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
03d9 e002       |    |		Load	0x0,0x2
03da 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03db 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
03dc 00d9       |    |		Load_Top	At_Offset_1
03dd 2804       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4
03de 00d1       |    |		Pop_Control	Pop_Count_1
03df 00c9       |    |		Action	Pop_Auxiliary_Loop
03e0 e5ff       |    |		Load	0x2,-0x1
03e1 0227       | '  |		Execute	Access,All_Reference
03e2 2c04       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
03e3 e002       |    |		Load	0x0,0x2
03e4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03e5 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
03e6 6fdc       |o   |		Jump_Zero	0x3c3
03e7 00ce       |    |		Action	Pop_Auxiliary
03e8 00d9       |    |		Load_Top	At_Offset_1
03e9 e00a       |    |		Load	0x0,0xa
03ea 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
03eb c404       |    |		Store	0x2,0x4
03ec e00b       |    |		Load	0x0,0xb
03ed 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
03ee e00b       |    |		Load	0x0,0xb
03ef 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
03f0 00db       |    |		Load_Top	At_Offset_3
03f1 e5ff       |    |		Load	0x2,-0x1
03f2 0227       | '  |		Execute	Access,All_Reference
03f3 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
03f4 e00b       |    |		Load	0x0,0xb
03f5 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
03f6 e5ff       |    |		Load	0x2,-0x1
03f7 0227       | '  |		Execute	Access,All_Reference
03f8 2507       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x7
03f9 e5fe       |    |		Load	0x2,-0x2
03fa e004       |    |		Load	0x0,0x4
03fb 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
03fc 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
03fd 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
03fe 0000 0000  |    |		.XXX[0x2]
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 0408       |    |		.CONST	0x0408								; Address of begin
0401 0004       |    |		.CONST	0x0004								; Address of exception handler
0402 0004       |    |		.CONST	0x0004								; Number of locals
0403			INIT_0400:
0403 00e3       |    |		Load_Encached	Natural_Cache
0404 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0405 e224       | $  |		Load	0x1,0x24
0406 0007       |    |		Action	Break_Optional
0407 e21f       |    |		Load	0x1,0x1f
0408			BODY_0400:
0408 00cf       |    |		Action	Mark_Auxiliary
0409 78c2       |x   |		Jump	0x4cc
040a 00cf       |    |		Action	Mark_Auxiliary
040b 00db       |    |		Load_Top	At_Offset_3
040c 0227       | '  |		Execute	Access,All_Reference
040d 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
040e 01d9       |    |		Execute	Vector,Reverse_Bounds
040f 0263       | c  |		Execute	Discrete,Above_Bound
0410 70b2       |p   |		Jump_Nonzero	0x4c3
0411 00d8       |    |		Load_Top	At_Offset_0
0412 e403       |    |		Load	0x2,0x3
0413 0227       | '  |		Execute	Access,All_Reference
0414 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0415 01d7       |    |		Execute	Vector,Field_Read
0416 a404       |    |		Store_Unchecked	0x2,0x4
0417 e404       |    |		Load	0x2,0x4
0418 7054       |pT  |		Jump_Nonzero	0x46d
0419 4800       |H   |		Short_Literal	0x0
041a 4800       |H   |		Short_Literal	0x0
041b e21e       |    |		Load	0x1,0x1e
041c 1c08       |    |		Execute_Immediate	Run_Utility,0x8
041d 00d8       |    |		Load_Top	At_Offset_0
041e 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
041f 01dd       |    |		Execute	Vector,First
0420 00e2       |    |		Load_Encached	Integer_Cache
0421 00d9       |    |		Load_Top	At_Offset_1
0422 0267       | g  |		Execute	Discrete,Predecessor
0423 00e9       |    |		Load_Encached	String_Cache
0424 035b       | [  |		Declare_Type	Array,Constrained
0425 0337       | 7  |		Declare_Variable	Array
0426 00d9       |    |		Load_Top	At_Offset_1
0427 00d8       |    |		Load_Top	At_Offset_0
0428 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0429 00da       |    |		Load_Top	At_Offset_2
042a 01da       |    |		Execute	Vector,Bounds
042b 00da       |    |		Load_Top	At_Offset_2
042c 01da       |    |		Execute	Vector,Bounds
042d 00da       |    |		Load_Top	At_Offset_2
042e 027f       |    |		Execute	Discrete,Equal
042f 7001       |p   |		Jump_Nonzero	0x431
0430 08e0       |    |		Execute_Immediate	Raise,0xe0
0431 00cd       |    |		Action	Spare6_Action
0432 027f       |    |		Execute	Discrete,Equal
0433 7001       |p   |		Jump_Nonzero	0x435
0434 08e0       |    |		Execute_Immediate	Raise,0xe0
0435 00d2       |    |		Pop_Control	Pop_Count_2
0436 00d9       |    |		Load_Top	At_Offset_1
0437 2906       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x6
0438 00d8       |    |		Load_Top	At_Offset_0
0439 2507       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x7
043a 01dd       |    |		Execute	Vector,First
043b 00e2       |    |		Load_Encached	Integer_Cache
043c 00d9       |    |		Load_Top	At_Offset_1
043d 0267       | g  |		Execute	Discrete,Predecessor
043e 00e9       |    |		Load_Encached	String_Cache
043f 035b       | [  |		Declare_Type	Array,Constrained
0440 0337       | 7  |		Declare_Variable	Array
0441 00d9       |    |		Load_Top	At_Offset_1
0442 00d8       |    |		Load_Top	At_Offset_0
0443 2507       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x7
0444 00da       |    |		Load_Top	At_Offset_2
0445 01da       |    |		Execute	Vector,Bounds
0446 00da       |    |		Load_Top	At_Offset_2
0447 01da       |    |		Execute	Vector,Bounds
0448 00da       |    |		Load_Top	At_Offset_2
0449 027f       |    |		Execute	Discrete,Equal
044a 7001       |p   |		Jump_Nonzero	0x44c
044b 08e0       |    |		Execute_Immediate	Raise,0xe0
044c 00cd       |    |		Action	Spare6_Action
044d 027f       |    |		Execute	Discrete,Equal
044e 7001       |p   |		Jump_Nonzero	0x450
044f 08e0       |    |		Execute_Immediate	Raise,0xe0
0450 00d2       |    |		Pop_Control	Pop_Count_2
0451 00d9       |    |		Load_Top	At_Offset_1
0452 2907       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x7
0453 e001       |    |		Load	0x0,0x1
0454 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0455 e21e       |    |		Load	0x1,0x1e
0456 2303       |#   |		Execute	Variant_Record,Field_Type,Field_Number 0x3
0457 0119       |    |		Execute	Any,Check_In_Formal_Type
0458 00d9       |    |		Load_Top	At_Offset_1
0459 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
045a e002       |    |		Load	0x0,0x2
045b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
045c 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
045d e21e       |    |		Load	0x1,0x1e
045e 2304       |#   |		Execute	Variant_Record,Field_Type,Field_Number 0x4
045f 0119       |    |		Execute	Any,Check_In_Formal_Type
0460 00d9       |    |		Load_Top	At_Offset_1
0461 2804       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4
0462 e21f       |    |		Load	0x1,0x1f
0463 00d9       |    |		Load_Top	At_Offset_1
0464 2805       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5
0465 e21f       |    |		Load	0x1,0x1f
0466 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0467 00d9       |    |		Load_Top	At_Offset_1
0468 e403       |    |		Load	0x2,0x3
0469 0227       | '  |		Execute	Access,All_Reference
046a 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
046b 01d6       |    |		Execute	Vector,Field_Write
046c 7854       |xT  |		Jump	0x4c1
046d e404       |    |		Load	0x2,0x4
046e 0227       | '  |		Execute	Access,All_Reference
046f 2c05       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x5
0470 6850       |hP  |		Jump_Zero	0x4c1
0471 00d8       |    |		Load_Top	At_Offset_0
0472 e403       |    |		Load	0x2,0x3
0473 0227       | '  |		Execute	Access,All_Reference
0474 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0475 01d7       |    |		Execute	Vector,Field_Read
0476 4800       |H   |		Short_Literal	0x0
0477 e21e       |    |		Load	0x1,0x1e
0478 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0479 e404       |    |		Load	0x2,0x4
047a 8232       | 2  |		Call	0x1,0x32
047b 00d9       |    |		Load_Top	At_Offset_1
047c 00d8       |    |		Load_Top	At_Offset_0
047d 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
047e 00da       |    |		Load_Top	At_Offset_2
047f 01da       |    |		Execute	Vector,Bounds
0480 00da       |    |		Load_Top	At_Offset_2
0481 01da       |    |		Execute	Vector,Bounds
0482 00da       |    |		Load_Top	At_Offset_2
0483 027f       |    |		Execute	Discrete,Equal
0484 7001       |p   |		Jump_Nonzero	0x486
0485 08e0       |    |		Execute_Immediate	Raise,0xe0
0486 00cd       |    |		Action	Spare6_Action
0487 027f       |    |		Execute	Discrete,Equal
0488 7001       |p   |		Jump_Nonzero	0x48a
0489 08e0       |    |		Execute_Immediate	Raise,0xe0
048a 00d2       |    |		Pop_Control	Pop_Count_2
048b 00d9       |    |		Load_Top	At_Offset_1
048c 2906       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x6
048d 00d8       |    |		Load_Top	At_Offset_0
048e 2507       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x7
048f 01dd       |    |		Execute	Vector,First
0490 00e2       |    |		Load_Encached	Integer_Cache
0491 00d9       |    |		Load_Top	At_Offset_1
0492 0267       | g  |		Execute	Discrete,Predecessor
0493 00e9       |    |		Load_Encached	String_Cache
0494 035b       | [  |		Declare_Type	Array,Constrained
0495 0337       | 7  |		Declare_Variable	Array
0496 00d9       |    |		Load_Top	At_Offset_1
0497 00d8       |    |		Load_Top	At_Offset_0
0498 2507       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x7
0499 00da       |    |		Load_Top	At_Offset_2
049a 01da       |    |		Execute	Vector,Bounds
049b 00da       |    |		Load_Top	At_Offset_2
049c 01da       |    |		Execute	Vector,Bounds
049d 00da       |    |		Load_Top	At_Offset_2
049e 027f       |    |		Execute	Discrete,Equal
049f 7001       |p   |		Jump_Nonzero	0x4a1
04a0 08e0       |    |		Execute_Immediate	Raise,0xe0
04a1 00cd       |    |		Action	Spare6_Action
04a2 027f       |    |		Execute	Discrete,Equal
04a3 7001       |p   |		Jump_Nonzero	0x4a5
04a4 08e0       |    |		Execute_Immediate	Raise,0xe0
04a5 00d2       |    |		Pop_Control	Pop_Count_2
04a6 00d9       |    |		Load_Top	At_Offset_1
04a7 2907       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x7
04a8 e001       |    |		Load	0x0,0x1
04a9 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
04aa e21e       |    |		Load	0x1,0x1e
04ab 2303       |#   |		Execute	Variant_Record,Field_Type,Field_Number 0x3
04ac 0119       |    |		Execute	Any,Check_In_Formal_Type
04ad 00d9       |    |		Load_Top	At_Offset_1
04ae 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
04af e002       |    |		Load	0x0,0x2
04b0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04b1 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
04b2 e21e       |    |		Load	0x1,0x1e
04b3 2304       |#   |		Execute	Variant_Record,Field_Type,Field_Number 0x4
04b4 0119       |    |		Execute	Any,Check_In_Formal_Type
04b5 00d9       |    |		Load_Top	At_Offset_1
04b6 2804       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4
04b7 e21f       |    |		Load	0x1,0x1f
04b8 00d9       |    |		Load_Top	At_Offset_1
04b9 2805       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5
04ba e21f       |    |		Load	0x1,0x1f
04bb 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
04bc 00d9       |    |		Load_Top	At_Offset_1
04bd e403       |    |		Load	0x2,0x3
04be 0227       | '  |		Execute	Access,All_Reference
04bf 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
04c0 01d6       |    |		Execute	Vector,Field_Write
04c1 00c8       |    |		Action	Pop_Auxiliary_Range
04c2 3f4e       |?N  |		Loop_Increasing	0x411
04c3 00ce       |    |		Action	Pop_Auxiliary
04c4 00da       |    |		Load_Top	At_Offset_2
04c5 0227       | '  |		Execute	Access,All_Reference
04c6 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
04c7 003b       | ;  |		Store_Top	Access,At_Offset_3
04c8 00db       |    |		Load_Top	At_Offset_3
04c9 0a01       |    |		Execute_Immediate	Plus,0x1
04ca c402       |    |		Store	0x2,0x2
04cb 00c9       |    |		Action	Pop_Auxiliary_Loop
04cc 00da       |    |		Load_Top	At_Offset_2
04cd 773c       |w<  |		Jump_Nonzero	0x40a
04ce 00ce       |    |		Action	Pop_Auxiliary
04cf 00da       |    |		Load_Top	At_Offset_2
04d0 00ca       |    |		Action	Exit_Nullary_Function
04d1 0000 0000  |    |		.BLANK	0000[0x7]
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04dd       |    |		.CONST	0x04dd								; Address of begin
04d9 0004       |    |		.CONST	0x0004								; Address of exception handler
04da 0002       |    |		.CONST	0x0002								; Number of locals
04db			INIT_04d8:
04db e222       | "  |		Load	0x1,0x22
04dc 0007       |    |		Action	Break_Optional
04dd			BODY_04d8:
04dd e224       | $  |		Load	0x1,0x24
04de 0039       | 9  |		Store_Top	Access,At_Offset_1
04df 00cf       |    |		Action	Mark_Auxiliary
04e0 e5ff       |    |		Load	0x2,-0x1
04e1 01da       |    |		Execute	Vector,Bounds
04e2 0264       | d  |		Execute	Discrete,Below_Bound
04e3 700a       |p   |		Jump_Nonzero	0x4ee
04e4 00db       |    |		Load_Top	At_Offset_3
04e5 00d9       |    |		Load_Top	At_Offset_1
04e6 e5ff       |    |		Load	0x2,-0x1
04e7 01d6       |    |		Execute	Vector,Field_Write
04e8 00db       |    |		Load_Top	At_Offset_3
04e9 0227       | '  |		Execute	Access,All_Reference
04ea 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
04eb a402       |    |		Store_Unchecked	0x2,0x2
04ec 00c8       |    |		Action	Pop_Auxiliary_Range
04ed 37f6       |7   |		Loop_Decreasing	0x4e4
04ee 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
04ef 0000       |    |		.XXX[0x1]
04f0 ; --------------------------------------------------------------------------------------
04f0 ; SUBPROGRAM
04f0 ; --------------------------------------------------------------------------------------
04f0 04f3       |    |		.CONST	0x04f3								; Address of begin
04f1 0004       |    |		.CONST	0x0004								; Address of exception handler
04f2 0001       |    |		.CONST	0x0001								; Number of locals
04f3			BODY_04f0:
04f3			INIT_04f0:
04f3 00da       |    |		Load_Top	At_Offset_2
04f4 01db       |    |		Execute	Vector,Length
04f5 7003       |p   |		Jump_Nonzero	0x4f9
04f6 e222       | "  |		Load	0x1,0x22
04f7 a224       | $  |		Store_Unchecked	0x1,0x24
04f8 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04f9 e222       | "  |		Load	0x1,0x22
04fa 00db       |    |		Load_Top	At_Offset_3
04fb 01dd       |    |		Execute	Vector,First
04fc e5ff       |    |		Load	0x2,-0x1
04fd 01d7       |    |		Execute	Vector,Field_Read
04fe 0227       | '  |		Execute	Access,All_Reference
04ff 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0500 00cf       |    |		Action	Mark_Auxiliary
0501 00db       |    |		Load_Top	At_Offset_3
0502 01dc       |    |		Execute	Vector,Last
0503 e5ff       |    |		Load	0x2,-0x1
0504 01dd       |    |		Execute	Vector,First
0505 0a01       |    |		Execute_Immediate	Plus,0x1
0506 00d8       |    |		Load_Top	At_Offset_0
0507 00e2       |    |		Load_Encached	Integer_Cache
0508 0260       | `  |		Execute	Discrete,In_Type
0509 7001       |p   |		Jump_Nonzero	0x50b
050a 0801       |    |		Execute_Immediate	Raise,0x1
050b 0263       | c  |		Execute	Discrete,Above_Bound
050c 700b       |p   |		Jump_Nonzero	0x518
050d 00d8       |    |		Load_Top	At_Offset_0
050e 0aff       |    |		Execute_Immediate	Plus,-0x1
050f e5ff       |    |		Load	0x2,-0x1
0510 01d7       |    |		Execute	Vector,Field_Read
0511 00d9       |    |		Load_Top	At_Offset_1
0512 e5ff       |    |		Load	0x2,-0x1
0513 01d7       |    |		Execute	Vector,Field_Read
0514 0227       | '  |		Execute	Access,All_Reference
0515 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0516 00c8       |    |		Action	Pop_Auxiliary_Range
0517 3ff5       |?   |		Loop_Increasing	0x50d
0518 00ce       |    |		Action	Pop_Auxiliary
0519 00da       |    |		Load_Top	At_Offset_2
051a 01dc       |    |		Execute	Vector,Last
051b 00db       |    |		Load_Top	At_Offset_3
051c 01d7       |    |		Execute	Vector,Field_Read
051d a224       | $  |		Store_Unchecked	0x1,0x24
051e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
051f 0000       |    |		.XXX[0x1]
0520 ; --------------------------------------------------------------------------------------
0520 ; SUBPROGRAM
0520 ; --------------------------------------------------------------------------------------
0520 0523       | #  |		.CONST	0x0523								; Address of begin
0521 0004       |    |		.CONST	0x0004								; Address of exception handler
0522 0001       |    |		.CONST	0x0001								; Number of locals
0523			BODY_0520:
0523			INIT_0520:
0523 00da       |    |		Load_Top	At_Offset_2
0524 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0525 6802       |h   |		Jump_Zero	0x528
0526 00da       |    |		Load_Top	At_Offset_2
0527 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0528 00da       |    |		Load_Top	At_Offset_2
0529 0d00       |    |		Execute_Immediate	Less,0x0
052a 6803       |h   |		Jump_Zero	0x52e
052b 00da       |    |		Load_Top	At_Offset_2
052c 0275       | u  |		Execute	Discrete,Unary_Minus
052d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
052e 4801       |H   |		Short_Literal	0x1
052f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0530 ; --------------------------------------------------------------------------------------
0530 ; SUBPROGRAM
0530 ; --------------------------------------------------------------------------------------
0530 0537       | 7  |		.CONST	0x0537								; Address of begin
0531 0004       |    |		.CONST	0x0004								; Address of exception handler
0532 0002       |    |		.CONST	0x0002								; Number of locals
0533			INIT_0530:
0533 e403       |    |		Load	0x2,0x3
0534 0a01       |    |		Execute_Immediate	Plus,0x1
0535 00e3       |    |		Load_Encached	Natural_Cache
0536 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0537			BODY_0530:
0537 e403       |    |		Load	0x2,0x3
0538 e7ff       |    |		Load	0x3,-0x1
0539 01db       |    |		Execute	Vector,Length
053a 0273       | s  |		Execute	Discrete,Plus
053b c403       |    |		Store	0x2,0x3
053c 00db       |    |		Load_Top	At_Offset_3
053d 00d9       |    |		Load_Top	At_Offset_1
053e e403       |    |		Load	0x2,0x3
053f e402       |    |		Load	0x2,0x2
0540 01ce       |    |		Execute	Vector,Slice_Write
0541 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0542 0000 0000  |    |		.BLANK	0000[0x6]
0548 ; --------------------------------------------------------------------------------------
0548 ; SUBPROGRAM
0548 ; --------------------------------------------------------------------------------------
0548 054b       | K  |		.CONST	0x054b								; Address of begin
0549 0004       |    |		.CONST	0x0004								; Address of exception handler
054a 0001       |    |		.CONST	0x0001								; Number of locals
054b			BODY_0548:
054b			INIT_0548:
054b 4801       |H   |		Short_Literal	0x1
054c e403       |    |		Load	0x2,0x3
054d e402       |    |		Load	0x2,0x2
054e 01cf       |    |		Execute	Vector,Slice_Read
054f e5ff       |    |		Load	0x2,-0x1
0550 e00c       |    |		Load	0x0,0xc
0551 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
0552 4800       |H   |		Short_Literal	0x0
0553 a403       |    |		Store_Unchecked	0x2,0x3
0554 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0555 0000 0000  |    |		.XXX[0x3]
0557 0000       |    |
0558 ; --------------------------------------------------------------------------------------
0558 ; SUBPROGRAM
0558 ; --------------------------------------------------------------------------------------
0558 055f       | _  |		.CONST	0x055f								; Address of begin
0559 0004       |    |		.CONST	0x0004								; Address of exception handler
055a 0002       |    |		.CONST	0x0002								; Number of locals
055b			INIT_0558:
055b e403       |    |		Load	0x2,0x3
055c 0a01       |    |		Execute_Immediate	Plus,0x1
055d 00e3       |    |		Load_Encached	Natural_Cache
055e 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
055f			BODY_0558:
055f e403       |    |		Load	0x2,0x3
0560 e7fe       |    |		Load	0x3,-0x2
0561 0273       | s  |		Execute	Discrete,Plus
0562 c403       |    |		Store	0x2,0x3
0563 00cf       |    |		Action	Mark_Auxiliary
0564 e403       |    |		Load	0x2,0x3
0565 00da       |    |		Load_Top	At_Offset_2
0566 0263       | c  |		Execute	Discrete,Above_Bound
0567 7006       |p   |		Jump_Nonzero	0x56e
0568 e7ff       |    |		Load	0x3,-0x1
0569 00d9       |    |		Load_Top	At_Offset_1
056a e402       |    |		Load	0x2,0x2
056b 01d6       |    |		Execute	Vector,Field_Write
056c 00c8       |    |		Action	Pop_Auxiliary_Range
056d 3ffa       |?   |		Loop_Increasing	0x568
056e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
056f 0000       |    |		.XXX[0x1]
0570 ; --------------------------------------------------------------------------------------
0570 ; SUBPROGRAM
0570 ; --------------------------------------------------------------------------------------
0570 0573       | s  |		.CONST	0x0573								; Address of begin
0571 0004       |    |		.CONST	0x0004								; Address of exception handler
0572 0001       |    |		.CONST	0x0001								; Number of locals
0573			BODY_0570:
0573			INIT_0570:
0573 00da       |    |		Load_Top	At_Offset_2
0574 6803       |h   |		Jump_Zero	0x578
0575 00da       |    |		Load_Top	At_Offset_2
0576 8232       | 2  |		Call	0x1,0x32
0577 8405       |    |		Call	0x2,0x5
0578 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0579 0000 0000  |    |		.BLANK	0000[0x7]
0580 ; --------------------------------------------------------------------------------------
0580 ; SUBPROGRAM
0580 ; --------------------------------------------------------------------------------------
0580 0585       |    |		.CONST	0x0585								; Address of begin
0581 0004       |    |		.CONST	0x0004								; Address of exception handler
0582 0002       |    |		.CONST	0x0002								; Number of locals
0583			INIT_0580:
0583 e21c       |    |		Load	0x1,0x1c
0584 0337       | 7  |		Declare_Variable	Array
0585			BODY_0580:
0585 00cf       |    |		Action	Mark_Auxiliary
0586 e21b       |    |		Load	0x1,0x1b
0587 0269       | i  |		Execute	Discrete,Last
0588 4801       |H   |		Short_Literal	0x1
0589 0263       | c  |		Execute	Discrete,Above_Bound
058a 7019       |p   |		Jump_Nonzero	0x5a4
058b 00d8       |    |		Load_Top	At_Offset_0
058c e227       | '  |		Load	0x1,0x27
058d 01d7       |    |		Execute	Vector,Field_Read
058e 00d9       |    |		Load_Top	At_Offset_1
058f e229       | )  |		Load	0x1,0x29
0590 01d7       |    |		Execute	Vector,Field_Read
0591 0227       | '  |		Execute	Access,All_Reference
0592 01db       |    |		Execute	Vector,Length
0593 00d8       |    |		Load_Top	At_Offset_0
0594 00e2       |    |		Load_Encached	Integer_Cache
0595 0260       | `  |		Execute	Discrete,In_Type
0596 7001       |p   |		Jump_Nonzero	0x598
0597 0801       |    |		Execute_Immediate	Raise,0x1
0598 8230       | 0  |		Call	0x1,0x30
0599 00d9       |    |		Load_Top	At_Offset_1
059a e229       | )  |		Load	0x1,0x29
059b 01d7       |    |		Execute	Vector,Field_Read
059c 0227       | '  |		Execute	Access,All_Reference
059d 01db       |    |		Execute	Vector,Length
059e 0272       | r  |		Execute	Discrete,Minus
059f 00d9       |    |		Load_Top	At_Offset_1
05a0 e602       |    |		Load	0x3,0x2
05a1 01d6       |    |		Execute	Vector,Field_Write
05a2 00c8       |    |		Action	Pop_Auxiliary_Range
05a3 3fe7       |?   |		Loop_Increasing	0x58b
05a4 00ce       |    |		Action	Pop_Auxiliary
05a5 4801       |H   |		Short_Literal	0x1
05a6 00d9       |    |		Load_Top	At_Offset_1
05a7 01d7       |    |		Execute	Vector,Field_Read
05a8 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
05a9 00d8       |    |		Load_Top	At_Offset_0
05aa 00e3       |    |		Load_Encached	Natural_Cache
05ab 0260       | `  |		Execute	Discrete,In_Type
05ac 7001       |p   |		Jump_Nonzero	0x5ae
05ad 0801       |    |		Execute_Immediate	Raise,0x1
05ae 4820       |H   |		Short_Literal	0x20
05af 8407       |    |		Call	0x2,0x7
05b0 00cf       |    |		Action	Mark_Auxiliary
05b1 e21b       |    |		Load	0x1,0x1b
05b2 0269       | i  |		Execute	Discrete,Last
05b3 4801       |H   |		Short_Literal	0x1
05b4 0263       | c  |		Execute	Discrete,Above_Bound
05b5 701f       |p   |		Jump_Nonzero	0x5d5
05b6 00d8       |    |		Load_Top	At_Offset_0
05b7 e229       | )  |		Load	0x1,0x29
05b8 01d7       |    |		Execute	Vector,Field_Read
05b9 0227       | '  |		Execute	Access,All_Reference
05ba 8405       |    |		Call	0x2,0x5
05bb 00d8       |    |		Load_Top	At_Offset_0
05bc e21b       |    |		Load	0x1,0x1b
05bd 0269       | i  |		Execute	Discrete,Last
05be 027e       | ~  |		Execute	Discrete,Not_Equal
05bf 6813       |h   |		Jump_Zero	0x5d3
05c0 00d8       |    |		Load_Top	At_Offset_0
05c1 e602       |    |		Load	0x3,0x2
05c2 01d7       |    |		Execute	Vector,Field_Read
05c3 0a01       |    |		Execute_Immediate	Plus,0x1
05c4 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
05c5 00d9       |    |		Load_Top	At_Offset_1
05c6 0a01       |    |		Execute_Immediate	Plus,0x1
05c7 e602       |    |		Load	0x3,0x2
05c8 01d7       |    |		Execute	Vector,Field_Read
05c9 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
05ca 0273       | s  |		Execute	Discrete,Plus
05cb 0a02       |    |		Execute_Immediate	Plus,0x2
05cc 00d8       |    |		Load_Top	At_Offset_0
05cd 00e3       |    |		Load_Encached	Natural_Cache
05ce 0260       | `  |		Execute	Discrete,In_Type
05cf 7001       |p   |		Jump_Nonzero	0x5d1
05d0 0801       |    |		Execute_Immediate	Raise,0x1
05d1 4820       |H   |		Short_Literal	0x20
05d2 8407       |    |		Call	0x2,0x7
05d3 00c8       |    |		Action	Pop_Auxiliary_Range
05d4 3fe1       |?   |		Loop_Increasing	0x5b6
05d5 00ce       |    |		Action	Pop_Auxiliary
05d6 8406       |    |		Call	0x2,0x6
05d7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
05d8 ; --------------------------------------------------------------------------------------
05d8 ; SUBPROGRAM
05d8 ; --------------------------------------------------------------------------------------
05d8 05dd       |    |		.CONST	0x05dd								; Address of begin
05d9 0004       |    |		.CONST	0x0004								; Address of exception handler
05da 0003       |    |		.CONST	0x0003								; Number of locals
05db			INIT_05d8:
05db 00e3       |    |		Load_Encached	Natural_Cache
05dc 03e9       |    |		Declare_Variable	Discrete,Duplicate
05dd			BODY_05d8:
05dd 00cf       |    |		Action	Mark_Auxiliary
05de e21b       |    |		Load	0x1,0x1b
05df 0269       | i  |		Execute	Discrete,Last
05e0 4801       |H   |		Short_Literal	0x1
05e1 0263       | c  |		Execute	Discrete,Above_Bound
05e2 7089       |p   |		Jump_Nonzero	0x66c
05e3 00d8       |    |		Load_Top	At_Offset_0
05e4 e227       | '  |		Load	0x1,0x27
05e5 01d7       |    |		Execute	Vector,Field_Read
05e6 00d9       |    |		Load_Top	At_Offset_1
05e7 e7ff       |    |		Load	0x3,-0x1
05e8 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
05e9 01d7       |    |		Execute	Vector,Field_Read
05ea 0272       | r  |		Execute	Discrete,Minus
05eb c602       |    |		Store	0x3,0x2
05ec 00d8       |    |		Load_Top	At_Offset_0
05ed e227       | '  |		Load	0x1,0x27
05ee 01d7       |    |		Execute	Vector,Field_Read
05ef 00d9       |    |		Load_Top	At_Offset_1
05f0 e229       | )  |		Load	0x1,0x29
05f1 01d7       |    |		Execute	Vector,Field_Read
05f2 0227       | '  |		Execute	Access,All_Reference
05f3 01db       |    |		Execute	Vector,Length
05f4 00d8       |    |		Load_Top	At_Offset_0
05f5 00e2       |    |		Load_Encached	Integer_Cache
05f6 0260       | `  |		Execute	Discrete,In_Type
05f7 7001       |p   |		Jump_Nonzero	0x5f9
05f8 0801       |    |		Execute_Immediate	Raise,0x1
05f9 8230       | 0  |		Call	0x1,0x30
05fa 00d9       |    |		Load_Top	At_Offset_1
05fb e227       | '  |		Load	0x1,0x27
05fc 01d7       |    |		Execute	Vector,Field_Read
05fd 0272       | r  |		Execute	Discrete,Minus
05fe c603       |    |		Store	0x3,0x3
05ff 00d8       |    |		Load_Top	At_Offset_0
0600 e22c       | ,  |		Load	0x1,0x2c
0601 01d7       |    |		Execute	Vector,Field_Read
0602 4602       |F   |		Jump_Case	0x3
0603 7825       |x%  |		Jump	0x629								; case 0x0
0604 7845       |xE  |		Jump	0x64a								; case 0x1
0605 7800       |x   |		Jump	0x606								; case 0x2
0606 e602       |    |		Load	0x3,0x2
0607 e603       |    |		Load	0x3,0x3
0608 0273       | s  |		Execute	Discrete,Plus
0609 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
060a 00d8       |    |		Load_Top	At_Offset_0
060b 00e3       |    |		Load_Encached	Natural_Cache
060c 0260       | `  |		Execute	Discrete,In_Type
060d 7001       |p   |		Jump_Nonzero	0x60f
060e 0801       |    |		Execute_Immediate	Raise,0x1
060f 4820       |H   |		Short_Literal	0x20
0610 8407       |    |		Call	0x2,0x7
0611 00d8       |    |		Load_Top	At_Offset_0
0612 e7ff       |    |		Load	0x3,-0x1
0613 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0614 01d7       |    |		Execute	Vector,Field_Read
0615 8408       |    |		Call	0x2,0x8
0616 00d8       |    |		Load_Top	At_Offset_0
0617 e21b       |    |		Load	0x1,0x1b
0618 0269       | i  |		Execute	Discrete,Last
0619 027e       | ~  |		Execute	Discrete,Not_Equal
061a 684f       |hO  |		Jump_Zero	0x66a
061b e602       |    |		Load	0x3,0x2
061c e603       |    |		Load	0x3,0x3
061d 0273       | s  |		Execute	Discrete,Plus
061e 0a01       |    |		Execute_Immediate	Plus,0x1
061f 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
0620 0a02       |    |		Execute_Immediate	Plus,0x2
0621 00d8       |    |		Load_Top	At_Offset_0
0622 00e3       |    |		Load_Encached	Natural_Cache
0623 0260       | `  |		Execute	Discrete,In_Type
0624 7001       |p   |		Jump_Nonzero	0x626
0625 0801       |    |		Execute_Immediate	Raise,0x1
0626 4820       |H   |		Short_Literal	0x20
0627 8407       |    |		Call	0x2,0x7
0628 7841       |xA  |		Jump	0x66a
0629 00db       |    |		Load_Top	At_Offset_3
062a 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
062b 00d8       |    |		Load_Top	At_Offset_0
062c 00e3       |    |		Load_Encached	Natural_Cache
062d 0260       | `  |		Execute	Discrete,In_Type
062e 7001       |p   |		Jump_Nonzero	0x630
062f 0801       |    |		Execute_Immediate	Raise,0x1
0630 4820       |H   |		Short_Literal	0x20
0631 8407       |    |		Call	0x2,0x7
0632 00d8       |    |		Load_Top	At_Offset_0
0633 e7ff       |    |		Load	0x3,-0x1
0634 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0635 01d7       |    |		Execute	Vector,Field_Read
0636 8408       |    |		Call	0x2,0x8
0637 00d8       |    |		Load_Top	At_Offset_0
0638 e21b       |    |		Load	0x1,0x1b
0639 0269       | i  |		Execute	Discrete,Last
063a 027e       | ~  |		Execute	Discrete,Not_Equal
063b 682e       |h.  |		Jump_Zero	0x66a
063c 00db       |    |		Load_Top	At_Offset_3
063d 0a01       |    |		Execute_Immediate	Plus,0x1
063e 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
063f e602       |    |		Load	0x3,0x2
0640 0273       | s  |		Execute	Discrete,Plus
0641 0a02       |    |		Execute_Immediate	Plus,0x2
0642 00d8       |    |		Load_Top	At_Offset_0
0643 00e3       |    |		Load_Encached	Natural_Cache
0644 0260       | `  |		Execute	Discrete,In_Type
0645 7001       |p   |		Jump_Nonzero	0x647
0646 0801       |    |		Execute_Immediate	Raise,0x1
0647 4820       |H   |		Short_Literal	0x20
0648 8407       |    |		Call	0x2,0x7
0649 7820       |x   |		Jump	0x66a
064a 00db       |    |		Load_Top	At_Offset_3
064b 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
064c e602       |    |		Load	0x3,0x2
064d 0273       | s  |		Execute	Discrete,Plus
064e 00d8       |    |		Load_Top	At_Offset_0
064f 00e3       |    |		Load_Encached	Natural_Cache
0650 0260       | `  |		Execute	Discrete,In_Type
0651 7001       |p   |		Jump_Nonzero	0x653
0652 0801       |    |		Execute_Immediate	Raise,0x1
0653 4820       |H   |		Short_Literal	0x20
0654 8407       |    |		Call	0x2,0x7
0655 00d8       |    |		Load_Top	At_Offset_0
0656 e7ff       |    |		Load	0x3,-0x1
0657 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0658 01d7       |    |		Execute	Vector,Field_Read
0659 8408       |    |		Call	0x2,0x8
065a 00d8       |    |		Load_Top	At_Offset_0
065b e21b       |    |		Load	0x1,0x1b
065c 0269       | i  |		Execute	Discrete,Last
065d 027e       | ~  |		Execute	Discrete,Not_Equal
065e 680b       |h   |		Jump_Zero	0x66a
065f 00db       |    |		Load_Top	At_Offset_3
0660 0a01       |    |		Execute_Immediate	Plus,0x1
0661 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
0662 0a02       |    |		Execute_Immediate	Plus,0x2
0663 00d8       |    |		Load_Top	At_Offset_0
0664 00e3       |    |		Load_Encached	Natural_Cache
0665 0260       | `  |		Execute	Discrete,In_Type
0666 7001       |p   |		Jump_Nonzero	0x668
0667 0801       |    |		Execute_Immediate	Raise,0x1
0668 4820       |H   |		Short_Literal	0x20
0669 8407       |    |		Call	0x2,0x7
066a 00c8       |    |		Action	Pop_Auxiliary_Range
066b 3f77       |?w  |		Loop_Increasing	0x5e3
066c 00ce       |    |		Action	Pop_Auxiliary
066d 8406       |    |		Call	0x2,0x6
066e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
066f 0000       |    |		.XXX[0x1]
0670 ; --------------------------------------------------------------------------------------
0670 ; SUBPROGRAM
0670 ; --------------------------------------------------------------------------------------
0670 0673       | s  |		.CONST	0x0673								; Address of begin
0671 0004       |    |		.CONST	0x0004								; Address of exception handler
0672 0001       |    |		.CONST	0x0001								; Number of locals
0673			BODY_0670:
0673			INIT_0670:
0673 00da       |    |		Load_Top	At_Offset_2
0674 7029       |p)  |		Jump_Nonzero	0x69e
0675 8409       |    |		Call	0x2,0x9
0676 00cf       |    |		Action	Mark_Auxiliary
0677 e21b       |    |		Load	0x1,0x1b
0678 0269       | i  |		Execute	Discrete,Last
0679 4801       |H   |		Short_Literal	0x1
067a 0263       | c  |		Execute	Discrete,Above_Bound
067b 701f       |p   |		Jump_Nonzero	0x69b
067c 00d8       |    |		Load_Top	At_Offset_0
067d e227       | '  |		Load	0x1,0x27
067e 01d7       |    |		Execute	Vector,Field_Read
067f 00d9       |    |		Load_Top	At_Offset_1
0680 e229       | )  |		Load	0x1,0x29
0681 01d7       |    |		Execute	Vector,Field_Read
0682 0227       | '  |		Execute	Access,All_Reference
0683 01db       |    |		Execute	Vector,Length
0684 00d8       |    |		Load_Top	At_Offset_0
0685 00e2       |    |		Load_Encached	Integer_Cache
0686 0260       | `  |		Execute	Discrete,In_Type
0687 7001       |p   |		Jump_Nonzero	0x689
0688 0801       |    |		Execute_Immediate	Raise,0x1
0689 8230       | 0  |		Call	0x1,0x30
068a 00d8       |    |		Load_Top	At_Offset_0
068b 00e3       |    |		Load_Encached	Natural_Cache
068c 0260       | `  |		Execute	Discrete,In_Type
068d 7001       |p   |		Jump_Nonzero	0x68f
068e 0801       |    |		Execute_Immediate	Raise,0x1
068f 483d       |H=  |		Short_Literal	0x3d
0690 8407       |    |		Call	0x2,0x7
0691 00d8       |    |		Load_Top	At_Offset_0
0692 e21b       |    |		Load	0x1,0x1b
0693 0269       | i  |		Execute	Discrete,Last
0694 027e       | ~  |		Execute	Discrete,Not_Equal
0695 6803       |h   |		Jump_Zero	0x699
0696 4802       |H   |		Short_Literal	0x2
0697 4820       |H   |		Short_Literal	0x20
0698 8407       |    |		Call	0x2,0x7
0699 00c8       |    |		Action	Pop_Auxiliary_Range
069a 3fe1       |?   |		Loop_Increasing	0x67c
069b 00ce       |    |		Action	Pop_Auxiliary
069c 8406       |    |		Call	0x2,0x6
069d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
069e 00da       |    |		Load_Top	At_Offset_2
069f 0227       | '  |		Execute	Access,All_Reference
06a0 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
06a1 840b       |    |		Call	0x2,0xb
06a2 00da       |    |		Load_Top	At_Offset_2
06a3 0227       | '  |		Execute	Access,All_Reference
06a4 840a       |    |		Call	0x2,0xa
06a5 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
06a6 0000 0000  |    |		.XXX[0x2]
06a8 ; --------------------------------------------------------------------------------------
06a8 ; SUBPROGRAM
06a8 ; --------------------------------------------------------------------------------------
06a8 06ab       |    |		.CONST	0x06ab								; Address of begin
06a9 0004       |    |		.CONST	0x0004								; Address of exception handler
06aa 0001       |    |		.CONST	0x0001								; Number of locals
06ab			BODY_06a8:
06ab			INIT_06a8:
06ab 00da       |    |		Load_Top	At_Offset_2
06ac 680b       |h   |		Jump_Zero	0x6b8
06ad e004       |    |		Load	0x0,0x4
06ae 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
06af e5fe       |    |		Load	0x2,-0x2
06b0 e7ff       |    |		Load	0x3,-0x1
06b1 8234       | 4  |		Call	0x1,0x34
06b2 e7ff       |    |		Load	0x3,-0x1
06b3 8232       | 2  |		Call	0x1,0x32
06b4 e5fe       |    |		Load	0x2,-0x2
06b5 e004       |    |		Load	0x0,0x4
06b6 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
06b7 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
06b8 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
06b9 0000 0000  |    |		.BLANK	0000[0x7]
06c0 ; --------------------------------------------------------------------------------------
06c0 ; SUBPROGRAM
06c0 ; --------------------------------------------------------------------------------------
06c0 06c3       |    |		.CONST	0x06c3								; Address of begin
06c1 0004       |    |		.CONST	0x0004								; Address of exception handler
06c2 0001       |    |		.CONST	0x0001								; Number of locals
06c3			BODY_06c0:
06c3			INIT_06c0:
06c3 00cf       |    |		Action	Mark_Auxiliary
06c4 e21b       |    |		Load	0x1,0x1b
06c5 0269       | i  |		Execute	Discrete,Last
06c6 4801       |H   |		Short_Literal	0x1
06c7 0263       | c  |		Execute	Discrete,Above_Bound
06c8 7013       |p   |		Jump_Nonzero	0x6dc
06c9 e004       |    |		Load	0x0,0x4
06ca 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
06cb e004       |    |		Load	0x0,0x4
06cc 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
06cd 5812       |X   |		Indirect_Literal	Float,0x6e0,1.0
06ce 00db       |    |		Load_Top	At_Offset_3
06cf e22c       | ,  |		Load	0x1,0x2c
06d0 01d7       |    |		Execute	Vector,Field_Read
06d1 822f       | /  |		Call	0x1,0x2f
06d2 e604       |    |		Load	0x3,0x4
06d3 e229       | )  |		Load	0x1,0x29
06d4 01d7       |    |		Execute	Vector,Field_Read
06d5 0227       | '  |		Execute	Access,All_Reference
06d6 e5fe       |    |		Load	0x2,-0x2
06d7 e004       |    |		Load	0x0,0x4
06d8 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
06d9 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
06da 00c8       |    |		Action	Pop_Auxiliary_Range
06db 3fed       |?   |		Loop_Increasing	0x6c9
06dc 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
06dd 0000 0000  |    |		.XXX[0x3]
06df 0000       |    |
06e0 3ff0 0000  |?   |		.DBL	1.0
06e2 0000 0000  |    |
06e4 0000 0000  |    |		.BLANK	0000[0x4]
06e8 ; --------------------------------------------------------------------------------------
06e8 ; SUBPROGRAM
06e8 ; --------------------------------------------------------------------------------------
06e8 06eb       |    |		.CONST	0x06eb								; Address of begin
06e9 0004       |    |		.CONST	0x0004								; Address of exception handler
06ea 0001       |    |		.CONST	0x0001								; Number of locals
06eb			BODY_06e8:
06eb			INIT_06e8:
06eb 00da       |    |		Load_Top	At_Offset_2
06ec 7002       |p   |		Jump_Nonzero	0x6ef
06ed 8404       |    |		Call	0x2,0x4
06ee 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
06ef 00da       |    |		Load_Top	At_Offset_2
06f0 0227       | '  |		Execute	Access,All_Reference
06f1 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
06f2 8405       |    |		Call	0x2,0x5
06f3 00cf       |    |		Action	Mark_Auxiliary
06f4 e21b       |    |		Load	0x1,0x1b
06f5 0269       | i  |		Execute	Discrete,Last
06f6 4801       |H   |		Short_Literal	0x1
06f7 0263       | c  |		Execute	Discrete,Above_Bound
06f8 7008       |p   |		Jump_Nonzero	0x701
06f9 00d8       |    |		Load_Top	At_Offset_0
06fa e7ff       |    |		Load	0x3,-0x1
06fb 0227       | '  |		Execute	Access,All_Reference
06fc 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
06fd 01d7       |    |		Execute	Vector,Field_Read
06fe 8403       |    |		Call	0x2,0x3
06ff 00c8       |    |		Action	Pop_Auxiliary_Range
0700 3ff8       |?   |		Loop_Increasing	0x6f9
0701 00ce       |    |		Action	Pop_Auxiliary
0702 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0703 0000 0000  |    |		.BLANK	0000[0x5]
0708 ; --------------------------------------------------------------------------------------
0708 ; SUBPROGRAM
0708 ; --------------------------------------------------------------------------------------
0708 070b       |    |		.CONST	0x070b								; Address of begin
0709 0004       |    |		.CONST	0x0004								; Address of exception handler
070a 0001       |    |		.CONST	0x0001								; Number of locals
070b			BODY_0708:
070b			INIT_0708:
070b e404       |    |		Load	0x2,0x4
070c e5ff       |    |		Load	0x2,-0x1
070d 027f       |    |		Execute	Discrete,Equal
070e 682a       |h*  |		Jump_Zero	0x739
070f e5ff       |    |		Load	0x2,-0x1
0710 e22e       | .  |		Load	0x1,0x2e
0711 01d7       |    |		Execute	Vector,Field_Read
0712 6816       |h   |		Jump_Zero	0x729
0713 e5ff       |    |		Load	0x2,-0x1
0714 00db       |    |		Load_Top	At_Offset_3
0715 0227       | '  |		Execute	Access,All_Reference
0716 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0717 01d7       |    |		Execute	Vector,Field_Read
0718 0227       | '  |		Execute	Access,All_Reference
0719 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
071a 00e5       |    |		Load_Encached	Long_Integer_Cache
071b 00e0       |    |		Load_Encached	Standard_Cache
071c 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
071d e5ff       |    |		Load	0x2,-0x1
071e e7fe       |    |		Load	0x3,-0x2
071f 0227       | '  |		Execute	Access,All_Reference
0720 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0721 01d7       |    |		Execute	Vector,Field_Read
0722 0227       | '  |		Execute	Access,All_Reference
0723 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0724 00e5       |    |		Load_Encached	Long_Integer_Cache
0725 00e0       |    |		Load_Encached	Standard_Cache
0726 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0727 027c       | |  |		Execute	Discrete,Less
0728 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0729 e5ff       |    |		Load	0x2,-0x1
072a 00db       |    |		Load_Top	At_Offset_3
072b 0227       | '  |		Execute	Access,All_Reference
072c 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
072d 01d7       |    |		Execute	Vector,Field_Read
072e 0227       | '  |		Execute	Access,All_Reference
072f 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0730 e5ff       |    |		Load	0x2,-0x1
0731 e7fe       |    |		Load	0x3,-0x2
0732 0227       | '  |		Execute	Access,All_Reference
0733 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0734 01d7       |    |		Execute	Vector,Field_Read
0735 0227       | '  |		Execute	Access,All_Reference
0736 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0737 01c1       |    |		Execute	Vector,Less
0738 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0739 e5ff       |    |		Load	0x2,-0x1
073a e22e       | .  |		Load	0x1,0x2e
073b 01d7       |    |		Execute	Vector,Field_Read
073c 6816       |h   |		Jump_Zero	0x753
073d e404       |    |		Load	0x2,0x4
073e 00db       |    |		Load_Top	At_Offset_3
073f 0227       | '  |		Execute	Access,All_Reference
0740 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0741 01d7       |    |		Execute	Vector,Field_Read
0742 0227       | '  |		Execute	Access,All_Reference
0743 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0744 00e5       |    |		Load_Encached	Long_Integer_Cache
0745 00e0       |    |		Load_Encached	Standard_Cache
0746 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0747 e404       |    |		Load	0x2,0x4
0748 e7fe       |    |		Load	0x3,-0x2
0749 0227       | '  |		Execute	Access,All_Reference
074a 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
074b 01d7       |    |		Execute	Vector,Field_Read
074c 0227       | '  |		Execute	Access,All_Reference
074d 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
074e 00e5       |    |		Load_Encached	Long_Integer_Cache
074f 00e0       |    |		Load_Encached	Standard_Cache
0750 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0751 027d       | }  |		Execute	Discrete,Greater
0752 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0753 e404       |    |		Load	0x2,0x4
0754 e7fe       |    |		Load	0x3,-0x2
0755 0227       | '  |		Execute	Access,All_Reference
0756 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0757 01d7       |    |		Execute	Vector,Field_Read
0758 0227       | '  |		Execute	Access,All_Reference
0759 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
075a e404       |    |		Load	0x2,0x4
075b e7ff       |    |		Load	0x3,-0x1
075c 0227       | '  |		Execute	Access,All_Reference
075d 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
075e 01d7       |    |		Execute	Vector,Field_Read
075f 0227       | '  |		Execute	Access,All_Reference
0760 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0761 01c1       |    |		Execute	Vector,Less
0762 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0763 0000 0000  |    |		.BLANK	0000[0x5]
0768 ; --------------------------------------------------------------------------------------
0768 ; SUBPROGRAM
0768 ; --------------------------------------------------------------------------------------
0768 076d       | m  |		.CONST	0x076d								; Address of begin
0769 0004       |    |		.CONST	0x0004								; Address of exception handler
076a 0002       |    |		.CONST	0x0002								; Number of locals
076b			INIT_0768:
076b 029f 077b  |   {|		Declare_Subprogram	INIT_0778,For_Call
076d			BODY_0768:
076d 00cf       |    |		Action	Mark_Auxiliary
076e e404       |    |		Load	0x2,0x4
076f 01d9       |    |		Execute	Vector,Reverse_Bounds
0770 0263       | c  |		Execute	Discrete,Above_Bound
0771 7003       |p   |		Jump_Nonzero	0x775
0772 8602       |    |		Call	0x3,0x2
0773 00c8       |    |		Action	Pop_Auxiliary_Range
0774 3ffd       |?   |		Loop_Increasing	0x772
0775 00ce       |    |		Action	Pop_Auxiliary
0776 4800       |H   |		Short_Literal	0x0
0777 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0778 ; --------------------------------------------------------------------------------------
0778 ; SUBPROGRAM
0778 ; --------------------------------------------------------------------------------------
0778 0799       |    |		.CONST	0x0799								; Address of begin
0779 0004       |    |		.CONST	0x0004								; Address of exception handler
077a 0007       |    |		.CONST	0x0007								; Number of locals
077b			INIT_0778:
077b e605       |    |		Load	0x3,0x5
077c e404       |    |		Load	0x2,0x4
077d 01d7       |    |		Execute	Vector,Field_Read
077e 00e2       |    |		Load_Encached	Integer_Cache
077f 03f1       |    |		Declare_Variable	Discrete,With_Value
0780 00d8       |    |		Load_Top	At_Offset_0
0781 e605       |    |		Load	0x3,0x5
0782 e5ff       |    |		Load	0x2,-0x1
0783 01d7       |    |		Execute	Vector,Field_Read
0784 027f       |    |		Execute	Discrete,Equal
0785 00e1       |    |		Load_Encached	Boolean_Cache
0786 03f1       |    |		Declare_Variable	Discrete,With_Value
0787 00d9       |    |		Load_Top	At_Offset_1
0788 e7ff       |    |		Load	0x3,-0x1
0789 0227       | '  |		Execute	Access,All_Reference
078a 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
078b 01d7       |    |		Execute	Vector,Field_Read
078c 0227       | '  |		Execute	Access,All_Reference
078d 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
078e 0007       |    |		Action	Break_Optional
078f 00da       |    |		Load_Top	At_Offset_2
0790 e7fe       |    |		Load	0x3,-0x2
0791 0227       | '  |		Execute	Access,All_Reference
0792 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0793 01d7       |    |		Execute	Vector,Field_Read
0794 0227       | '  |		Execute	Access,All_Reference
0795 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0796 0007       |    |		Action	Break_Optional
0797 00e5       |    |		Load_Encached	Long_Integer_Cache
0798 00e5       |    |		Load_Encached	Long_Integer_Cache
0799			BODY_0778:
0799 e802       |    |		Load	0x4,0x2
079a e22e       | .  |		Load	0x1,0x2e
079b 01d7       |    |		Execute	Vector,Field_Read
079c 682a       |h*  |		Jump_Zero	0x7c7
079d 00db       |    |		Load_Top	At_Offset_3
079e 00e5       |    |		Load_Encached	Long_Integer_Cache
079f 00e0       |    |		Load_Encached	Standard_Cache
07a0 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
07a1 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
07a2 00da       |    |		Load_Top	At_Offset_2
07a3 00e5       |    |		Load_Encached	Long_Integer_Cache
07a4 00e0       |    |		Load_Encached	Standard_Cache
07a5 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
07a6 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
07a7 e803       |    |		Load	0x4,0x3
07a8 680f       |h   |		Jump_Zero	0x7b8
07a9 00d9       |    |		Load_Top	At_Offset_1
07aa 00d9       |    |		Load_Top	At_Offset_1
07ab 027c       | |  |		Execute	Discrete,Less
07ac 6803       |h   |		Jump_Zero	0x7b0
07ad 4801       |H   |		Short_Literal	0x1
07ae 00cb       |    |		Action	Pop_Block_With_Result
07af 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07b0 00d9       |    |		Load_Top	At_Offset_1
07b1 00d9       |    |		Load_Top	At_Offset_1
07b2 027d       | }  |		Execute	Discrete,Greater
07b3 6803       |h   |		Jump_Zero	0x7b7
07b4 4800       |H   |		Short_Literal	0x0
07b5 00cb       |    |		Action	Pop_Block_With_Result
07b6 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07b7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
07b8 00d9       |    |		Load_Top	At_Offset_1
07b9 00d9       |    |		Load_Top	At_Offset_1
07ba 027d       | }  |		Execute	Discrete,Greater
07bb 6803       |h   |		Jump_Zero	0x7bf
07bc 4801       |H   |		Short_Literal	0x1
07bd 00cb       |    |		Action	Pop_Block_With_Result
07be 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07bf 00d9       |    |		Load_Top	At_Offset_1
07c0 00d9       |    |		Load_Top	At_Offset_1
07c1 027c       | |  |		Execute	Discrete,Less
07c2 6803       |h   |		Jump_Zero	0x7c6
07c3 4800       |H   |		Short_Literal	0x0
07c4 00cb       |    |		Action	Pop_Block_With_Result
07c5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07c6 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
07c7 e803       |    |		Load	0x4,0x3
07c8 680f       |h   |		Jump_Zero	0x7d8
07c9 00db       |    |		Load_Top	At_Offset_3
07ca 00db       |    |		Load_Top	At_Offset_3
07cb 01c1       |    |		Execute	Vector,Less
07cc 6803       |h   |		Jump_Zero	0x7d0
07cd 4801       |H   |		Short_Literal	0x1
07ce 00cb       |    |		Action	Pop_Block_With_Result
07cf 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07d0 00da       |    |		Load_Top	At_Offset_2
07d1 e804       |    |		Load	0x4,0x4
07d2 01c1       |    |		Execute	Vector,Less
07d3 6803       |h   |		Jump_Zero	0x7d7
07d4 4800       |H   |		Short_Literal	0x0
07d5 00cb       |    |		Action	Pop_Block_With_Result
07d6 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07d7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
07d8 00da       |    |		Load_Top	At_Offset_2
07d9 e804       |    |		Load	0x4,0x4
07da 01c1       |    |		Execute	Vector,Less
07db 6803       |h   |		Jump_Zero	0x7df
07dc 4801       |H   |		Short_Literal	0x1
07dd 00cb       |    |		Action	Pop_Block_With_Result
07de 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07df 00db       |    |		Load_Top	At_Offset_3
07e0 00db       |    |		Load_Top	At_Offset_3
07e1 01c1       |    |		Execute	Vector,Less
07e2 6803       |h   |		Jump_Zero	0x7e6
07e3 4800       |H   |		Short_Literal	0x0
07e4 00cb       |    |		Action	Pop_Block_With_Result
07e5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07e6 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
07e7 ; --------------------------------------------------------------------------------------
07e7 ; STRING TABLE
07e7 ; --------------------------------------------------------------------------------------
07e7 000a       |    |		.STRTAB	0x000a->0x07ec							; "LEFT"
07e8 000c       |    |		.STRTAB	0x000c->0x07ee							; "RIGHT"
07e9 000f       |    |		.STRTAB	0x000f->0x07f0							; "CENTERED"
07ea 0015       |    |		.STRTAB	0x0015->0x07f4							; "(none)"
07eb 0019       |    |		.STREND 0x0019->0x07f7
07ec 4c45 4654  |LEFT|		.STRTAB_STRINGS
07f8 ; --------------------------------------------------------------------------------------
07f8 ; Debug Table
07f8 ; --------------------------------------------------------------------------------------
07f8 0004 0004  |    |		.DEBUG4	0x0004,0x0004,0x2e97,0x0000,0x0001,0x0024
07fe 000b 088e  |    |		.DBG4T	0x000b,0x088e,0xc000,0x8000
0802 0027 08a4  | '  |		.DBG4T	0x0027,0x08a4,0xc000,0x8000
0806 00e3 0000  |    |		.DBG4T	0x00e3,0x0000,0x1005,0x0000
080a 010b 08f3  |    |		.DBG4T	0x010b,0x08f3,0x1001,0x0000
080e 012b 08fa  | +  |		.DBG4T	0x012b,0x08fa,0x1001,0x0000
0812 0173 090a  | s  |		.DBG4T	0x0173,0x090a,0x1001,0x0000
0816 0193 0910  |    |		.DBG4T	0x0193,0x0910,0x1001,0x0000
081a 01ab 0915  |    |		.DBG4T	0x01ab,0x0915,0x1001,0x0000
081e 01cb 0922  |   "|		.DBG4T	0x01cb,0x0922,0x1001,0x0000
0822 01f3 092c  |   ,|		.DBG4T	0x01f3,0x092c,0x1001,0x0000
0826 0223 0936  | # 6|		.DBG4T	0x0223,0x0936,0x1001,0x0000
082a 0263 0000  | c  |		.DBG4T	0x0263,0x0000,0x1005,0x0000
082e 029b 0000  |    |		.DBG4T	0x029b,0x0000,0x1005,0x0000
0832 02c3 0942  |   B|		.DBG4T	0x02c3,0x0942,0x1002,0x4000
0836 02d3 094c  |   L|		.DBG4T	0x02d3,0x094c,0x1002,0x0000
083a 02e3 0951  |   Q|		.DBG4T	0x02e3,0x0951,0x1001,0x0000
083e 0373 0961  | s a|		.DBG4T	0x0373,0x0961,0x1002,0x0000
0842 038b 0966  |   f|		.DBG4T	0x038b,0x0966,0x1002,0x0000
0846 03a3 096c  |   l|		.DBG4T	0x03a3,0x096c,0x1002,0x4000
084a 0403 0980  |    |		.DBG4T	0x0403,0x0980,0x1002,0x4000
084e 04db 0999  |    |		.DBG4T	0x04db,0x0999,0x1001,0x0000
0852 04f3 09a0  |    |		.DBG4T	0x04f3,0x09a0,0x1001,0x0000
0856 0523 09a9  | #  |		.DBG4T	0x0523,0x09a9,0x1002,0x0000
085a 0533 09b0  | 3  |		.DBG4T	0x0533,0x09b0,0x1001,0x0000
085e 054b 09b5  | K  |		.DBG4T	0x054b,0x09b5,0x1001,0x0000
0862 055b 09b9  | [  |		.DBG4T	0x055b,0x09b9,0x1001,0x0000
0866 0573 09bf  | s  |		.DBG4T	0x0573,0x09bf,0x1001,0x0000
086a 0583 09c3  |    |		.DBG4T	0x0583,0x09c3,0x1001,0x0000
086e 05db 09ce  |    |		.DBG4T	0x05db,0x09ce,0x1001,0x4000
0872 0673 09f3  | s  |		.DBG4T	0x0673,0x09f3,0x1001,0x0000
0876 06ab 09fe  |    |		.DBG4T	0x06ab,0x09fe,0x1001,0x0000
087a 06c3 0a02  |    |		.DBG4T	0x06c3,0x0a02,0x1001,0x0000
087e 06eb 0a06  |    |		.DBG4T	0x06eb,0x0a06,0x1001,0x0000
0882 070b 0a0d  |    |		.DBG4T	0x070b,0x0a0d,0x1002,0x0000
0886 076b 0a16  | k  |		.DBG4T	0x076b,0x0a16,0x1002,0x0000
088a 077b 0a1b  | {  |		.DBG4T	0x077b,0x0a1b,0x1004,0x0000
088e ; --------------------------------------------------------------------------------------
088e ; Debug chain
088e ; --------------------------------------------------------------------------------------
088e 000a 0000  |    |		.DBGLEN	0x000a,0x0000
0890 000b 0010  |    |		.DBGLNO	0x000b,0x0010,0x0012,0x0014,0x0016,0x0018,0x001a,0x001c,0x0022,0x0024
089a 0003 0004  |    |		.XXX[0xa]
089c 0005 0006  |    |
089e 0007 0008  |    |
08a0 0009 000a  |    |
08a2 000b 000c  |    |
08a4 ; --------------------------------------------------------------------------------------
08a4 ; Debug chain
08a4 ; --------------------------------------------------------------------------------------
08a4 0025 0003  | %  |		.DBGLEN	0x0025,0x0003
08a6 0027 002b  | ' +|		.DBGLNO	0x0027,0x002b,0x0032,0x0036,0x0042,0x0046,0x0055,0x005c,0x005e,0x0062,0x0068,0x006a,0x0071,0x0075,0x0077,0x0087,0x0090,0x0092,0x009b,0x00a4,0x00a6,0x00a8,0x00aa,0x00ac,0x00ae,0x00b0,0x00b2,0x00b4,0x00b6,0x00b8,0x00ba,0x00bc,0x00be,0x00c0,0x00c2,0x00c4,0x00c6,0x00c9,0x00ce,0x00d2
08ce 0004 0005  |    |		.XXX[0x25]
08d0 0006 0007  |    |
08d2 0008 0009  |    |
08d4 000a 000b  |    |
08d6 000c 000d  |    |
08d8 000e 000f  |    |
08da 0010 0011  |    |
08dc 0012 0013  |    |
08de 0014 0015  |    |
08e0 0016 0017  |    |
08e2 0018 0019  |    |
08e4 001a 001b  |    |
08e6 001c 001d  |    |
08e8 001e 001f  |    |
08ea 0020 0021  |   !|
08ec 0022 0023  | " #|
08ee 0024 0025  | $ %|
08f0 0026 0027  | & '|
08f2 0028       | (  |
08f3 ; --------------------------------------------------------------------------------------
08f3 ; Debug chain
08f3 ; --------------------------------------------------------------------------------------
08f3 0000 0005  |    |		.DBGLEN	0x0000,0x0005
08f5 010b 010e  |    |		.DBGLNO	0x010b,0x010e,0x0112,0x0116,0x011c
08fa ; --------------------------------------------------------------------------------------
08fa ; Debug chain
08fa ; --------------------------------------------------------------------------------------
08fa 0004 000a  |    |		.DBGLEN	0x0004,0x000a
08fc 012b 0131  | + 1|		.DBGLNO	0x012b,0x0131,0x0137,0x013c,0x013d,0x0142,0x0148,0x014b,0x014e,0x0153,0x015d,0x0161,0x0166,0x016b
090a ; --------------------------------------------------------------------------------------
090a ; Debug chain
090a ; --------------------------------------------------------------------------------------
090a 0000 0004  |    |		.DBGLEN	0x0000,0x0004
090c 0173 0175  | s u|		.DBGLNO	0x0173,0x0175,0x017e,0x018b
0910 ; --------------------------------------------------------------------------------------
0910 ; Debug chain
0910 ; --------------------------------------------------------------------------------------
0910 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0912 0193 0195  |    |		.DBGLNO	0x0193,0x0195,0x0198
0915 ; --------------------------------------------------------------------------------------
0915 ; Debug chain
0915 ; --------------------------------------------------------------------------------------
0915 000a 0001  |    |		.DBGLEN	0x000a,0x0001
0917 01ab 01b0  |    |		.DBGLNO	0x01ab,0x01b0,0x01b2,0x01b7,0x01b9,0x01bb,0x01bd,0x01bf,0x01c1,0x01c3,0x01c5
0922 ; --------------------------------------------------------------------------------------
0922 ; Debug chain
0922 ; --------------------------------------------------------------------------------------
0922 0004 0004  |    |		.DBGLEN	0x0004,0x0004
0924 01cb 01d0  |    |		.DBGLNO	0x01cb,0x01d0,0x01d2,0x01d4,0x01d6,0x01d8,0x01e3,0x01e5
092c ; --------------------------------------------------------------------------------------
092c ; Debug chain
092c ; --------------------------------------------------------------------------------------
092c 0005 0003  |    |		.DBGLEN	0x0005,0x0003
092e 01f3 01f8  |    |		.DBGLNO	0x01f3,0x01f8,0x01fa,0x01fe,0x0200,0x020c,0x020f,0x021b
0936 ; --------------------------------------------------------------------------------------
0936 ; Debug chain
0936 ; --------------------------------------------------------------------------------------
0936 0005 0005  |    |		.DBGLEN	0x0005,0x0005
0938 0223 0228  | # (|		.DBGLNO	0x0223,0x0228,0x022a,0x022f,0x0231,0x023d,0x0241,0x024b,0x024e,0x025a
0942 ; --------------------------------------------------------------------------------------
0942 ; Debug chain
0942 ; --------------------------------------------------------------------------------------
0942 0000 0004  |    |		.DBGLEN	0x0000,0x0004
0944 02c3 02c8  |    |		.DBGLNO	0x02c3,0x02c8,0x02ca,0x02cc
0948 0001 0004  |    |		.XXX[0x4]
094a 0002 0003  |    |
094c ; --------------------------------------------------------------------------------------
094c ; Debug chain
094c ; --------------------------------------------------------------------------------------
094c 0000 0003  |    |		.DBGLEN	0x0000,0x0003
094e 02d3 02d7  |    |		.DBGLNO	0x02d3,0x02d7,0x02d9
0951 ; --------------------------------------------------------------------------------------
0951 ; Debug chain
0951 ; --------------------------------------------------------------------------------------
0951 0006 0008  |    |		.DBGLEN	0x0006,0x0008
0953 02e3 02e9  |    |		.DBGLNO	0x02e3,0x02e9,0x02ef,0x02f3,0x0301,0x030f,0x0310,0x0314,0x0319,0x031b,0x031f,0x0327,0x032b,0x032d
0961 ; --------------------------------------------------------------------------------------
0961 ; Debug chain
0961 ; --------------------------------------------------------------------------------------
0961 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0963 0373 0377  | s w|		.DBGLNO	0x0373,0x0377,0x037d
0966 ; --------------------------------------------------------------------------------------
0966 ; Debug chain
0966 ; --------------------------------------------------------------------------------------
0966 0001 0003  |    |		.DBGLEN	0x0001,0x0003
0968 038b 0391  |    |		.DBGLNO	0x038b,0x0391,0x0395,0x039e
096c ; --------------------------------------------------------------------------------------
096c ; Debug chain
096c ; --------------------------------------------------------------------------------------
096c 0004 0007  |    |		.DBGLEN	0x0004,0x0007
096e 03a3 03aa  |    |		.DBGLNO	0x03a3,0x03aa,0x03b0,0x03b6,0x03bb,0x03c3,0x03d0,0x03d5,0x03e0,0x03e8,0x03ec
0979 0001 0003  |    |		.XXX[0x7]
097b 0004 0005  |    |
097d 0002 0006  |    |
097f 0007       |    |
0980 ; --------------------------------------------------------------------------------------
0980 ; Debug chain
0980 ; --------------------------------------------------------------------------------------
0980 0003 000a  |    |		.DBGLEN	0x0003,0x000a
0982 0403 0405  |    |		.DBGLNO	0x0403,0x0405,0x0407,0x040b,0x0411,0x0417,0x0419,0x046d,0x0471,0x04c4,0x04c8,0x04cc,0x04cf
098f 0002 0003  |    |		.XXX[0xa]
0991 0004 0005  |    |
0993 0006 0007  |    |
0995 0008 0009  |    |
0997 0001 000a  |    |
0999 ; --------------------------------------------------------------------------------------
0999 ; Debug chain
0999 ; --------------------------------------------------------------------------------------
0999 0001 0004  |    |		.DBGLEN	0x0001,0x0004
099b 04db 04dd  |    |		.DBGLNO	0x04db,0x04dd,0x04e0,0x04e4,0x04e8
09a0 ; --------------------------------------------------------------------------------------
09a0 ; Debug chain
09a0 ; --------------------------------------------------------------------------------------
09a0 0000 0007  |    |		.DBGLEN	0x0000,0x0007
09a2 04f3 04f6  |    |		.DBGLNO	0x04f3,0x04f6,0x04f8,0x04f9,0x0501,0x050d,0x0519
09a9 ; --------------------------------------------------------------------------------------
09a9 ; Debug chain
09a9 ; --------------------------------------------------------------------------------------
09a9 0000 0005  |    |		.DBGLEN	0x0000,0x0005
09ab 0523 0526  | # &|		.DBGLNO	0x0523,0x0526,0x0528,0x052b,0x052e
09b0 ; --------------------------------------------------------------------------------------
09b0 ; Debug chain
09b0 ; --------------------------------------------------------------------------------------
09b0 0001 0002  |    |		.DBGLEN	0x0001,0x0002
09b2 0533 0537  | 3 7|		.DBGLNO	0x0533,0x0537,0x053c
09b5 ; --------------------------------------------------------------------------------------
09b5 ; Debug chain
09b5 ; --------------------------------------------------------------------------------------
09b5 0000 0002  |    |		.DBGLEN	0x0000,0x0002
09b7 054b 0552  | K R|		.DBGLNO	0x054b,0x0552
09b9 ; --------------------------------------------------------------------------------------
09b9 ; Debug chain
09b9 ; --------------------------------------------------------------------------------------
09b9 0001 0003  |    |		.DBGLEN	0x0001,0x0003
09bb 055b 055f  | [ _|		.DBGLNO	0x055b,0x055f,0x0564,0x0568
09bf ; --------------------------------------------------------------------------------------
09bf ; Debug chain
09bf ; --------------------------------------------------------------------------------------
09bf 0000 0002  |    |		.DBGLEN	0x0000,0x0002
09c1 0573 0575  | s u|		.DBGLNO	0x0573,0x0575
09c3 ; --------------------------------------------------------------------------------------
09c3 ; Debug chain
09c3 ; --------------------------------------------------------------------------------------
09c3 0001 0008  |    |		.DBGLEN	0x0001,0x0008
09c5 0583 0586  |    |		.DBGLNO	0x0583,0x0586,0x058b,0x05a5,0x05b1,0x05b6,0x05bb,0x05c0,0x05d6
09ce ; --------------------------------------------------------------------------------------
09ce ; Debug chain
09ce ; --------------------------------------------------------------------------------------
09ce 0001 0011  |    |		.DBGLEN	0x0001,0x0011
09d0 05db 05de  |    |		.DBGLNO	0x05db,0x05de,0x05e3,0x05ec,0x05ff,0x0606,0x0611,0x0616,0x061b,0x0629,0x0632,0x0637,0x063c,0x064a,0x0655,0x065a,0x065f,0x066d
09e2 0001 0002  |    |		.XXX[0x11]
09e4 0003 0004  |    |
09e6 000d 000e  |    |
09e8 000f 0010  |    |
09ea 0005 0006  |    |
09ec 0007 0008  |    |
09ee 0009 000a  |    |
09f0 000b 000c  |    |
09f2 0011       |    |
09f3 ; --------------------------------------------------------------------------------------
09f3 ; Debug chain
09f3 ; --------------------------------------------------------------------------------------
09f3 0000 0009  |    |		.DBGLEN	0x0000,0x0009
09f5 0673 0675  | s u|		.DBGLNO	0x0673,0x0675,0x0677,0x067c,0x0691,0x0696,0x069c,0x069e,0x06a2
09fe ; --------------------------------------------------------------------------------------
09fe ; Debug chain
09fe ; --------------------------------------------------------------------------------------
09fe 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0a00 06ab 06ad  |    |		.DBGLNO	0x06ab,0x06ad
0a02 ; --------------------------------------------------------------------------------------
0a02 ; Debug chain
0a02 ; --------------------------------------------------------------------------------------
0a02 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0a04 06c4 06c9  |    |		.DBGLNO	0x06c4,0x06c9
0a06 ; --------------------------------------------------------------------------------------
0a06 ; Debug chain
0a06 ; --------------------------------------------------------------------------------------
0a06 0000 0005  |    |		.DBGLEN	0x0000,0x0005
0a08 06eb 06ed  |    |		.DBGLNO	0x06eb,0x06ed,0x06ef,0x06f4,0x06f9
0a0d ; --------------------------------------------------------------------------------------
0a0d ; Debug chain
0a0d ; --------------------------------------------------------------------------------------
0a0d 0000 0007  |    |		.DBGLEN	0x0000,0x0007
0a0f 070b 070f  |    |		.DBGLNO	0x070b,0x070f,0x0713,0x0729,0x0739,0x073d,0x0753
0a16 ; --------------------------------------------------------------------------------------
0a16 ; Debug chain
0a16 ; --------------------------------------------------------------------------------------
0a16 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0a18 076e 0772  | n r|		.DBGLNO	0x076e,0x0772,0x0776
0a1b ; --------------------------------------------------------------------------------------
0a1b ; Debug chain
0a1b ; --------------------------------------------------------------------------------------
0a1b 0006 0015  |    |		.DBGLEN	0x0006,0x0015
0a1d 077b 0780  | {  |		.DBGLNO	0x077b,0x0780,0x0787,0x078f,0x0797,0x0798,0x0799,0x079d,0x07a2,0x07a7,0x07a9,0x07ad,0x07b0,0x07b4,0x07b8,0x07bc,0x07bf,0x07c3,0x07c7,0x07c9,0x07cd,0x07d0,0x07d4,0x07d8,0x07dc,0x07df,0x07e3
0a38 0000 0000  |    |		.BLANK	0000[0x1c8]