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

⟦040a87fcd⟧

    Length: 5120 (0x1400)
    Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6214bb

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 06a8       |    |		.CONST	0x06a8								; 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 0004       |    |		.CONST	0x0004								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0099       |    |		.CONST	0x0099								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0033       | 3  |		.CONST	0x0033								; Number of locals
000b			INIT_0008:
000b 029a 00a3  |    |		Declare_Subprogram	INIT_00a0,For_Outer_Call,Visible,Unelaborated
000d 029a 0113  |    |		Declare_Subprogram	INIT_0110,For_Outer_Call,Visible,Unelaborated
000f 029a 016b  |   k|		Declare_Subprogram	INIT_0168,For_Outer_Call,Visible,Unelaborated
0011 029a 01ab  |    |		Declare_Subprogram	INIT_01a8,For_Outer_Call,Visible,Unelaborated
0013 029a 01eb  |    |		Declare_Subprogram	INIT_01e8,For_Outer_Call,Visible,Unelaborated
0015 029a 020b  |    |		Declare_Subprogram	INIT_0208,For_Outer_Call,Visible,Unelaborated
0017 029a 0233  |   3|		Declare_Subprogram	INIT_0230,For_Outer_Call,Visible,Unelaborated
0019 029a 0263  |   c|		Declare_Subprogram	INIT_0260,For_Outer_Call,Visible,Unelaborated
001b 029a 028b  |    |		Declare_Subprogram	INIT_0288,For_Outer_Call,Visible,Unelaborated
001d 029a 0293  |    |		Declare_Subprogram	INIT_0290,For_Outer_Call,Visible,Unelaborated
001f 029a 029b  |    |		Declare_Subprogram	INIT_0298,For_Outer_Call,Visible,Unelaborated
0021 029a 02a3  |    |		Declare_Subprogram	INIT_02a0,For_Outer_Call,Visible,Unelaborated
0023 029a 02ab  |    |		Declare_Subprogram	INIT_02a8,For_Outer_Call,Visible,Unelaborated
0025 029a 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Outer_Call,Visible,Unelaborated
0027 029a 02bb  |    |		Declare_Subprogram	INIT_02b8,For_Outer_Call,Visible,Unelaborated
0029 029a 02c3  |    |		Declare_Subprogram	INIT_02c0,For_Outer_Call,Visible,Unelaborated
002b 029a 02cb  |    |		Declare_Subprogram	INIT_02c8,For_Outer_Call,Visible,Unelaborated
002d 029a 02d3  |    |		Declare_Subprogram	INIT_02d0,For_Outer_Call,Visible,Unelaborated
002f 029a 02db  |    |		Declare_Subprogram	INIT_02d8,For_Outer_Call,Visible,Unelaborated
0031 029a 02e3  |    |		Declare_Subprogram	INIT_02e0,For_Outer_Call,Visible,Unelaborated
0033 029a 02eb  |    |		Declare_Subprogram	INIT_02e8,For_Outer_Call,Visible,Unelaborated
0035 029a 02fb  |    |		Declare_Subprogram	INIT_02f8,For_Outer_Call,Visible,Unelaborated
0037 029a 030b  |    |		Declare_Subprogram	INIT_0308,For_Outer_Call,Visible,Unelaborated
0039 029a 0323  |   #|		Declare_Subprogram	INIT_0320,For_Outer_Call,Visible,Unelaborated
003b 029a 033b  |   ;|		Declare_Subprogram	INIT_0338,For_Outer_Call,Visible,Unelaborated
003d 029a 03ab  |    |		Declare_Subprogram	INIT_03a8,For_Outer_Call,Visible,Unelaborated
003f 029a 03db  |    |		Declare_Subprogram	INIT_03d8,For_Outer_Call,Visible,Unelaborated
0041 029a 0413  |    |		Declare_Subprogram	INIT_0410,For_Outer_Call,Visible,Unelaborated
0043 029a 0463  |   c|		Declare_Subprogram	INIT_0460,For_Outer_Call,Visible,Unelaborated
0045 029a 049b  |    |		Declare_Subprogram	INIT_0498,For_Outer_Call,Visible,Unelaborated
0047 0093 0000  |    |		push_full_address	0x0
0049 60c2       |`   |		Indirect_Literal	Discrete,0x10c,{0x80000000, 0x00010000}
004a 0273       | s  |		Execute	Discrete,Plus
004b 0129       | )  |		Execute	Any,Make_Visible
004c 00bf       |    |		Action	Accept_Activation
004d 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
004e 00c7       |    |		Action	Elaborate_Subprogram
004f 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0050 00c7       |    |		Action	Elaborate_Subprogram
0051 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0052 00c7       |    |		Action	Elaborate_Subprogram
0053 029d 0533  |   3|		Declare_Subprogram	INIT_0530,For_Outer_Call
0055 029d 055b  |   [|		Declare_Subprogram	INIT_0558,For_Outer_Call
0057 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0058 00c7       |    |		Action	Elaborate_Subprogram
0059 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
005a 00c7       |    |		Action	Elaborate_Subprogram
005b 029d 0573  |   s|		Declare_Subprogram	INIT_0570,For_Outer_Call
005d 029d 0593  |    |		Declare_Subprogram	INIT_0590,For_Outer_Call
005f 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0060 00c7       |    |		Action	Elaborate_Subprogram
0061 029d 05e3  |    |		Declare_Subprogram	INIT_05e0,For_Outer_Call
0063 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0064 00c7       |    |		Action	Elaborate_Subprogram
0065 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
0066 00c7       |    |		Action	Elaborate_Subprogram
0067 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
0068 00c7       |    |		Action	Elaborate_Subprogram
0069 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
006a 00c7       |    |		Action	Elaborate_Subprogram
006b 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
006c 00c7       |    |		Action	Elaborate_Subprogram
006d 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
006e 00c7       |    |		Action	Elaborate_Subprogram
006f 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
0070 00c7       |    |		Action	Elaborate_Subprogram
0071 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
0072 00c7       |    |		Action	Elaborate_Subprogram
0073 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
0074 00c7       |    |		Action	Elaborate_Subprogram
0075 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
0076 00c7       |    |		Action	Elaborate_Subprogram
0077 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
0078 00c7       |    |		Action	Elaborate_Subprogram
0079 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
007a 00c7       |    |		Action	Elaborate_Subprogram
007b 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
007c 00c7       |    |		Action	Elaborate_Subprogram
007d 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
007e 00c7       |    |		Action	Elaborate_Subprogram
007f 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
0080 00c7       |    |		Action	Elaborate_Subprogram
0081 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22
0082 00c7       |    |		Action	Elaborate_Subprogram
0083 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
0084 00c7       |    |		Action	Elaborate_Subprogram
0085 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
0086 00c7       |    |		Action	Elaborate_Subprogram
0087 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25
0088 00c7       |    |		Action	Elaborate_Subprogram
0089 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26
008a 00c7       |    |		Action	Elaborate_Subprogram
008b 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
008c 00c7       |    |		Action	Elaborate_Subprogram
008d 029d 0603  |    |		Declare_Subprogram	INIT_0600,For_Outer_Call
008f 029d 061b  |    |		Declare_Subprogram	INIT_0618,For_Outer_Call
0091 029d 0643  |   C|		Declare_Subprogram	INIT_0640,For_Outer_Call
0093 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
0094 00c7       |    |		Action	Elaborate_Subprogram
0095 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29
0096 00c7       |    |		Action	Elaborate_Subprogram
0097 1d2a       | *  |		Execute_Immediate	Reference_Lex_1,0x2a
0098 00c7       |    |		Action	Elaborate_Subprogram
0099			BODY_0008:
0099 00bc       |    |		Action	Signal_Activated
009a 00bb       |    |		Action	Signal_Completion
009b 0000 0000  |    |		.BLANK	0000[0x5]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00aa       |    |		.CONST	0x00aa								; Address of begin
00a1 0004       |    |		.CONST	0x0004								; Address of exception handler
00a2 0003       |    |		.CONST	0x0003								; Number of locals
00a3			INIT_00a0:
00a3 4801       |H   |		Short_Literal	0x1
00a4 4809       |H   |		Short_Literal	0x9
00a5 e002       |    |		Load	0x0,0x2
00a6 035b       | [  |		Declare_Type	Array,Constrained
00a7 0337       | 7  |		Declare_Variable	Array
00a8 e003       |    |		Load	0x0,0x3
00a9 0322       | "  |		Declare_Variable	Record
00aa			BODY_00a0:
00aa e5ff       |    |		Load	0x2,-0x1
00ab 8004       |    |		Call	0x0,0x4
00ac 8005       |    |		Call	0x0,0x5
00ad 4801       |H   |		Short_Literal	0x1
00ae 00db       |    |		Load_Top	At_Offset_3
00af 01d6       |    |		Execute	Vector,Field_Write
00b0 4800       |H   |		Short_Literal	0x0
00b1 8005       |    |		Call	0x0,0x5
00b2 4802       |H   |		Short_Literal	0x2
00b3 00db       |    |		Load_Top	At_Offset_3
00b4 01d6       |    |		Execute	Vector,Field_Write
00b5 4806       |H   |		Short_Literal	0x6
00b6 8005       |    |		Call	0x0,0x5
00b7 4803       |H   |		Short_Literal	0x3
00b8 00db       |    |		Load_Top	At_Offset_3
00b9 01d6       |    |		Execute	Vector,Field_Write
00ba 4822       |H"  |		Short_Literal	0x22
00bb 4804       |H   |		Short_Literal	0x4
00bc 00db       |    |		Load_Top	At_Offset_3
00bd 01d6       |    |		Execute	Vector,Field_Write
00be e5ff       |    |		Load	0x2,-0x1
00bf 8006       |    |		Call	0x0,0x6
00c0 00d9       |    |		Load_Top	At_Offset_1
00c1 017d       | }  |		Execute	Record,Structure_Write
00c2 00d8       |    |		Load_Top	At_Offset_0
00c3 8007       |    |		Call	0x0,0x7
00c4 4805       |H   |		Short_Literal	0x5
00c5 00db       |    |		Load_Top	At_Offset_3
00c6 01d6       |    |		Execute	Vector,Field_Write
00c7 00d8       |    |		Load_Top	At_Offset_0
00c8 8008       |    |		Call	0x0,0x8
00c9 0f01       |    |		Execute_Immediate	Equal,0x1
00ca 6805       |h   |		Jump_Zero	0xd0
00cb 4816       |H   |		Short_Literal	0x16
00cc 4806       |H   |		Short_Literal	0x6
00cd 00db       |    |		Load_Top	At_Offset_3
00ce 01d6       |    |		Execute	Vector,Field_Write
00cf 7804       |x   |		Jump	0xd4
00d0 4817       |H   |		Short_Literal	0x17
00d1 4806       |H   |		Short_Literal	0x6
00d2 00db       |    |		Load_Top	At_Offset_3
00d3 01d6       |    |		Execute	Vector,Field_Write
00d4 00d8       |    |		Load_Top	At_Offset_0
00d5 8009       |    |		Call	0x0,0x9
00d6 0f01       |    |		Execute_Immediate	Equal,0x1
00d7 6805       |h   |		Jump_Zero	0xdd
00d8 4819       |H   |		Short_Literal	0x19
00d9 4807       |H   |		Short_Literal	0x7
00da 00db       |    |		Load_Top	At_Offset_3
00db 01d6       |    |		Execute	Vector,Field_Write
00dc 7804       |x   |		Jump	0xe1
00dd 4818       |H   |		Short_Literal	0x18
00de 4807       |H   |		Short_Literal	0x7
00df 00db       |    |		Load_Top	At_Offset_3
00e0 01d6       |    |		Execute	Vector,Field_Write
00e1 00d8       |    |		Load_Top	At_Offset_0
00e2 800a       |    |		Call	0x0,0xa
00e3 0b00       |    |		Execute_Immediate	Case_Compare,0x0
00e4 7010       |p   |		Jump_Nonzero	0xf5
00e5 0b01       |    |		Execute_Immediate	Case_Compare,0x1
00e6 7003       |p   |		Jump_Nonzero	0xea
00e7 0f02       |    |		Execute_Immediate	Equal,0x2
00e8 7007       |p   |		Jump_Nonzero	0xf0
00e9 7810       |x   |		Jump	0xfa
00ea 00d1       |    |		Pop_Control	Pop_Count_1
00eb 481b       |H   |		Short_Literal	0x1b
00ec 4808       |H   |		Short_Literal	0x8
00ed 00db       |    |		Load_Top	At_Offset_3
00ee 01d6       |    |		Execute	Vector,Field_Write
00ef 780a       |x   |		Jump	0xfa
00f0 481a       |H   |		Short_Literal	0x1a
00f1 4808       |H   |		Short_Literal	0x8
00f2 00db       |    |		Load_Top	At_Offset_3
00f3 01d6       |    |		Execute	Vector,Field_Write
00f4 7805       |x   |		Jump	0xfa
00f5 00d1       |    |		Pop_Control	Pop_Count_1
00f6 481c       |H   |		Short_Literal	0x1c
00f7 4808       |H   |		Short_Literal	0x8
00f8 00db       |    |		Load_Top	At_Offset_3
00f9 01d6       |    |		Execute	Vector,Field_Write
00fa 00d8       |    |		Load_Top	At_Offset_0
00fb 800b       |    |		Call	0x0,0xb
00fc 0f01       |    |		Execute_Immediate	Equal,0x1
00fd 6805       |h   |		Jump_Zero	0x103
00fe 4820       |H   |		Short_Literal	0x20
00ff 4809       |H   |		Short_Literal	0x9
0100 00db       |    |		Load_Top	At_Offset_3
0101 01d6       |    |		Execute	Vector,Field_Write
0102 7804       |x   |		Jump	0x107
0103 4821       |H!  |		Short_Literal	0x21
0104 4809       |H   |		Short_Literal	0x9
0105 00db       |    |		Load_Top	At_Offset_3
0106 01d6       |    |		Execute	Vector,Field_Write
0107 00d9       |    |		Load_Top	At_Offset_1
0108 e002       |    |		Load	0x0,0x2
0109 01c6       |    |		Execute	Vector,Convert_To_Formal
010a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
010b 0000       |    |		.XXX[0x1]
010c 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 011b       |    |		.CONST	0x011b								; Address of begin
0111 0004       |    |		.CONST	0x0004								; Address of exception handler
0112 0004       |    |		.CONST	0x0004								; Number of locals
0113			INIT_0110:
0113 e00c       |    |		Load	0x0,0xc
0114 0322       | "  |		Declare_Variable	Record
0115 4801       |H   |		Short_Literal	0x1
0116 4807       |H   |		Short_Literal	0x7
0117 e002       |    |		Load	0x0,0x2
0118 035b       | [  |		Declare_Type	Array,Constrained
0119 0337       | 7  |		Declare_Variable	Array
011a 00e3       |    |		Load_Encached	Natural_Cache
011b			BODY_0110:
011b e5ff       |    |		Load	0x2,-0x1
011c 800d       |    |		Call	0x0,0xd
011d 00db       |    |		Load_Top	At_Offset_3
011e 017d       | }  |		Execute	Record,Structure_Write
011f e5ff       |    |		Load	0x2,-0x1
0120 8004       |    |		Call	0x0,0x4
0121 8005       |    |		Call	0x0,0x5
0122 4801       |H   |		Short_Literal	0x1
0123 00db       |    |		Load_Top	At_Offset_3
0124 01d6       |    |		Execute	Vector,Field_Write
0125 4800       |H   |		Short_Literal	0x0
0126 8005       |    |		Call	0x0,0x5
0127 4802       |H   |		Short_Literal	0x2
0128 00db       |    |		Load_Top	At_Offset_3
0129 01d6       |    |		Execute	Vector,Field_Write
012a 4804       |H   |		Short_Literal	0x4
012b 8005       |    |		Call	0x0,0x5
012c 4803       |H   |		Short_Literal	0x3
012d 00db       |    |		Load_Top	At_Offset_3
012e 01d6       |    |		Execute	Vector,Field_Write
012f 4827       |H'  |		Short_Literal	0x27
0130 4804       |H   |		Short_Literal	0x4
0131 00db       |    |		Load_Top	At_Offset_3
0132 01d6       |    |		Execute	Vector,Field_Write
0133 00da       |    |		Load_Top	At_Offset_2
0134 800e       |    |		Call	0x0,0xe
0135 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0136 00d8       |    |		Load_Top	At_Offset_0
0137 4864       |Hd  |		Short_Literal	0x64
0138 026e       | n  |		Execute	Discrete,Modulo
0139 00d8       |    |		Load_Top	At_Offset_0
013a 00e3       |    |		Load_Encached	Natural_Cache
013b 0260       | `  |		Execute	Discrete,In_Type
013c 7001       |p   |		Jump_Nonzero	0x13e
013d 0801       |    |		Execute_Immediate	Raise,0x1
013e 8005       |    |		Call	0x0,0x5
013f 4807       |H   |		Short_Literal	0x7
0140 00db       |    |		Load_Top	At_Offset_3
0141 01d6       |    |		Execute	Vector,Field_Write
0142 00d8       |    |		Load_Top	At_Offset_0
0143 4864       |Hd  |		Short_Literal	0x64
0144 0270       | p  |		Execute	Discrete,Divide
0145 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0146 00d8       |    |		Load_Top	At_Offset_0
0147 4864       |Hd  |		Short_Literal	0x64
0148 026e       | n  |		Execute	Discrete,Modulo
0149 00d8       |    |		Load_Top	At_Offset_0
014a 00e3       |    |		Load_Encached	Natural_Cache
014b 0260       | `  |		Execute	Discrete,In_Type
014c 7001       |p   |		Jump_Nonzero	0x14e
014d 0801       |    |		Execute_Immediate	Raise,0x1
014e 8005       |    |		Call	0x0,0x5
014f 4806       |H   |		Short_Literal	0x6
0150 00db       |    |		Load_Top	At_Offset_3
0151 01d6       |    |		Execute	Vector,Field_Write
0152 00d8       |    |		Load_Top	At_Offset_0
0153 4864       |Hd  |		Short_Literal	0x64
0154 0270       | p  |		Execute	Discrete,Divide
0155 00d8       |    |		Load_Top	At_Offset_0
0156 00e3       |    |		Load_Encached	Natural_Cache
0157 0260       | `  |		Execute	Discrete,In_Type
0158 7001       |p   |		Jump_Nonzero	0x15a
0159 0801       |    |		Execute_Immediate	Raise,0x1
015a 8005       |    |		Call	0x0,0x5
015b 4805       |H   |		Short_Literal	0x5
015c 00db       |    |		Load_Top	At_Offset_3
015d 01d6       |    |		Execute	Vector,Field_Write
015e 00d9       |    |		Load_Top	At_Offset_1
015f e002       |    |		Load	0x0,0x2
0160 01c6       |    |		Execute	Vector,Convert_To_Formal
0161 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0162 0000 0000  |    |		.BLANK	0000[0x6]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 0172       | r  |		.CONST	0x0172								; Address of begin
0169 0004       |    |		.CONST	0x0004								; Address of exception handler
016a 0003       |    |		.CONST	0x0003								; Number of locals
016b			INIT_0168:
016b 4801       |H   |		Short_Literal	0x1
016c 4807       |H   |		Short_Literal	0x7
016d e002       |    |		Load	0x0,0x2
016e 035b       | [  |		Declare_Type	Array,Constrained
016f 0337       | 7  |		Declare_Variable	Array
0170 e00f       |    |		Load	0x0,0xf
0171 0322       | "  |		Declare_Variable	Record
0172			BODY_0168:
0172 e5ff       |    |		Load	0x2,-0x1
0173 8004       |    |		Call	0x0,0x4
0174 8005       |    |		Call	0x0,0x5
0175 4801       |H   |		Short_Literal	0x1
0176 00db       |    |		Load_Top	At_Offset_3
0177 01d6       |    |		Execute	Vector,Field_Write
0178 4800       |H   |		Short_Literal	0x0
0179 8005       |    |		Call	0x0,0x5
017a 4802       |H   |		Short_Literal	0x2
017b 00db       |    |		Load_Top	At_Offset_3
017c 01d6       |    |		Execute	Vector,Field_Write
017d 4804       |H   |		Short_Literal	0x4
017e 8005       |    |		Call	0x0,0x5
017f 4803       |H   |		Short_Literal	0x3
0180 00db       |    |		Load_Top	At_Offset_3
0181 01d6       |    |		Execute	Vector,Field_Write
0182 4823       |H#  |		Short_Literal	0x23
0183 4804       |H   |		Short_Literal	0x4
0184 00db       |    |		Load_Top	At_Offset_3
0185 01d6       |    |		Execute	Vector,Field_Write
0186 e5fe       |    |		Load	0x2,-0x2
0187 8010       |    |		Call	0x0,0x10
0188 00d9       |    |		Load_Top	At_Offset_1
0189 017d       | }  |		Execute	Record,Structure_Write
018a 00d8       |    |		Load_Top	At_Offset_0
018b 8011       |    |		Call	0x0,0x11
018c 8005       |    |		Call	0x0,0x5
018d 4805       |H   |		Short_Literal	0x5
018e 00db       |    |		Load_Top	At_Offset_3
018f 01d6       |    |		Execute	Vector,Field_Write
0190 00d8       |    |		Load_Top	At_Offset_0
0191 8012       |    |		Call	0x0,0x12
0192 8005       |    |		Call	0x0,0x5
0193 4806       |H   |		Short_Literal	0x6
0194 00db       |    |		Load_Top	At_Offset_3
0195 01d6       |    |		Execute	Vector,Field_Write
0196 e5fe       |    |		Load	0x2,-0x2
0197 8013       |    |		Call	0x0,0x13
0198 0a01       |    |		Execute_Immediate	Plus,0x1
0199 00d8       |    |		Load_Top	At_Offset_0
019a 00e3       |    |		Load_Encached	Natural_Cache
019b 0260       | `  |		Execute	Discrete,In_Type
019c 7001       |p   |		Jump_Nonzero	0x19e
019d 0801       |    |		Execute_Immediate	Raise,0x1
019e 8005       |    |		Call	0x0,0x5
019f 4807       |H   |		Short_Literal	0x7
01a0 00db       |    |		Load_Top	At_Offset_3
01a1 01d6       |    |		Execute	Vector,Field_Write
01a2 00d9       |    |		Load_Top	At_Offset_1
01a3 e002       |    |		Load	0x0,0x2
01a4 01c6       |    |		Execute	Vector,Convert_To_Formal
01a5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01a6 0000 0000  |    |		.XXX[0x2]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01b0       |    |		.CONST	0x01b0								; Address of begin
01a9 0004       |    |		.CONST	0x0004								; Address of exception handler
01aa 0002       |    |		.CONST	0x0002								; Number of locals
01ab			INIT_01a8:
01ab 4801       |H   |		Short_Literal	0x1
01ac 4820       |H   |		Short_Literal	0x20
01ad e002       |    |		Load	0x0,0x2
01ae 035b       | [  |		Declare_Type	Array,Constrained
01af 0337       | 7  |		Declare_Variable	Array
01b0			BODY_01a8:
01b0 00db       |    |		Load_Top	At_Offset_3
01b1 8004       |    |		Call	0x0,0x4
01b2 8005       |    |		Call	0x0,0x5
01b3 4801       |H   |		Short_Literal	0x1
01b4 00da       |    |		Load_Top	At_Offset_2
01b5 01d6       |    |		Execute	Vector,Field_Write
01b6 4800       |H   |		Short_Literal	0x0
01b7 8005       |    |		Call	0x0,0x5
01b8 4802       |H   |		Short_Literal	0x2
01b9 00da       |    |		Load_Top	At_Offset_2
01ba 01d6       |    |		Execute	Vector,Field_Write
01bb 4811       |H   |		Short_Literal	0x11
01bc 8005       |    |		Call	0x0,0x5
01bd 4803       |H   |		Short_Literal	0x3
01be 00da       |    |		Load_Top	At_Offset_2
01bf 01d6       |    |		Execute	Vector,Field_Write
01c0 4825       |H%  |		Short_Literal	0x25
01c1 4804       |H   |		Short_Literal	0x4
01c2 00da       |    |		Load_Top	At_Offset_2
01c3 01d6       |    |		Execute	Vector,Field_Write
01c4 e5fe       |    |		Load	0x2,-0x2
01c5 8014       |    |		Call	0x0,0x14
01c6 8005       |    |		Call	0x0,0x5
01c7 4805       |H   |		Short_Literal	0x5
01c8 00da       |    |		Load_Top	At_Offset_2
01c9 01d6       |    |		Execute	Vector,Field_Write
01ca e5fe       |    |		Load	0x2,-0x2
01cb 8015       |    |		Call	0x0,0x15
01cc 822f       | /  |		Call	0x1,0x2f
01cd 4806       |H   |		Short_Literal	0x6
01ce 480e       |H   |		Short_Literal	0xe
01cf 00db       |    |		Load_Top	At_Offset_3
01d0 01ce       |    |		Execute	Vector,Slice_Write
01d1 e5fe       |    |		Load	0x2,-0x2
01d2 8016       |    |		Call	0x0,0x16
01d3 822f       | /  |		Call	0x1,0x2f
01d4 480f       |H   |		Short_Literal	0xf
01d5 4817       |H   |		Short_Literal	0x17
01d6 00db       |    |		Load_Top	At_Offset_3
01d7 01ce       |    |		Execute	Vector,Slice_Write
01d8 e5fe       |    |		Load	0x2,-0x2
01d9 8017       |    |		Call	0x0,0x17
01da 822f       | /  |		Call	0x1,0x2f
01db 4818       |H   |		Short_Literal	0x18
01dc 4820       |H   |		Short_Literal	0x20
01dd 00db       |    |		Load_Top	At_Offset_3
01de 01ce       |    |		Execute	Vector,Slice_Write
01df 00d8       |    |		Load_Top	At_Offset_0
01e0 e002       |    |		Load	0x0,0x2
01e1 01c6       |    |		Execute	Vector,Convert_To_Formal
01e2 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01e3 0000 0000  |    |		.BLANK	0000[0x5]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01f2       |    |		.CONST	0x01f2								; Address of begin
01e9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ea 0003       |    |		.CONST	0x0003								; Number of locals
01eb			INIT_01e8:
01eb 4801       |H   |		Short_Literal	0x1
01ec 4804       |H   |		Short_Literal	0x4
01ed e002       |    |		Load	0x0,0x2
01ee 035b       | [  |		Declare_Type	Array,Constrained
01ef 0337       | 7  |		Declare_Variable	Array
01f0 029f 069b  |    |		Declare_Subprogram	INIT_0698,For_Call
01f2			BODY_01e8:
01f2 e5fd       |    |		Load	0x2,-0x3
01f3 8004       |    |		Call	0x0,0x4
01f4 8005       |    |		Call	0x0,0x5
01f5 4801       |H   |		Short_Literal	0x1
01f6 00db       |    |		Load_Top	At_Offset_3
01f7 01d6       |    |		Execute	Vector,Field_Write
01f8 4800       |H   |		Short_Literal	0x0
01f9 8005       |    |		Call	0x0,0x5
01fa 4802       |H   |		Short_Literal	0x2
01fb 00db       |    |		Load_Top	At_Offset_3
01fc 01d6       |    |		Execute	Vector,Field_Write
01fd 4804       |H   |		Short_Literal	0x4
01fe 8005       |    |		Call	0x0,0x5
01ff 4803       |H   |		Short_Literal	0x3
0200 00db       |    |		Load_Top	At_Offset_3
0201 01d6       |    |		Execute	Vector,Field_Write
0202 4810       |H   |		Short_Literal	0x10
0203 4804       |H   |		Short_Literal	0x4
0204 00db       |    |		Load_Top	At_Offset_3
0205 01d6       |    |		Execute	Vector,Field_Write
0206 8403       |    |		Call	0x2,0x3
0207 0831       | 1  |		Execute_Immediate	Raise,0x31
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 0210       |    |		.CONST	0x0210								; Address of begin
0209 0004       |    |		.CONST	0x0004								; Address of exception handler
020a 0002       |    |		.CONST	0x0002								; Number of locals
020b			INIT_0208:
020b 4801       |H   |		Short_Literal	0x1
020c 4804       |H   |		Short_Literal	0x4
020d e002       |    |		Load	0x0,0x2
020e 035b       | [  |		Declare_Type	Array,Constrained
020f 0337       | 7  |		Declare_Variable	Array
0210			BODY_0208:
0210 e5fd       |    |		Load	0x2,-0x3
0211 8004       |    |		Call	0x0,0x4
0212 8005       |    |		Call	0x0,0x5
0213 4801       |H   |		Short_Literal	0x1
0214 00da       |    |		Load_Top	At_Offset_2
0215 01d6       |    |		Execute	Vector,Field_Write
0216 4800       |H   |		Short_Literal	0x0
0217 8005       |    |		Call	0x0,0x5
0218 4802       |H   |		Short_Literal	0x2
0219 00da       |    |		Load_Top	At_Offset_2
021a 01d6       |    |		Execute	Vector,Field_Write
021b 4803       |H   |		Short_Literal	0x3
021c 8005       |    |		Call	0x0,0x5
021d 4803       |H   |		Short_Literal	0x3
021e 00da       |    |		Load_Top	At_Offset_2
021f 01d6       |    |		Execute	Vector,Field_Write
0220 4812       |H   |		Short_Literal	0x12
0221 4804       |H   |		Short_Literal	0x4
0222 00da       |    |		Load_Top	At_Offset_2
0223 01d6       |    |		Execute	Vector,Field_Write
0224 00db       |    |		Load_Top	At_Offset_3
0225 822c       | ,  |		Call	0x1,0x2c
0226 00d9       |    |		Load_Top	At_Offset_1
0227 8018       |    |		Call	0x0,0x18
0228 e002       |    |		Load	0x0,0x2
0229 01c6       |    |		Execute	Vector,Convert_To_Formal
022a 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
022b 0000 0000  |    |		.BLANK	0000[0x5]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0238       | 8  |		.CONST	0x0238								; Address of begin
0231 0004       |    |		.CONST	0x0004								; Address of exception handler
0232 0002       |    |		.CONST	0x0002								; Number of locals
0233			INIT_0230:
0233 4801       |H   |		Short_Literal	0x1
0234 4804       |H   |		Short_Literal	0x4
0235 e002       |    |		Load	0x0,0x2
0236 035b       | [  |		Declare_Type	Array,Constrained
0237 0337       | 7  |		Declare_Variable	Array
0238			BODY_0230:
0238 e5fc       |    |		Load	0x2,-0x4
0239 8004       |    |		Call	0x0,0x4
023a 8005       |    |		Call	0x0,0x5
023b 4801       |H   |		Short_Literal	0x1
023c 00da       |    |		Load_Top	At_Offset_2
023d 01d6       |    |		Execute	Vector,Field_Write
023e 4800       |H   |		Short_Literal	0x0
023f 8005       |    |		Call	0x0,0x5
0240 4802       |H   |		Short_Literal	0x2
0241 00da       |    |		Load_Top	At_Offset_2
0242 01d6       |    |		Execute	Vector,Field_Write
0243 4806       |H   |		Short_Literal	0x6
0244 8005       |    |		Call	0x0,0x5
0245 4803       |H   |		Short_Literal	0x3
0246 00da       |    |		Load_Top	At_Offset_2
0247 01d6       |    |		Execute	Vector,Field_Write
0248 4811       |H   |		Short_Literal	0x11
0249 4804       |H   |		Short_Literal	0x4
024a 00da       |    |		Load_Top	At_Offset_2
024b 01d6       |    |		Execute	Vector,Field_Write
024c e5fd       |    |		Load	0x2,-0x3
024d 822d       | -  |		Call	0x1,0x2d
024e e5fe       |    |		Load	0x2,-0x2
024f 822c       | ,  |		Call	0x1,0x2c
0250 8018       |    |		Call	0x0,0x18
0251 e5ff       |    |		Load	0x2,-0x1
0252 822c       | ,  |		Call	0x1,0x2c
0253 8018       |    |		Call	0x0,0x18
0254 00d9       |    |		Load_Top	At_Offset_1
0255 8018       |    |		Call	0x0,0x18
0256 e002       |    |		Load	0x0,0x2
0257 01c6       |    |		Execute	Vector,Convert_To_Formal
0258 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0259 0000 0000  |    |		.BLANK	0000[0x7]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0268       | h  |		.CONST	0x0268								; Address of begin
0261 0004       |    |		.CONST	0x0004								; Address of exception handler
0262 0002       |    |		.CONST	0x0002								; Number of locals
0263			INIT_0260:
0263 4801       |H   |		Short_Literal	0x1
0264 4804       |H   |		Short_Literal	0x4
0265 e002       |    |		Load	0x0,0x2
0266 035b       | [  |		Declare_Type	Array,Constrained
0267 0337       | 7  |		Declare_Variable	Array
0268			BODY_0260:
0268 e5fc       |    |		Load	0x2,-0x4
0269 8004       |    |		Call	0x0,0x4
026a 8005       |    |		Call	0x0,0x5
026b 4801       |H   |		Short_Literal	0x1
026c 00da       |    |		Load_Top	At_Offset_2
026d 01d6       |    |		Execute	Vector,Field_Write
026e 4800       |H   |		Short_Literal	0x0
026f 8005       |    |		Call	0x0,0x5
0270 4802       |H   |		Short_Literal	0x2
0271 00da       |    |		Load_Top	At_Offset_2
0272 01d6       |    |		Execute	Vector,Field_Write
0273 4805       |H   |		Short_Literal	0x5
0274 8005       |    |		Call	0x0,0x5
0275 4803       |H   |		Short_Literal	0x3
0276 00da       |    |		Load_Top	At_Offset_2
0277 01d6       |    |		Execute	Vector,Field_Write
0278 4813       |H   |		Short_Literal	0x13
0279 4804       |H   |		Short_Literal	0x4
027a 00da       |    |		Load_Top	At_Offset_2
027b 01d6       |    |		Execute	Vector,Field_Write
027c e5fe       |    |		Load	0x2,-0x2
027d 822c       | ,  |		Call	0x1,0x2c
027e e5ff       |    |		Load	0x2,-0x1
027f 822c       | ,  |		Call	0x1,0x2c
0280 8018       |    |		Call	0x0,0x18
0281 00d9       |    |		Load_Top	At_Offset_1
0282 8018       |    |		Call	0x0,0x18
0283 e002       |    |		Load	0x0,0x2
0284 01c6       |    |		Execute	Vector,Convert_To_Formal
0285 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0286 0000 0000  |    |		.XXX[0x2]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028b       |    |		.CONST	0x028b								; Address of begin
0289 0004       |    |		.CONST	0x0004								; Address of exception handler
028a 0001       |    |		.CONST	0x0001								; Number of locals
028b			BODY_0288:
028b			INIT_0288:
028b 481d       |H   |		Short_Literal	0x1d
028c 00db       |    |		Load_Top	At_Offset_3
028d 8230       | 0  |		Call	0x1,0x30
028e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
028f 0000       |    |		.XXX[0x1]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0293       |    |		.CONST	0x0293								; Address of begin
0291 0004       |    |		.CONST	0x0004								; Address of exception handler
0292 0001       |    |		.CONST	0x0001								; Number of locals
0293			BODY_0290:
0293			INIT_0290:
0293 482c       |H,  |		Short_Literal	0x2c
0294 00db       |    |		Load_Top	At_Offset_3
0295 8230       | 0  |		Call	0x1,0x30
0296 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
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 481e       |H   |		Short_Literal	0x1e
029c 00db       |    |		Load_Top	At_Offset_3
029d 8230       | 0  |		Call	0x1,0x30
029e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
029f 0000       |    |		.XXX[0x1]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a3       |    |		.CONST	0x02a3								; Address of begin
02a1 0004       |    |		.CONST	0x0004								; Address of exception handler
02a2 0001       |    |		.CONST	0x0001								; Number of locals
02a3			BODY_02a0:
02a3			INIT_02a0:
02a3 481f       |H   |		Short_Literal	0x1f
02a4 00db       |    |		Load_Top	At_Offset_3
02a5 8230       | 0  |		Call	0x1,0x30
02a6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02a7 0000       |    |		.XXX[0x1]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ab       |    |		.CONST	0x02ab								; Address of begin
02a9 0004       |    |		.CONST	0x0004								; Address of exception handler
02aa 0001       |    |		.CONST	0x0001								; Number of locals
02ab			BODY_02a8:
02ab			INIT_02a8:
02ab 4829       |H)  |		Short_Literal	0x29
02ac 00db       |    |		Load_Top	At_Offset_3
02ad 8230       | 0  |		Call	0x1,0x30
02ae 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02af 0000       |    |		.XXX[0x1]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b3       |    |		.CONST	0x02b3								; Address of begin
02b1 0004       |    |		.CONST	0x0004								; Address of exception handler
02b2 0001       |    |		.CONST	0x0001								; Number of locals
02b3			BODY_02b0:
02b3			INIT_02b0:
02b3 4824       |H$  |		Short_Literal	0x24
02b4 00db       |    |		Load_Top	At_Offset_3
02b5 8230       | 0  |		Call	0x1,0x30
02b6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02b7 0000       |    |		.XXX[0x1]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bb       |    |		.CONST	0x02bb								; Address of begin
02b9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ba 0001       |    |		.CONST	0x0001								; Number of locals
02bb			BODY_02b8:
02bb			INIT_02b8:
02bb 4828       |H(  |		Short_Literal	0x28
02bc 00db       |    |		Load_Top	At_Offset_3
02bd 8230       | 0  |		Call	0x1,0x30
02be 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02bf 0000       |    |		.XXX[0x1]
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 482a       |H*  |		Short_Literal	0x2a
02c4 00db       |    |		Load_Top	At_Offset_3
02c5 8230       | 0  |		Call	0x1,0x30
02c6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02c7 0000       |    |		.XXX[0x1]
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02cb       |    |		.CONST	0x02cb								; Address of begin
02c9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ca 0001       |    |		.CONST	0x0001								; Number of locals
02cb			BODY_02c8:
02cb			INIT_02c8:
02cb 482b       |H+  |		Short_Literal	0x2b
02cc 00db       |    |		Load_Top	At_Offset_3
02cd 8230       | 0  |		Call	0x1,0x30
02ce 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02cf 0000       |    |		.XXX[0x1]
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 4806       |H   |		Short_Literal	0x6
02d4 00db       |    |		Load_Top	At_Offset_3
02d5 8230       | 0  |		Call	0x1,0x30
02d6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02d7 0000       |    |		.XXX[0x1]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02db       |    |		.CONST	0x02db								; Address of begin
02d9 0004       |    |		.CONST	0x0004								; Address of exception handler
02da 0001       |    |		.CONST	0x0001								; Number of locals
02db			BODY_02d8:
02db			INIT_02d8:
02db 4815       |H   |		Short_Literal	0x15
02dc 00db       |    |		Load_Top	At_Offset_3
02dd 8230       | 0  |		Call	0x1,0x30
02de 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02df 0000       |    |		.XXX[0x1]
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02e3       |    |		.CONST	0x02e3								; Address of begin
02e1 0004       |    |		.CONST	0x0004								; Address of exception handler
02e2 0001       |    |		.CONST	0x0001								; Number of locals
02e3			BODY_02e0:
02e3			INIT_02e0:
02e3 482c       |H,  |		Short_Literal	0x2c
02e4 00db       |    |		Load_Top	At_Offset_3
02e5 8230       | 0  |		Call	0x1,0x30
02e6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02e7 0000       |    |		.XXX[0x1]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02eb       |    |		.CONST	0x02eb								; Address of begin
02e9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ea 0001       |    |		.CONST	0x0001								; Number of locals
02eb			BODY_02e8:
02eb			INIT_02e8:
02eb 00da       |    |		Load_Top	At_Offset_2
02ec 01dd       |    |		Execute	Vector,First
02ed 0a03       |    |		Execute_Immediate	Plus,0x3
02ee 00db       |    |		Load_Top	At_Offset_3
02ef 01d7       |    |		Execute	Vector,Field_Read
02f0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02f1 0000 0000  |    |		.BLANK	0000[0x7]
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 02fb       |    |		.CONST	0x02fb								; Address of begin
02f9 0004       |    |		.CONST	0x0004								; Address of exception handler
02fa 0001       |    |		.CONST	0x0001								; Number of locals
02fb			BODY_02f8:
02fb			INIT_02f8:
02fb 00da       |    |		Load_Top	At_Offset_2
02fc 01dd       |    |		Execute	Vector,First
02fd 00db       |    |		Load_Top	At_Offset_3
02fe 01d7       |    |		Execute	Vector,Field_Read
02ff 8019       |    |		Call	0x0,0x19
0300 00d8       |    |		Load_Top	At_Offset_0
0301 e01a       |    |		Load	0x0,0x1a
0302 0260       | `  |		Execute	Discrete,In_Type
0303 7001       |p   |		Jump_Nonzero	0x305
0304 0801       |    |		Execute_Immediate	Raise,0x1
0305 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0306 0000 0000  |    |		.XXX[0x2]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 030b       |    |		.CONST	0x030b								; Address of begin
0309 0004       |    |		.CONST	0x0004								; Address of exception handler
030a 0001       |    |		.CONST	0x0001								; Number of locals
030b			BODY_0308:
030b			INIT_0308:
030b 00da       |    |		Load_Top	At_Offset_2
030c 01dd       |    |		Execute	Vector,First
030d 0a01       |    |		Execute_Immediate	Plus,0x1
030e 00db       |    |		Load_Top	At_Offset_3
030f 01d7       |    |		Execute	Vector,Field_Read
0310 8019       |    |		Call	0x0,0x19
0311 4864       |Hd  |		Short_Literal	0x64
0312 0271       | q  |		Execute	Discrete,Times
0313 00db       |    |		Load_Top	At_Offset_3
0314 01dd       |    |		Execute	Vector,First
0315 0a02       |    |		Execute_Immediate	Plus,0x2
0316 e5ff       |    |		Load	0x2,-0x1
0317 01d7       |    |		Execute	Vector,Field_Read
0318 8019       |    |		Call	0x0,0x19
0319 0273       | s  |		Execute	Discrete,Plus
031a 00d8       |    |		Load_Top	At_Offset_0
031b 00e3       |    |		Load_Encached	Natural_Cache
031c 0260       | `  |		Execute	Discrete,In_Type
031d 7001       |p   |		Jump_Nonzero	0x31f
031e 0801       |    |		Execute_Immediate	Raise,0x1
031f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0323       | #  |		.CONST	0x0323								; Address of begin
0321 0004       |    |		.CONST	0x0004								; Address of exception handler
0322 0001       |    |		.CONST	0x0001								; Number of locals
0323			BODY_0320:
0323			INIT_0320:
0323 00da       |    |		Load_Top	At_Offset_2
0324 01dd       |    |		Execute	Vector,First
0325 0a04       |    |		Execute_Immediate	Plus,0x4
0326 00d8       |    |		Load_Top	At_Offset_0
0327 00e2       |    |		Load_Encached	Integer_Cache
0328 0260       | `  |		Execute	Discrete,In_Type
0329 7001       |p   |		Jump_Nonzero	0x32b
032a 0801       |    |		Execute_Immediate	Raise,0x1
032b 00db       |    |		Load_Top	At_Offset_3
032c 01dc       |    |		Execute	Vector,Last
032d e5ff       |    |		Load	0x2,-0x1
032e 01cf       |    |		Execute	Vector,Slice_Read
032f 0335       | 5  |		Declare_Variable	Array,Duplicate
0330 00cd       |    |		Action	Spare6_Action
0331 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0332 0000 0000  |    |		.BLANK	0000[0x6]
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 033d       | =  |		.CONST	0x033d								; Address of begin
0339 0004       |    |		.CONST	0x0004								; Address of exception handler
033a 0002       |    |		.CONST	0x0002								; Number of locals
033b			INIT_0338:
033b e003       |    |		Load	0x0,0x3
033c 0322       | "  |		Declare_Variable	Record
033d			BODY_0338:
033d 00d8       |    |		Load_Top	At_Offset_0
033e e5ff       |    |		Load	0x2,-0x1
033f 01dd       |    |		Execute	Vector,First
0340 e5ff       |    |		Load	0x2,-0x1
0341 01d7       |    |		Execute	Vector,Field_Read
0342 8019       |    |		Call	0x0,0x19
0343 00d8       |    |		Load_Top	At_Offset_0
0344 e01b       |    |		Load	0x0,0x1b
0345 0260       | `  |		Execute	Discrete,In_Type
0346 7001       |p   |		Jump_Nonzero	0x348
0347 0801       |    |		Execute_Immediate	Raise,0x1
0348 801c       |    |		Call	0x0,0x1c
0349 00d1       |    |		Pop_Control	Pop_Count_1
034a 00db       |    |		Load_Top	At_Offset_3
034b 01dd       |    |		Execute	Vector,First
034c 0a01       |    |		Execute_Immediate	Plus,0x1
034d e5ff       |    |		Load	0x2,-0x1
034e 01d7       |    |		Execute	Vector,Field_Read
034f 0b16       |    |		Execute_Immediate	Case_Compare,0x16
0350 7004       |p   |		Jump_Nonzero	0x355
0351 0f17       |    |		Execute_Immediate	Equal,0x17
0352 7008       |p   |		Jump_Nonzero	0x35b
0353 e22b       | +  |		Load	0x1,0x2b
0354 0257       | W  |		Execute	Discrete,Raise
0355 00d1       |    |		Pop_Control	Pop_Count_1
0356 00d8       |    |		Load_Top	At_Offset_0
0357 4801       |H   |		Short_Literal	0x1
0358 801d       |    |		Call	0x0,0x1d
0359 00d1       |    |		Pop_Control	Pop_Count_1
035a 7804       |x   |		Jump	0x35f
035b 00d8       |    |		Load_Top	At_Offset_0
035c 4800       |H   |		Short_Literal	0x0
035d 801d       |    |		Call	0x0,0x1d
035e 00d1       |    |		Pop_Control	Pop_Count_1
035f 00db       |    |		Load_Top	At_Offset_3
0360 01dd       |    |		Execute	Vector,First
0361 0a02       |    |		Execute_Immediate	Plus,0x2
0362 e5ff       |    |		Load	0x2,-0x1
0363 01d7       |    |		Execute	Vector,Field_Read
0364 0b18       |    |		Execute_Immediate	Case_Compare,0x18
0365 7004       |p   |		Jump_Nonzero	0x36a
0366 0f19       |    |		Execute_Immediate	Equal,0x19
0367 7008       |p   |		Jump_Nonzero	0x370
0368 e22b       | +  |		Load	0x1,0x2b
0369 0257       | W  |		Execute	Discrete,Raise
036a 00d1       |    |		Pop_Control	Pop_Count_1
036b 00d8       |    |		Load_Top	At_Offset_0
036c 4800       |H   |		Short_Literal	0x0
036d 801e       |    |		Call	0x0,0x1e
036e 00d1       |    |		Pop_Control	Pop_Count_1
036f 7804       |x   |		Jump	0x374
0370 00d8       |    |		Load_Top	At_Offset_0
0371 4801       |H   |		Short_Literal	0x1
0372 801e       |    |		Call	0x0,0x1e
0373 00d1       |    |		Pop_Control	Pop_Count_1
0374 00db       |    |		Load_Top	At_Offset_3
0375 01dd       |    |		Execute	Vector,First
0376 0a03       |    |		Execute_Immediate	Plus,0x3
0377 e5ff       |    |		Load	0x2,-0x1
0378 01d7       |    |		Execute	Vector,Field_Read
0379 0b1a       |    |		Execute_Immediate	Case_Compare,0x1a
037a 7006       |p   |		Jump_Nonzero	0x381
037b 0b1b       |    |		Execute_Immediate	Case_Compare,0x1b
037c 700a       |p   |		Jump_Nonzero	0x387
037d 0f1c       |    |		Execute_Immediate	Equal,0x1c
037e 700e       |p   |		Jump_Nonzero	0x38d
037f e22b       | +  |		Load	0x1,0x2b
0380 0257       | W  |		Execute	Discrete,Raise
0381 00d1       |    |		Pop_Control	Pop_Count_1
0382 00d8       |    |		Load_Top	At_Offset_0
0383 4802       |H   |		Short_Literal	0x2
0384 801f       |    |		Call	0x0,0x1f
0385 00d1       |    |		Pop_Control	Pop_Count_1
0386 780a       |x   |		Jump	0x391
0387 00d1       |    |		Pop_Control	Pop_Count_1
0388 00d8       |    |		Load_Top	At_Offset_0
0389 4801       |H   |		Short_Literal	0x1
038a 801f       |    |		Call	0x0,0x1f
038b 00d1       |    |		Pop_Control	Pop_Count_1
038c 7804       |x   |		Jump	0x391
038d 00d8       |    |		Load_Top	At_Offset_0
038e 4800       |H   |		Short_Literal	0x0
038f 801f       |    |		Call	0x0,0x1f
0390 00d1       |    |		Pop_Control	Pop_Count_1
0391 00db       |    |		Load_Top	At_Offset_3
0392 01dd       |    |		Execute	Vector,First
0393 0a04       |    |		Execute_Immediate	Plus,0x4
0394 e5ff       |    |		Load	0x2,-0x1
0395 01d7       |    |		Execute	Vector,Field_Read
0396 0b20       |    |		Execute_Immediate	Case_Compare,0x20
0397 7004       |p   |		Jump_Nonzero	0x39c
0398 0f21       | !  |		Execute_Immediate	Equal,0x21
0399 7008       |p   |		Jump_Nonzero	0x3a2
039a e22b       | +  |		Load	0x1,0x2b
039b 0257       | W  |		Execute	Discrete,Raise
039c 00d1       |    |		Pop_Control	Pop_Count_1
039d 00d8       |    |		Load_Top	At_Offset_0
039e 4801       |H   |		Short_Literal	0x1
039f 8020       |    |		Call	0x0,0x20
03a0 00d1       |    |		Pop_Control	Pop_Count_1
03a1 7804       |x   |		Jump	0x3a6
03a2 00d8       |    |		Load_Top	At_Offset_0
03a3 4800       |H   |		Short_Literal	0x0
03a4 8020       |    |		Call	0x0,0x20
03a5 00d1       |    |		Pop_Control	Pop_Count_1
03a6 00d8       |    |		Load_Top	At_Offset_0
03a7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03a8 ; --------------------------------------------------------------------------------------
03a8 ; SUBPROGRAM
03a8 ; --------------------------------------------------------------------------------------
03a8 03ad       |    |		.CONST	0x03ad								; Address of begin
03a9 0004       |    |		.CONST	0x0004								; Address of exception handler
03aa 0002       |    |		.CONST	0x0002								; Number of locals
03ab			INIT_03a8:
03ab e00c       |    |		Load	0x0,0xc
03ac 0322       | "  |		Declare_Variable	Record
03ad			BODY_03a8:
03ad 00d8       |    |		Load_Top	At_Offset_0
03ae e5ff       |    |		Load	0x2,-0x1
03af 01dd       |    |		Execute	Vector,First
03b0 e5ff       |    |		Load	0x2,-0x1
03b1 01d7       |    |		Execute	Vector,Field_Read
03b2 8019       |    |		Call	0x0,0x19
03b3 601c       |`   |		Indirect_Literal	Discrete,0x3d0,{0x00000000, 0x00002710}
03b4 0271       | q  |		Execute	Discrete,Times
03b5 e5ff       |    |		Load	0x2,-0x1
03b6 01dd       |    |		Execute	Vector,First
03b7 0a01       |    |		Execute_Immediate	Plus,0x1
03b8 e5ff       |    |		Load	0x2,-0x1
03b9 01d7       |    |		Execute	Vector,Field_Read
03ba 8019       |    |		Call	0x0,0x19
03bb 4864       |Hd  |		Short_Literal	0x64
03bc 0271       | q  |		Execute	Discrete,Times
03bd 0273       | s  |		Execute	Discrete,Plus
03be e5ff       |    |		Load	0x2,-0x1
03bf 01dd       |    |		Execute	Vector,First
03c0 0a02       |    |		Execute_Immediate	Plus,0x2
03c1 e5ff       |    |		Load	0x2,-0x1
03c2 01d7       |    |		Execute	Vector,Field_Read
03c3 8019       |    |		Call	0x0,0x19
03c4 0273       | s  |		Execute	Discrete,Plus
03c5 00d8       |    |		Load_Top	At_Offset_0
03c6 e021       | !  |		Load	0x0,0x21
03c7 0260       | `  |		Execute	Discrete,In_Type
03c8 7001       |p   |		Jump_Nonzero	0x3ca
03c9 0801       |    |		Execute_Immediate	Raise,0x1
03ca 8022       | "  |		Call	0x0,0x22
03cb 00d1       |    |		Pop_Control	Pop_Count_1
03cc 00d8       |    |		Load_Top	At_Offset_0
03cd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03ce 0000 0000  |    |		.XXX[0x2]
03d0 0000 0000  |    |		.LITERAL	{0x00000000, 0x00002710}
03d4 0000 0000  |    |		.BLANK	0000[0x4]
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03df       |    |		.CONST	0x03df								; Address of begin
03d9 0004       |    |		.CONST	0x0004								; Address of exception handler
03da 0003       |    |		.CONST	0x0003								; Number of locals
03db			INIT_03d8:
03db e023       | #  |		Load	0x0,0x23
03dc 0322       | "  |		Declare_Variable	Record
03dd e024       | $  |		Load	0x0,0x24
03de 0007       |    |		Action	Break_Optional
03df			BODY_03d8:
03df 4800       |H   |		Short_Literal	0x0
03e0 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
03e1 00cf       |    |		Action	Mark_Auxiliary
03e2 e5ff       |    |		Load	0x2,-0x1
03e3 01dd       |    |		Execute	Vector,First
03e4 0a02       |    |		Execute_Immediate	Plus,0x2
03e5 e5ff       |    |		Load	0x2,-0x1
03e6 01d7       |    |		Execute	Vector,Field_Read
03e7 8019       |    |		Call	0x0,0x19
03e8 4802       |H   |		Short_Literal	0x2
03e9 0263       | c  |		Execute	Discrete,Above_Bound
03ea 7006       |p   |		Jump_Nonzero	0x3f1
03eb e024       | $  |		Load	0x0,0x24
03ec e403       |    |		Load	0x2,0x3
03ed 0268       | h  |		Execute	Discrete,Successor
03ee a403       |    |		Store_Unchecked	0x2,0x3
03ef 00c8       |    |		Action	Pop_Auxiliary_Range
03f0 3ffa       |?   |		Loop_Increasing	0x3eb
03f1 00ce       |    |		Action	Pop_Auxiliary
03f2 00d9       |    |		Load_Top	At_Offset_1
03f3 e5ff       |    |		Load	0x2,-0x1
03f4 01dd       |    |		Execute	Vector,First
03f5 0a01       |    |		Execute_Immediate	Plus,0x1
03f6 e5ff       |    |		Load	0x2,-0x1
03f7 01d7       |    |		Execute	Vector,Field_Read
03f8 8019       |    |		Call	0x0,0x19
03f9 00d8       |    |		Load_Top	At_Offset_0
03fa e025       | %  |		Load	0x0,0x25
03fb 0260       | `  |		Execute	Discrete,In_Type
03fc 7001       |p   |		Jump_Nonzero	0x3fe
03fd 0801       |    |		Execute_Immediate	Raise,0x1
03fe e5ff       |    |		Load	0x2,-0x1
03ff 01dd       |    |		Execute	Vector,First
0400 e5ff       |    |		Load	0x2,-0x1
0401 01d7       |    |		Execute	Vector,Field_Read
0402 8019       |    |		Call	0x0,0x19
0403 00d8       |    |		Load_Top	At_Offset_0
0404 e026       | &  |		Load	0x0,0x26
0405 0260       | `  |		Execute	Discrete,In_Type
0406 7001       |p   |		Jump_Nonzero	0x408
0407 0801       |    |		Execute_Immediate	Raise,0x1
0408 00db       |    |		Load_Top	At_Offset_3
0409 8027       | '  |		Call	0x0,0x27
040a 00d1       |    |		Pop_Control	Pop_Count_1
040b 00d9       |    |		Load_Top	At_Offset_1
040c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
040d 0000 0000  |    |		.XXX[0x3]
040f 0000       |    |
0410 ; --------------------------------------------------------------------------------------
0410 ; SUBPROGRAM
0410 ; --------------------------------------------------------------------------------------
0410 0417       |    |		.CONST	0x0417								; Address of begin
0411 0004       |    |		.CONST	0x0004								; Address of exception handler
0412 0002       |    |		.CONST	0x0002								; Number of locals
0413			INIT_0410:
0413 e028       | (  |		Load	0x0,0x28
0414 0322       | "  |		Declare_Variable	Record
0415 00d8       |    |		Load_Top	At_Offset_0
0416 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0417			BODY_0410:
0417 00d8       |    |		Load_Top	At_Offset_0
0418 e5ff       |    |		Load	0x2,-0x1
0419 01dd       |    |		Execute	Vector,First
041a 0a13       |    |		Execute_Immediate	Plus,0x13
041b 00d8       |    |		Load_Top	At_Offset_0
041c 00e2       |    |		Load_Encached	Integer_Cache
041d 0260       | `  |		Execute	Discrete,In_Type
041e 7001       |p   |		Jump_Nonzero	0x420
041f 0801       |    |		Execute_Immediate	Raise,0x1
0420 e5ff       |    |		Load	0x2,-0x1
0421 01dd       |    |		Execute	Vector,First
0422 0a1b       |    |		Execute_Immediate	Plus,0x1b
0423 00d8       |    |		Load_Top	At_Offset_0
0424 00e2       |    |		Load_Encached	Integer_Cache
0425 0260       | `  |		Execute	Discrete,In_Type
0426 7001       |p   |		Jump_Nonzero	0x428
0427 0801       |    |		Execute_Immediate	Raise,0x1
0428 e5ff       |    |		Load	0x2,-0x1
0429 01cf       |    |		Execute	Vector,Slice_Read
042a 8233       | 3  |		Call	0x1,0x33
042b e5ff       |    |		Load	0x2,-0x1
042c 01dd       |    |		Execute	Vector,First
042d 0a0a       |    |		Execute_Immediate	Plus,0xa
042e 00d8       |    |		Load_Top	At_Offset_0
042f 00e2       |    |		Load_Encached	Integer_Cache
0430 0260       | `  |		Execute	Discrete,In_Type
0431 7001       |p   |		Jump_Nonzero	0x433
0432 0801       |    |		Execute_Immediate	Raise,0x1
0433 e5ff       |    |		Load	0x2,-0x1
0434 01dd       |    |		Execute	Vector,First
0435 0a12       |    |		Execute_Immediate	Plus,0x12
0436 00d8       |    |		Load_Top	At_Offset_0
0437 00e2       |    |		Load_Encached	Integer_Cache
0438 0260       | `  |		Execute	Discrete,In_Type
0439 7001       |p   |		Jump_Nonzero	0x43b
043a 0801       |    |		Execute_Immediate	Raise,0x1
043b e5ff       |    |		Load	0x2,-0x1
043c 01cf       |    |		Execute	Vector,Slice_Read
043d 8233       | 3  |		Call	0x1,0x33
043e e5ff       |    |		Load	0x2,-0x1
043f 01dd       |    |		Execute	Vector,First
0440 0a01       |    |		Execute_Immediate	Plus,0x1
0441 00d8       |    |		Load_Top	At_Offset_0
0442 00e2       |    |		Load_Encached	Integer_Cache
0443 0260       | `  |		Execute	Discrete,In_Type
0444 7001       |p   |		Jump_Nonzero	0x446
0445 0801       |    |		Execute_Immediate	Raise,0x1
0446 e5ff       |    |		Load	0x2,-0x1
0447 01dd       |    |		Execute	Vector,First
0448 0a09       |    |		Execute_Immediate	Plus,0x9
0449 00d8       |    |		Load_Top	At_Offset_0
044a 00e2       |    |		Load_Encached	Integer_Cache
044b 0260       | `  |		Execute	Discrete,In_Type
044c 7001       |p   |		Jump_Nonzero	0x44e
044d 0801       |    |		Execute_Immediate	Raise,0x1
044e e5ff       |    |		Load	0x2,-0x1
044f 01cf       |    |		Execute	Vector,Slice_Read
0450 8233       | 3  |		Call	0x1,0x33
0451 4801       |H   |		Short_Literal	0x1
0452 e5ff       |    |		Load	0x2,-0x1
0453 01dd       |    |		Execute	Vector,First
0454 e5ff       |    |		Load	0x2,-0x1
0455 01d7       |    |		Execute	Vector,Field_Read
0456 8019       |    |		Call	0x0,0x19
0457 00d8       |    |		Load_Top	At_Offset_0
0458 e029       | )  |		Load	0x0,0x29
0459 0260       | `  |		Execute	Discrete,In_Type
045a 7001       |p   |		Jump_Nonzero	0x45c
045b 0801       |    |		Execute_Immediate	Raise,0x1
045c 802a       | *  |		Call	0x0,0x2a
045d 00d1       |    |		Pop_Control	Pop_Count_1
045e 00d8       |    |		Load_Top	At_Offset_0
045f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0460 ; --------------------------------------------------------------------------------------
0460 ; SUBPROGRAM
0460 ; --------------------------------------------------------------------------------------
0460 0463       | c  |		.CONST	0x0463								; Address of begin
0461 0004       |    |		.CONST	0x0004								; Address of exception handler
0462 0001       |    |		.CONST	0x0001								; Number of locals
0463			BODY_0460:
0463			INIT_0460:
0463 00db       |    |		Load_Top	At_Offset_3
0464 00db       |    |		Load_Top	At_Offset_3
0465 01dd       |    |		Execute	Vector,First
0466 e5ff       |    |		Load	0x2,-0x1
0467 01d7       |    |		Execute	Vector,Field_Read
0468 8019       |    |		Call	0x0,0x19
0469 4864       |Hd  |		Short_Literal	0x64
046a 0271       | q  |		Execute	Discrete,Times
046b e5ff       |    |		Load	0x2,-0x1
046c 01dd       |    |		Execute	Vector,First
046d 0a01       |    |		Execute_Immediate	Plus,0x1
046e e5ff       |    |		Load	0x2,-0x1
046f 01d7       |    |		Execute	Vector,Field_Read
0470 8019       |    |		Call	0x0,0x19
0471 0273       | s  |		Execute	Discrete,Plus
0472 00d8       |    |		Load_Top	At_Offset_0
0473 e02b       | +  |		Load	0x0,0x2b
0474 0260       | `  |		Execute	Discrete,In_Type
0475 7001       |p   |		Jump_Nonzero	0x477
0476 0801       |    |		Execute_Immediate	Raise,0x1
0477 802c       | ,  |		Call	0x0,0x2c
0478 00d1       |    |		Pop_Control	Pop_Count_1
0479 e5fd       |    |		Load	0x2,-0x3
047a 00db       |    |		Load_Top	At_Offset_3
047b 01dd       |    |		Execute	Vector,First
047c 0a02       |    |		Execute_Immediate	Plus,0x2
047d e5ff       |    |		Load	0x2,-0x1
047e 01d7       |    |		Execute	Vector,Field_Read
047f 8019       |    |		Call	0x0,0x19
0480 4864       |Hd  |		Short_Literal	0x64
0481 0271       | q  |		Execute	Discrete,Times
0482 e5ff       |    |		Load	0x2,-0x1
0483 01dd       |    |		Execute	Vector,First
0484 0a03       |    |		Execute_Immediate	Plus,0x3
0485 e5ff       |    |		Load	0x2,-0x1
0486 01d7       |    |		Execute	Vector,Field_Read
0487 8019       |    |		Call	0x0,0x19
0488 0273       | s  |		Execute	Discrete,Plus
0489 00d8       |    |		Load_Top	At_Offset_0
048a e02b       | +  |		Load	0x0,0x2b
048b 0260       | `  |		Execute	Discrete,In_Type
048c 7001       |p   |		Jump_Nonzero	0x48e
048d 0801       |    |		Execute_Immediate	Raise,0x1
048e 802c       | ,  |		Call	0x0,0x2c
048f 00d1       |    |		Pop_Control	Pop_Count_1
0490 00da       |    |		Load_Top	At_Offset_2
0491 01dd       |    |		Execute	Vector,First
0492 0a03       |    |		Execute_Immediate	Plus,0x3
0493 c5fc       |    |		Store	0x2,-0x4
0494 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0495 0000 0000  |    |		.XXX[0x3]
0497 0000       |    |
0498 ; --------------------------------------------------------------------------------------
0498 ; SUBPROGRAM
0498 ; --------------------------------------------------------------------------------------
0498 04a3       |    |		.CONST	0x04a3								; Address of begin
0499 0004       |    |		.CONST	0x0004								; Address of exception handler
049a 0005       |    |		.CONST	0x0005								; Number of locals
049b			INIT_0498:
049b e023       | #  |		Load	0x0,0x23
049c 0322       | "  |		Declare_Variable	Record
049d e024       | $  |		Load	0x0,0x24
049e 0007       |    |		Action	Break_Optional
049f e02d       | -  |		Load	0x0,0x2d
04a0 0007       |    |		Action	Break_Optional
04a1 e02e       | .  |		Load	0x0,0x2e
04a2 0007       |    |		Action	Break_Optional
04a3			BODY_0498:
04a3 e5ff       |    |		Load	0x2,-0x1
04a4 01dd       |    |		Execute	Vector,First
04a5 0a02       |    |		Execute_Immediate	Plus,0x2
04a6 e5ff       |    |		Load	0x2,-0x1
04a7 01d7       |    |		Execute	Vector,Field_Read
04a8 8019       |    |		Call	0x0,0x19
04a9 0aff       |    |		Execute_Immediate	Plus,-0x1
04aa 00d8       |    |		Load_Top	At_Offset_0
04ab e024       | $  |		Load	0x0,0x24
04ac 0260       | `  |		Execute	Discrete,In_Type
04ad 7001       |p   |		Jump_Nonzero	0x4af
04ae 0801       |    |		Execute_Immediate	Raise,0x1
04af 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
04b0 00db       |    |		Load_Top	At_Offset_3
04b1 e5ff       |    |		Load	0x2,-0x1
04b2 01dd       |    |		Execute	Vector,First
04b3 0a01       |    |		Execute_Immediate	Plus,0x1
04b4 e5ff       |    |		Load	0x2,-0x1
04b5 01d7       |    |		Execute	Vector,Field_Read
04b6 8019       |    |		Call	0x0,0x19
04b7 00d8       |    |		Load_Top	At_Offset_0
04b8 e025       | %  |		Load	0x0,0x25
04b9 0260       | `  |		Execute	Discrete,In_Type
04ba 7001       |p   |		Jump_Nonzero	0x4bc
04bb 0801       |    |		Execute_Immediate	Raise,0x1
04bc e5ff       |    |		Load	0x2,-0x1
04bd 01dd       |    |		Execute	Vector,First
04be e5ff       |    |		Load	0x2,-0x1
04bf 01d7       |    |		Execute	Vector,Field_Read
04c0 8019       |    |		Call	0x0,0x19
04c1 00d8       |    |		Load_Top	At_Offset_0
04c2 e026       | &  |		Load	0x0,0x26
04c3 0260       | `  |		Execute	Discrete,In_Type
04c4 7001       |p   |		Jump_Nonzero	0x4c6
04c5 0801       |    |		Execute_Immediate	Raise,0x1
04c6 e403       |    |		Load	0x2,0x3
04c7 8027       | '  |		Call	0x0,0x27
04c8 00d1       |    |		Pop_Control	Pop_Count_1
04c9 e5ff       |    |		Load	0x2,-0x1
04ca 01dd       |    |		Execute	Vector,First
04cb 0a05       |    |		Execute_Immediate	Plus,0x5
04cc e5ff       |    |		Load	0x2,-0x1
04cd 01d7       |    |		Execute	Vector,Field_Read
04ce 8019       |    |		Call	0x0,0x19
04cf 0b00       |    |		Execute_Immediate	Case_Compare,0x0
04d0 7004       |p   |		Jump_Nonzero	0x4d5
04d1 0f01       |    |		Execute_Immediate	Equal,0x1
04d2 7006       |p   |		Jump_Nonzero	0x4d9
04d3 e22b       | +  |		Load	0x1,0x2b
04d4 0257       | W  |		Execute	Discrete,Raise
04d5 00d1       |    |		Pop_Control	Pop_Count_1
04d6 4800       |H   |		Short_Literal	0x0
04d7 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
04d8 7802       |x   |		Jump	0x4db
04d9 4801       |H   |		Short_Literal	0x1
04da 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
04db e5ff       |    |		Load	0x2,-0x1
04dc 01dd       |    |		Execute	Vector,First
04dd 0a06       |    |		Execute_Immediate	Plus,0x6
04de e5ff       |    |		Load	0x2,-0x1
04df 01d7       |    |		Execute	Vector,Field_Read
04e0 00d8       |    |		Load_Top	At_Offset_0
04e1 0d30       | 0  |		Execute_Immediate	Less,0x30
04e2 7012       |p   |		Jump_Nonzero	0x4f5
04e3 00d8       |    |		Load_Top	At_Offset_0
04e4 0c33       | 3  |		Execute_Immediate	Greater_Equal,0x33
04e5 7007       |p   |		Jump_Nonzero	0x4ed
04e6 0b30       | 0  |		Execute_Immediate	Case_Compare,0x30
04e7 7012       |p   |		Jump_Nonzero	0x4fa
04e8 0f31       | 1  |		Execute_Immediate	Equal,0x31
04e9 7014       |p   |		Jump_Nonzero	0x4fe
04ea 4803       |H   |		Short_Literal	0x3
04eb 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
04ec 781e       |x   |		Jump	0x50b
04ed 0b33       | 3  |		Execute_Immediate	Case_Compare,0x33
04ee 7012       |p   |		Jump_Nonzero	0x501
04ef 0b34       | 4  |		Execute_Immediate	Case_Compare,0x34
04f0 7014       |p   |		Jump_Nonzero	0x505
04f1 0f35       | 5  |		Execute_Immediate	Equal,0x35
04f2 7016       |p   |		Jump_Nonzero	0x509
04f3 e22b       | +  |		Load	0x1,0x2b
04f4 0257       | W  |		Execute	Discrete,Raise
04f5 6801       |h   |		Jump_Zero	0x4f7
04f6 7ffc       |    |		Jump	0x4f3
04f7 4800       |H   |		Short_Literal	0x0
04f8 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
04f9 7811       |x   |		Jump	0x50b
04fa 00d1       |    |		Pop_Control	Pop_Count_1
04fb 4801       |H   |		Short_Literal	0x1
04fc 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
04fd 780d       |x   |		Jump	0x50b
04fe 4802       |H   |		Short_Literal	0x2
04ff 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0500 780a       |x   |		Jump	0x50b
0501 00d1       |    |		Pop_Control	Pop_Count_1
0502 4804       |H   |		Short_Literal	0x4
0503 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0504 7806       |x   |		Jump	0x50b
0505 00d1       |    |		Pop_Control	Pop_Count_1
0506 4805       |H   |		Short_Literal	0x5
0507 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0508 7802       |x   |		Jump	0x50b
0509 4806       |H   |		Short_Literal	0x6
050a 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
050b e5fd       |    |		Load	0x2,-0x3
050c 00d9       |    |		Load_Top	At_Offset_1
050d e402       |    |		Load	0x2,0x2
050e e404       |    |		Load	0x2,0x4
050f e5ff       |    |		Load	0x2,-0x1
0510 01dd       |    |		Execute	Vector,First
0511 0a03       |    |		Execute_Immediate	Plus,0x3
0512 e5ff       |    |		Load	0x2,-0x1
0513 01d7       |    |		Execute	Vector,Field_Read
0514 8019       |    |		Call	0x0,0x19
0515 4864       |Hd  |		Short_Literal	0x64
0516 0271       | q  |		Execute	Discrete,Times
0517 e5ff       |    |		Load	0x2,-0x1
0518 01dd       |    |		Execute	Vector,First
0519 0a04       |    |		Execute_Immediate	Plus,0x4
051a e5ff       |    |		Load	0x2,-0x1
051b 01d7       |    |		Execute	Vector,Field_Read
051c 8019       |    |		Call	0x0,0x19
051d 0273       | s  |		Execute	Discrete,Plus
051e 00d8       |    |		Load_Top	At_Offset_0
051f e02b       | +  |		Load	0x0,0x2b
0520 0260       | `  |		Execute	Discrete,In_Type
0521 7001       |p   |		Jump_Nonzero	0x523
0522 0801       |    |		Execute_Immediate	Raise,0x1
0523 e5fe       |    |		Load	0x2,-0x2
0524 802f       | /  |		Call	0x0,0x2f
0525 00d1       |    |		Pop_Control	Pop_Count_1
0526 e5ff       |    |		Load	0x2,-0x1
0527 01dd       |    |		Execute	Vector,First
0528 0a06       |    |		Execute_Immediate	Plus,0x6
0529 c5fc       |    |		Store	0x2,-0x4
052a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
052b 0000 0000  |    |		.BLANK	0000[0x5]
0530 ; --------------------------------------------------------------------------------------
0530 ; SUBPROGRAM
0530 ; --------------------------------------------------------------------------------------
0530 0538       | 8  |		.CONST	0x0538								; Address of begin
0531 0004       |    |		.CONST	0x0004								; Address of exception handler
0532 0002       |    |		.CONST	0x0002								; Number of locals
0533			INIT_0530:
0533 4801       |H   |		Short_Literal	0x1
0534 4802       |H   |		Short_Literal	0x2
0535 e002       |    |		Load	0x0,0x2
0536 035b       | [  |		Declare_Type	Array,Constrained
0537 0337       | 7  |		Declare_Variable	Array
0538			BODY_0530:
0538 00db       |    |		Load_Top	At_Offset_3
0539 8030       | 0  |		Call	0x0,0x30
053a 4864       |Hd  |		Short_Literal	0x64
053b 0270       | p  |		Execute	Discrete,Divide
053c 00d8       |    |		Load_Top	At_Offset_0
053d 00e3       |    |		Load_Encached	Natural_Cache
053e 0260       | `  |		Execute	Discrete,In_Type
053f 7001       |p   |		Jump_Nonzero	0x541
0540 0801       |    |		Execute_Immediate	Raise,0x1
0541 8005       |    |		Call	0x0,0x5
0542 4801       |H   |		Short_Literal	0x1
0543 00da       |    |		Load_Top	At_Offset_2
0544 01d6       |    |		Execute	Vector,Field_Write
0545 00db       |    |		Load_Top	At_Offset_3
0546 8030       | 0  |		Call	0x0,0x30
0547 4864       |Hd  |		Short_Literal	0x64
0548 026e       | n  |		Execute	Discrete,Modulo
0549 00d8       |    |		Load_Top	At_Offset_0
054a 00e3       |    |		Load_Encached	Natural_Cache
054b 0260       | `  |		Execute	Discrete,In_Type
054c 7001       |p   |		Jump_Nonzero	0x54e
054d 0801       |    |		Execute_Immediate	Raise,0x1
054e 8005       |    |		Call	0x0,0x5
054f 4802       |H   |		Short_Literal	0x2
0550 00da       |    |		Load_Top	At_Offset_2
0551 01d6       |    |		Execute	Vector,Field_Write
0552 00d8       |    |		Load_Top	At_Offset_0
0553 e002       |    |		Load	0x0,0x2
0554 01c6       |    |		Execute	Vector,Convert_To_Formal
0555 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0556 0000 0000  |    |		.XXX[0x2]
0558 ; --------------------------------------------------------------------------------------
0558 ; SUBPROGRAM
0558 ; --------------------------------------------------------------------------------------
0558 0560       | `  |		.CONST	0x0560								; Address of begin
0559 0004       |    |		.CONST	0x0004								; Address of exception handler
055a 0002       |    |		.CONST	0x0002								; Number of locals
055b			INIT_0558:
055b 4801       |H   |		Short_Literal	0x1
055c 4801       |H   |		Short_Literal	0x1
055d e002       |    |		Load	0x0,0x2
055e 035b       | [  |		Declare_Type	Array,Constrained
055f 0337       | 7  |		Declare_Variable	Array
0560			BODY_0558:
0560 00db       |    |		Load_Top	At_Offset_3
0561 8014       |    |		Call	0x0,0x14
0562 8005       |    |		Call	0x0,0x5
0563 4801       |H   |		Short_Literal	0x1
0564 00da       |    |		Load_Top	At_Offset_2
0565 01d6       |    |		Execute	Vector,Field_Write
0566 00d8       |    |		Load_Top	At_Offset_0
0567 e002       |    |		Load	0x0,0x2
0568 01c6       |    |		Execute	Vector,Convert_To_Formal
0569 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
056a 0000 0000  |    |		.BLANK	0000[0x6]
0570 ; --------------------------------------------------------------------------------------
0570 ; SUBPROGRAM
0570 ; --------------------------------------------------------------------------------------
0570 0575       | u  |		.CONST	0x0575								; Address of begin
0571 0004       |    |		.CONST	0x0004								; Address of exception handler
0572 0002       |    |		.CONST	0x0002								; Number of locals
0573			INIT_0570:
0573 00e3       |    |		Load_Encached	Natural_Cache
0574 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0575			BODY_0570:
0575 00cf       |    |		Action	Mark_Auxiliary
0576 4806       |H   |		Short_Literal	0x6
0577 4800       |H   |		Short_Literal	0x0
0578 0007       |    |		Action	Break_Optional
0579 00db       |    |		Load_Top	At_Offset_3
057a 0901       |    |		Execute_Immediate	Binary_Scale,0x1
057b c402       |    |		Store	0x2,0x2
057c 00d8       |    |		Load_Top	At_Offset_0
057d e5ff       |    |		Load	0x2,-0x1
057e 8031       | 1  |		Call	0x0,0x31
057f 6803       |h   |		Jump_Zero	0x583
0580 00db       |    |		Load_Top	At_Offset_3
0581 0a01       |    |		Execute_Immediate	Plus,0x1
0582 c402       |    |		Store	0x2,0x2
0583 00c8       |    |		Action	Pop_Auxiliary_Range
0584 3ff4       |?   |		Loop_Increasing	0x579
0585 00ce       |    |		Action	Pop_Auxiliary
0586 00d8       |    |		Load_Top	At_Offset_0
0587 8005       |    |		Call	0x0,0x5
0588 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0589 0000 0000  |    |		.BLANK	0000[0x7]
0590 ; --------------------------------------------------------------------------------------
0590 ; SUBPROGRAM
0590 ; --------------------------------------------------------------------------------------
0590 0598       |    |		.CONST	0x0598								; Address of begin
0591 0004       |    |		.CONST	0x0004								; Address of exception handler
0592 0002       |    |		.CONST	0x0002								; Number of locals
0593			INIT_0590:
0593 4801       |H   |		Short_Literal	0x1
0594 4809       |H   |		Short_Literal	0x9
0595 e002       |    |		Load	0x0,0x2
0596 035b       | [  |		Declare_Type	Array,Constrained
0597 0337       | 7  |		Declare_Variable	Array
0598			BODY_0590:
0598 00db       |    |		Load_Top	At_Offset_3
0599 8032       | 2  |		Call	0x0,0x32
059a 8011       |    |		Call	0x0,0x11
059b 8005       |    |		Call	0x0,0x5
059c 4801       |H   |		Short_Literal	0x1
059d 00da       |    |		Load_Top	At_Offset_2
059e 01d6       |    |		Execute	Vector,Field_Write
059f 00db       |    |		Load_Top	At_Offset_3
05a0 8032       | 2  |		Call	0x0,0x32
05a1 8012       |    |		Call	0x0,0x12
05a2 8005       |    |		Call	0x0,0x5
05a3 4802       |H   |		Short_Literal	0x2
05a4 00da       |    |		Load_Top	At_Offset_2
05a5 01d6       |    |		Execute	Vector,Field_Write
05a6 00db       |    |		Load_Top	At_Offset_3
05a7 8033       | 3  |		Call	0x0,0x33
05a8 8011       |    |		Call	0x0,0x11
05a9 8005       |    |		Call	0x0,0x5
05aa 4803       |H   |		Short_Literal	0x3
05ab 00da       |    |		Load_Top	At_Offset_2
05ac 01d6       |    |		Execute	Vector,Field_Write
05ad 00db       |    |		Load_Top	At_Offset_3
05ae 8033       | 3  |		Call	0x0,0x33
05af 8012       |    |		Call	0x0,0x12
05b0 8005       |    |		Call	0x0,0x5
05b1 4804       |H   |		Short_Literal	0x4
05b2 00da       |    |		Load_Top	At_Offset_2
05b3 01d6       |    |		Execute	Vector,Field_Write
05b4 00db       |    |		Load_Top	At_Offset_3
05b5 8034       | 4  |		Call	0x0,0x34
05b6 8011       |    |		Call	0x0,0x11
05b7 8005       |    |		Call	0x0,0x5
05b8 4805       |H   |		Short_Literal	0x5
05b9 00da       |    |		Load_Top	At_Offset_2
05ba 01d6       |    |		Execute	Vector,Field_Write
05bb 00db       |    |		Load_Top	At_Offset_3
05bc 8034       | 4  |		Call	0x0,0x34
05bd 8012       |    |		Call	0x0,0x12
05be 8005       |    |		Call	0x0,0x5
05bf 4806       |H   |		Short_Literal	0x6
05c0 00da       |    |		Load_Top	At_Offset_2
05c1 01d6       |    |		Execute	Vector,Field_Write
05c2 00db       |    |		Load_Top	At_Offset_3
05c3 8035       | 5  |		Call	0x0,0x35
05c4 8011       |    |		Call	0x0,0x11
05c5 8005       |    |		Call	0x0,0x5
05c6 4807       |H   |		Short_Literal	0x7
05c7 00da       |    |		Load_Top	At_Offset_2
05c8 01d6       |    |		Execute	Vector,Field_Write
05c9 00db       |    |		Load_Top	At_Offset_3
05ca 8035       | 5  |		Call	0x0,0x35
05cb 8012       |    |		Call	0x0,0x12
05cc 8005       |    |		Call	0x0,0x5
05cd 4808       |H   |		Short_Literal	0x8
05ce 00da       |    |		Load_Top	At_Offset_2
05cf 01d6       |    |		Execute	Vector,Field_Write
05d0 00db       |    |		Load_Top	At_Offset_3
05d1 8036       | 6  |		Call	0x0,0x36
05d2 822e       | .  |		Call	0x1,0x2e
05d3 4809       |H   |		Short_Literal	0x9
05d4 00da       |    |		Load_Top	At_Offset_2
05d5 01d6       |    |		Execute	Vector,Field_Write
05d6 00d8       |    |		Load_Top	At_Offset_0
05d7 e002       |    |		Load	0x0,0x2
05d8 01c6       |    |		Execute	Vector,Convert_To_Formal
05d9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05da 0000 0000  |    |		.BLANK	0000[0x6]
05e0 ; --------------------------------------------------------------------------------------
05e0 ; SUBPROGRAM
05e0 ; --------------------------------------------------------------------------------------
05e0 05e8       |    |		.CONST	0x05e8								; Address of begin
05e1 0004       |    |		.CONST	0x0004								; Address of exception handler
05e2 0002       |    |		.CONST	0x0002								; Number of locals
05e3			INIT_05e0:
05e3 4801       |H   |		Short_Literal	0x1
05e4 4804       |H   |		Short_Literal	0x4
05e5 e002       |    |		Load	0x0,0x2
05e6 035b       | [  |		Declare_Type	Array,Constrained
05e7 0337       | 7  |		Declare_Variable	Array
05e8			BODY_05e0:
05e8 00db       |    |		Load_Top	At_Offset_3
05e9 8004       |    |		Call	0x0,0x4
05ea 8005       |    |		Call	0x0,0x5
05eb 4801       |H   |		Short_Literal	0x1
05ec 00da       |    |		Load_Top	At_Offset_2
05ed 01d6       |    |		Execute	Vector,Field_Write
05ee 4800       |H   |		Short_Literal	0x0
05ef 8005       |    |		Call	0x0,0x5
05f0 4802       |H   |		Short_Literal	0x2
05f1 00da       |    |		Load_Top	At_Offset_2
05f2 01d6       |    |		Execute	Vector,Field_Write
05f3 4801       |H   |		Short_Literal	0x1
05f4 8005       |    |		Call	0x0,0x5
05f5 4803       |H   |		Short_Literal	0x3
05f6 00da       |    |		Load_Top	At_Offset_2
05f7 01d6       |    |		Execute	Vector,Field_Write
05f8 e5fe       |    |		Load	0x2,-0x2
05f9 4804       |H   |		Short_Literal	0x4
05fa 00da       |    |		Load_Top	At_Offset_2
05fb 01d6       |    |		Execute	Vector,Field_Write
05fc 00d8       |    |		Load_Top	At_Offset_0
05fd e002       |    |		Load	0x0,0x2
05fe 01c6       |    |		Execute	Vector,Convert_To_Formal
05ff 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0600 ; --------------------------------------------------------------------------------------
0600 ; SUBPROGRAM
0600 ; --------------------------------------------------------------------------------------
0600 0605       |    |		.CONST	0x0605								; Address of begin
0601 0004       |    |		.CONST	0x0004								; Address of exception handler
0602 0002       |    |		.CONST	0x0002								; Number of locals
0603			INIT_0600:
0603 e00f       |    |		Load	0x0,0xf
0604 0322       | "  |		Declare_Variable	Record
0605			BODY_0600:
0605 00d8       |    |		Load_Top	At_Offset_0
0606 e5ff       |    |		Load	0x2,-0x1
0607 01dd       |    |		Execute	Vector,First
0608 0a01       |    |		Execute_Immediate	Plus,0x1
0609 e5ff       |    |		Load	0x2,-0x1
060a 01d7       |    |		Execute	Vector,Field_Read
060b 8019       |    |		Call	0x0,0x19
060c e5ff       |    |		Load	0x2,-0x1
060d 01dd       |    |		Execute	Vector,First
060e e5ff       |    |		Load	0x2,-0x1
060f 01d7       |    |		Execute	Vector,Field_Read
0610 8019       |    |		Call	0x0,0x19
0611 8037       | 7  |		Call	0x0,0x37
0612 00d1       |    |		Pop_Control	Pop_Count_1
0613 00d8       |    |		Load_Top	At_Offset_0
0614 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0615 0000 0000  |    |		.XXX[0x3]
0617 0000       |    |
0618 ; --------------------------------------------------------------------------------------
0618 ; SUBPROGRAM
0618 ; --------------------------------------------------------------------------------------
0618 0620       |    |		.CONST	0x0620								; Address of begin
0619 0004       |    |		.CONST	0x0004								; Address of exception handler
061a 0003       |    |		.CONST	0x0003								; Number of locals
061b			INIT_0618:
061b e038       | 8  |		Load	0x0,0x38
061c 0322       | "  |		Declare_Variable	Record
061d 00d8       |    |		Load_Top	At_Offset_0
061e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
061f 00e3       |    |		Load_Encached	Natural_Cache
0620			BODY_0618:
0620 00d9       |    |		Load_Top	At_Offset_1
0621 8039       | 9  |		Call	0x0,0x39
0622 00d1       |    |		Pop_Control	Pop_Count_1
0623 e5ff       |    |		Load	0x2,-0x1
0624 8019       |    |		Call	0x0,0x19
0625 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0626 00cf       |    |		Action	Mark_Auxiliary
0627 4800       |H   |		Short_Literal	0x0
0628 4806       |H   |		Short_Literal	0x6
0629 0007       |    |		Action	Break_Optional
062a 00db       |    |		Load_Top	At_Offset_3
062b 4801       |H   |		Short_Literal	0x1
062c 0279       | y  |		Execute	Discrete,And
062d 0f01       |    |		Execute_Immediate	Equal,0x1
062e 6804       |h   |		Jump_Zero	0x633
062f e402       |    |		Load	0x2,0x2
0630 00d9       |    |		Load_Top	At_Offset_1
0631 803a       | :  |		Call	0x0,0x3a
0632 00d1       |    |		Pop_Control	Pop_Count_1
0633 00db       |    |		Load_Top	At_Offset_3
0634 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
0635 c403       |    |		Store	0x2,0x3
0636 00c8       |    |		Action	Pop_Auxiliary_Range
0637 37f2       |7   |		Loop_Decreasing	0x62a
0638 00ce       |    |		Action	Pop_Auxiliary
0639 00d9       |    |		Load_Top	At_Offset_1
063a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
063b 0000 0000  |    |		.BLANK	0000[0x5]
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 0647       | G  |		.CONST	0x0647								; Address of begin
0641 0004       |    |		.CONST	0x0004								; Address of exception handler
0642 0002       |    |		.CONST	0x0002								; Number of locals
0643			INIT_0640:
0643 e03b       | ;  |		Load	0x0,0x3b
0644 0322       | "  |		Declare_Variable	Record
0645 00d8       |    |		Load_Top	At_Offset_0
0646 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0647			BODY_0640:
0647 00d8       |    |		Load_Top	At_Offset_0
0648 e5ff       |    |		Load	0x2,-0x1
0649 01dd       |    |		Execute	Vector,First
064a 0a08       |    |		Execute_Immediate	Plus,0x8
064b e5ff       |    |		Load	0x2,-0x1
064c 01d7       |    |		Execute	Vector,Field_Read
064d 8232       | 2  |		Call	0x1,0x32
064e e5ff       |    |		Load	0x2,-0x1
064f 01dd       |    |		Execute	Vector,First
0650 0a06       |    |		Execute_Immediate	Plus,0x6
0651 00d8       |    |		Load_Top	At_Offset_0
0652 00e2       |    |		Load_Encached	Integer_Cache
0653 0260       | `  |		Execute	Discrete,In_Type
0654 7001       |p   |		Jump_Nonzero	0x656
0655 0801       |    |		Execute_Immediate	Raise,0x1
0656 e5ff       |    |		Load	0x2,-0x1
0657 01dd       |    |		Execute	Vector,First
0658 0a07       |    |		Execute_Immediate	Plus,0x7
0659 00d8       |    |		Load_Top	At_Offset_0
065a 00e2       |    |		Load_Encached	Integer_Cache
065b 0260       | `  |		Execute	Discrete,In_Type
065c 7001       |p   |		Jump_Nonzero	0x65e
065d 0801       |    |		Execute_Immediate	Raise,0x1
065e e5ff       |    |		Load	0x2,-0x1
065f 01cf       |    |		Execute	Vector,Slice_Read
0660 8231       | 1  |		Call	0x1,0x31
0661 e5ff       |    |		Load	0x2,-0x1
0662 01dd       |    |		Execute	Vector,First
0663 0a04       |    |		Execute_Immediate	Plus,0x4
0664 00d8       |    |		Load_Top	At_Offset_0
0665 00e2       |    |		Load_Encached	Integer_Cache
0666 0260       | `  |		Execute	Discrete,In_Type
0667 7001       |p   |		Jump_Nonzero	0x669
0668 0801       |    |		Execute_Immediate	Raise,0x1
0669 e5ff       |    |		Load	0x2,-0x1
066a 01dd       |    |		Execute	Vector,First
066b 0a05       |    |		Execute_Immediate	Plus,0x5
066c 00d8       |    |		Load_Top	At_Offset_0
066d 00e2       |    |		Load_Encached	Integer_Cache
066e 0260       | `  |		Execute	Discrete,In_Type
066f 7001       |p   |		Jump_Nonzero	0x671
0670 0801       |    |		Execute_Immediate	Raise,0x1
0671 e5ff       |    |		Load	0x2,-0x1
0672 01cf       |    |		Execute	Vector,Slice_Read
0673 8231       | 1  |		Call	0x1,0x31
0674 e5ff       |    |		Load	0x2,-0x1
0675 01dd       |    |		Execute	Vector,First
0676 0a02       |    |		Execute_Immediate	Plus,0x2
0677 00d8       |    |		Load_Top	At_Offset_0
0678 00e2       |    |		Load_Encached	Integer_Cache
0679 0260       | `  |		Execute	Discrete,In_Type
067a 7001       |p   |		Jump_Nonzero	0x67c
067b 0801       |    |		Execute_Immediate	Raise,0x1
067c e5ff       |    |		Load	0x2,-0x1
067d 01dd       |    |		Execute	Vector,First
067e 0a03       |    |		Execute_Immediate	Plus,0x3
067f 00d8       |    |		Load_Top	At_Offset_0
0680 00e2       |    |		Load_Encached	Integer_Cache
0681 0260       | `  |		Execute	Discrete,In_Type
0682 7001       |p   |		Jump_Nonzero	0x684
0683 0801       |    |		Execute_Immediate	Raise,0x1
0684 e5ff       |    |		Load	0x2,-0x1
0685 01cf       |    |		Execute	Vector,Slice_Read
0686 8231       | 1  |		Call	0x1,0x31
0687 e5ff       |    |		Load	0x2,-0x1
0688 01dd       |    |		Execute	Vector,First
0689 e5ff       |    |		Load	0x2,-0x1
068a 01dd       |    |		Execute	Vector,First
068b 0a01       |    |		Execute_Immediate	Plus,0x1
068c 00d8       |    |		Load_Top	At_Offset_0
068d 00e2       |    |		Load_Encached	Integer_Cache
068e 0260       | `  |		Execute	Discrete,In_Type
068f 7001       |p   |		Jump_Nonzero	0x691
0690 0801       |    |		Execute_Immediate	Raise,0x1
0691 e5ff       |    |		Load	0x2,-0x1
0692 01cf       |    |		Execute	Vector,Slice_Read
0693 8231       | 1  |		Call	0x1,0x31
0694 803c       | <  |		Call	0x0,0x3c
0695 00d1       |    |		Pop_Control	Pop_Count_1
0696 00d8       |    |		Load_Top	At_Offset_0
0697 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0698 ; --------------------------------------------------------------------------------------
0698 ; SUBPROGRAM
0698 ; --------------------------------------------------------------------------------------
0698 069f       |    |		.CONST	0x069f								; Address of begin
0699 0004       |    |		.CONST	0x0004								; Address of exception handler
069a 0002       |    |		.CONST	0x0002								; Number of locals
069b			INIT_0698:
069b e5ff       |    |		Load	0x2,-0x1
069c 822c       | ,  |		Call	0x1,0x2c
069d e402       |    |		Load	0x2,0x2
069e 8018       |    |		Call	0x0,0x18
069f			BODY_0698:
069f e5fe       |    |		Load	0x2,-0x2
06a0 822d       | -  |		Call	0x1,0x2d
06a1 00d9       |    |		Load_Top	At_Offset_1
06a2 8018       |    |		Call	0x0,0x18
06a3 e002       |    |		Load	0x0,0x2
06a4 01c6       |    |		Execute	Vector,Convert_To_Formal
06a5 00cb       |    |		Action	Pop_Block_With_Result
06a6 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
06a7 0000       |    |		.XXX[0x1]
06a8 ; --------------------------------------------------------------------------------------
06a8 ; Debug Table
06a8 ; --------------------------------------------------------------------------------------
06a8 0004 0009  |    |		.DEBUG4	0x0004,0x0009,0x796c,0x0000,0x0001,0x0029
06ae 000b 0752  |   R|		.DBG4T	0x000b,0x0752,0x8000,0x8000
06b2 004d 0792  | M  |		.DBG4T	0x004d,0x0792,0x8000,0x8000
06b6 00a3 07e0  |    |		.DBG4T	0x00a3,0x07e0,0x0002,0x4000
06ba 0113 080c  |    |		.DBG4T	0x0113,0x080c,0x0002,0x0000
06be 016b 081c  | k  |		.DBG4T	0x016b,0x081c,0x0002,0x0000
06c2 01ab 0829  |   )|		.DBG4T	0x01ab,0x0829,0x0002,0x0000
06c6 01eb 0835  |   5|		.DBG4T	0x01eb,0x0835,0x0002,0x0000
06ca 020b 083d  |   =|		.DBG4T	0x020b,0x083d,0x0002,0x0000
06ce 0233 0845  | 3 E|		.DBG4T	0x0233,0x0845,0x0002,0x0000
06d2 0263 084d  | c M|		.DBG4T	0x0263,0x084d,0x0002,0x0000
06d6 028b 0855  |   U|		.DBG4T	0x028b,0x0855,0x0002,0x0000
06da 0293 0858  |   X|		.DBG4T	0x0293,0x0858,0x0002,0x0000
06de 029b 085b  |   [|		.DBG4T	0x029b,0x085b,0x0002,0x0000
06e2 02a3 085e  |   ^|		.DBG4T	0x02a3,0x085e,0x0002,0x0000
06e6 02ab 0861  |   a|		.DBG4T	0x02ab,0x0861,0x0002,0x0000
06ea 02b3 0864  |   d|		.DBG4T	0x02b3,0x0864,0x0002,0x0000
06ee 02bb 0867  |   g|		.DBG4T	0x02bb,0x0867,0x0002,0x0000
06f2 02c3 086a  |   j|		.DBG4T	0x02c3,0x086a,0x0002,0x0000
06f6 02cb 086d  |   m|		.DBG4T	0x02cb,0x086d,0x0002,0x0000
06fa 02d3 0870  |   p|		.DBG4T	0x02d3,0x0870,0x0002,0x0000
06fe 02db 0873  |   s|		.DBG4T	0x02db,0x0873,0x0002,0x0000
0702 02e3 0876  |   v|		.DBG4T	0x02e3,0x0876,0x0002,0x0000
0706 02eb 0879  |   y|		.DBG4T	0x02eb,0x0879,0x0002,0x0000
070a 02fb 087c  |   ||		.DBG4T	0x02fb,0x087c,0x0002,0x0000
070e 030b 087f  |    |		.DBG4T	0x030b,0x087f,0x0002,0x0000
0712 0323 0882  | #  |		.DBG4T	0x0323,0x0882,0x0002,0x0000
0716 033b 0885  | ;  |		.DBG4T	0x033b,0x0885,0x0002,0x4000
071a 03ab 08ae  |    |		.DBG4T	0x03ab,0x08ae,0x0002,0x0000
071e 03db 08b3  |    |		.DBG4T	0x03db,0x08b3,0x0002,0x0000
0722 0413 08bc  |    |		.DBG4T	0x0413,0x08bc,0x0002,0x0000
0726 0463 08c1  | c  |		.DBG4T	0x0463,0x08c1,0x0001,0x0000
072a 049b 08c6  |    |		.DBG4T	0x049b,0x08c6,0x0001,0x4000
072e 0533 08ee  | 3  |		.DBG4T	0x0533,0x08ee,0x0002,0x0000
0732 055b 08f4  | [  |		.DBG4T	0x055b,0x08f4,0x0002,0x0000
0736 0573 08f9  | s  |		.DBG4T	0x0573,0x08f9,0x0002,0x0000
073a 0593 0901  |    |		.DBG4T	0x0593,0x0901,0x0002,0x0000
073e 05e3 090e  |    |		.DBG4T	0x05e3,0x090e,0x0002,0x0000
0742 0603 0916  |    |		.DBG4T	0x0603,0x0916,0x0002,0x0000
0746 061b 091b  |    |		.DBG4T	0x061b,0x091b,0x0002,0x0000
074a 0643 0926  | C &|		.DBG4T	0x0643,0x0926,0x0002,0x0000
074e 069b 092b  |   +|		.DBG4T	0x069b,0x092b,0x0004,0x0000
0752 ; --------------------------------------------------------------------------------------
0752 ; Debug chain
0752 ; --------------------------------------------------------------------------------------
0752 001f 0000  |    |		.DBGLEN	0x001f,0x0000
0754 000b 000d  |    |		.DBGLNO	0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d,0x001f,0x0021,0x0023,0x0025,0x0027,0x0029,0x002b,0x002d,0x002f,0x0031,0x0033,0x0035,0x0037,0x0039,0x003b,0x003d,0x003f,0x0041,0x0043,0x0045,0x0047
0773 000d 000e  |    |		.XXX[0x1f]
0775 000f 0010  |    |
0777 0011 0012  |    |
0779 0013 0014  |    |
077b 0015 0016  |    |
077d 0017 0018  |    |
077f 0019 001a  |    |
0781 001b 001c  |    |
0783 001d 001e  |    |
0785 001f 0020  |    |
0787 0021 0022  | ! "|
0789 0023 0024  | # $|
078b 0025 0026  | % &|
078d 0027 0028  | ' (|
078f 0029 002a  | ) *|
0791 002b       | +  |
0792 ; --------------------------------------------------------------------------------------
0792 ; Debug chain
0792 ; --------------------------------------------------------------------------------------
0792 0026 0000  | &  |		.DBGLEN	0x0026,0x0000
0794 004d 004f  | M O|		.DBGLNO	0x004d,0x004f,0x0051,0x0053,0x0055,0x0057,0x0059,0x005b,0x005d,0x005f,0x0061,0x0063,0x0065,0x0067,0x0069,0x006b,0x006d,0x006f,0x0071,0x0073,0x0075,0x0077,0x0079,0x007b,0x007d,0x007f,0x0081,0x0083,0x0085,0x0087,0x0089,0x008b,0x008d,0x008f,0x0091,0x0093,0x0095,0x0097
07ba 0027 0028  | ' (|		.XXX[0x26]
07bc 0029 002a  | ) *|
07be 002b 002c  | + ,|
07c0 002d 002e  | - .|
07c2 002f 0030  | / 0|
07c4 0031 0032  | 1 2|
07c6 0033 0034  | 3 4|
07c8 0035 0036  | 5 6|
07ca 0037 0038  | 7 8|
07cc 0039 003a  | 9 :|
07ce 003b 003c  | ; <|
07d0 003d 003e  | = >|
07d2 003f 0040  | ? @|
07d4 0041 0042  | A B|
07d6 0043 0044  | C D|
07d8 0045 0046  | E F|
07da 0047 0048  | G H|
07dc 0049 004a  | I J|
07de 004b 004c  | K L|
07e0 ; --------------------------------------------------------------------------------------
07e0 ; Debug chain
07e0 ; --------------------------------------------------------------------------------------
07e0 0002 0014  |    |		.DBGLEN	0x0002,0x0014
07e2 00a3 00a8  |    |		.DBGLNO	0x00a3,0x00a8,0x00aa,0x00b0,0x00b5,0x00ba,0x00be,0x00c2,0x00c7,0x00cb,0x00d0,0x00d4,0x00d8,0x00dd,0x00e1,0x00eb,0x00f0,0x00f6,0x00fa,0x00fe,0x0103,0x0107
07f8 0001 0002  |    |		.XXX[0x14]
07fa 0003 0004  |    |
07fc 0005 0006  |    |
07fe 0007 0008  |    |
0800 0009 000a  |    |
0802 000b 000c  |    |
0804 000d 000f  |    |
0806 0010 000e  |    |
0808 0012 0013  |    |
080a 0014 0015  |    |
080c ; --------------------------------------------------------------------------------------
080c ; Debug chain
080c ; --------------------------------------------------------------------------------------
080c 0003 000b  |    |		.DBGLEN	0x0003,0x000b
080e 0113 0115  |    |		.DBGLNO	0x0113,0x0115,0x011a,0x011b,0x011f,0x0125,0x012a,0x012f,0x0133,0x0136,0x0142,0x0146,0x0152,0x015e
081c ; --------------------------------------------------------------------------------------
081c ; Debug chain
081c ; --------------------------------------------------------------------------------------
081c 0002 0009  |    |		.DBGLEN	0x0002,0x0009
081e 016b 0170  | k p|		.DBGLNO	0x016b,0x0170,0x0172,0x0178,0x017d,0x0182,0x0186,0x018a,0x0190,0x0196,0x01a2
0829 ; --------------------------------------------------------------------------------------
0829 ; Debug chain
0829 ; --------------------------------------------------------------------------------------
0829 0001 0009  |    |		.DBGLEN	0x0001,0x0009
082b 01ab 01b0  |    |		.DBGLNO	0x01ab,0x01b0,0x01b6,0x01bb,0x01c0,0x01c4,0x01ca,0x01d1,0x01d8,0x01df
0835 ; --------------------------------------------------------------------------------------
0835 ; Debug chain
0835 ; --------------------------------------------------------------------------------------
0835 0001 0005  |    |		.DBGLEN	0x0001,0x0005
0837 01eb 01f2  |    |		.DBGLNO	0x01eb,0x01f2,0x01f8,0x01fd,0x0202,0x0206
083d ; --------------------------------------------------------------------------------------
083d ; Debug chain
083d ; --------------------------------------------------------------------------------------
083d 0001 0005  |    |		.DBGLEN	0x0001,0x0005
083f 020b 0210  |    |		.DBGLNO	0x020b,0x0210,0x0216,0x021b,0x0220,0x0224
0845 ; --------------------------------------------------------------------------------------
0845 ; Debug chain
0845 ; --------------------------------------------------------------------------------------
0845 0001 0005  |    |		.DBGLEN	0x0001,0x0005
0847 0233 0238  | 3 8|		.DBGLNO	0x0233,0x0238,0x023e,0x0243,0x0248,0x024c
084d ; --------------------------------------------------------------------------------------
084d ; Debug chain
084d ; --------------------------------------------------------------------------------------
084d 0001 0005  |    |		.DBGLEN	0x0001,0x0005
084f 0263 0268  | c h|		.DBGLNO	0x0263,0x0268,0x026e,0x0273,0x0278,0x027c
0855 ; --------------------------------------------------------------------------------------
0855 ; Debug chain
0855 ; --------------------------------------------------------------------------------------
0855 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0857 028b       |    |		.DBGLNO	0x028b
0858 ; --------------------------------------------------------------------------------------
0858 ; Debug chain
0858 ; --------------------------------------------------------------------------------------
0858 0000 0001  |    |		.DBGLEN	0x0000,0x0001
085a 0293       |    |		.DBGLNO	0x0293
085b ; --------------------------------------------------------------------------------------
085b ; Debug chain
085b ; --------------------------------------------------------------------------------------
085b 0000 0001  |    |		.DBGLEN	0x0000,0x0001
085d 029b       |    |		.DBGLNO	0x029b
085e ; --------------------------------------------------------------------------------------
085e ; Debug chain
085e ; --------------------------------------------------------------------------------------
085e 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0860 02a3       |    |		.DBGLNO	0x02a3
0861 ; --------------------------------------------------------------------------------------
0861 ; Debug chain
0861 ; --------------------------------------------------------------------------------------
0861 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0863 02ab       |    |		.DBGLNO	0x02ab
0864 ; --------------------------------------------------------------------------------------
0864 ; Debug chain
0864 ; --------------------------------------------------------------------------------------
0864 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0866 02b3       |    |		.DBGLNO	0x02b3
0867 ; --------------------------------------------------------------------------------------
0867 ; Debug chain
0867 ; --------------------------------------------------------------------------------------
0867 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0869 02bb       |    |		.DBGLNO	0x02bb
086a ; --------------------------------------------------------------------------------------
086a ; Debug chain
086a ; --------------------------------------------------------------------------------------
086a 0000 0001  |    |		.DBGLEN	0x0000,0x0001
086c 02c3       |    |		.DBGLNO	0x02c3
086d ; --------------------------------------------------------------------------------------
086d ; Debug chain
086d ; --------------------------------------------------------------------------------------
086d 0000 0001  |    |		.DBGLEN	0x0000,0x0001
086f 02cb       |    |		.DBGLNO	0x02cb
0870 ; --------------------------------------------------------------------------------------
0870 ; Debug chain
0870 ; --------------------------------------------------------------------------------------
0870 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0872 02d3       |    |		.DBGLNO	0x02d3
0873 ; --------------------------------------------------------------------------------------
0873 ; Debug chain
0873 ; --------------------------------------------------------------------------------------
0873 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0875 02db       |    |		.DBGLNO	0x02db
0876 ; --------------------------------------------------------------------------------------
0876 ; Debug chain
0876 ; --------------------------------------------------------------------------------------
0876 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0878 02e3       |    |		.DBGLNO	0x02e3
0879 ; --------------------------------------------------------------------------------------
0879 ; Debug chain
0879 ; --------------------------------------------------------------------------------------
0879 0000 0001  |    |		.DBGLEN	0x0000,0x0001
087b 02eb       |    |		.DBGLNO	0x02eb
087c ; --------------------------------------------------------------------------------------
087c ; Debug chain
087c ; --------------------------------------------------------------------------------------
087c 0000 0001  |    |		.DBGLEN	0x0000,0x0001
087e 02fb       |    |		.DBGLNO	0x02fb
087f ; --------------------------------------------------------------------------------------
087f ; Debug chain
087f ; --------------------------------------------------------------------------------------
087f 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0881 030b       |    |		.DBGLNO	0x030b
0882 ; --------------------------------------------------------------------------------------
0882 ; Debug chain
0882 ; --------------------------------------------------------------------------------------
0882 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0884 0323       | #  |		.DBGLNO	0x0323
0885 ; --------------------------------------------------------------------------------------
0885 ; Debug chain
0885 ; --------------------------------------------------------------------------------------
0885 0001 0013  |    |		.DBGLEN	0x0001,0x0013
0887 033b 033d  | ; =|		.DBGLNO	0x033b,0x033d,0x034a,0x0353,0x0356,0x035b,0x035f,0x0368,0x036b,0x0370,0x0374,0x037f,0x0382,0x0388,0x038d,0x0391,0x039a,0x039d,0x03a2,0x03a6
089b 0001 0002  |    |		.XXX[0x13]
089d 0005 0003  |    |
089f 0004 0006  |    |
08a1 0009 0007  |    |
08a3 0008 000a  |    |
08a5 000e 000b  |    |
08a7 000c 000d  |    |
08a9 000f 0012  |    |
08ab 0010 0011  |    |
08ad 0013       |    |
08ae ; --------------------------------------------------------------------------------------
08ae ; Debug chain
08ae ; --------------------------------------------------------------------------------------
08ae 0001 0002  |    |		.DBGLEN	0x0001,0x0002
08b0 03ab 03ad  |    |		.DBGLNO	0x03ab,0x03ad,0x03cc
08b3 ; --------------------------------------------------------------------------------------
08b3 ; Debug chain
08b3 ; --------------------------------------------------------------------------------------
08b3 0002 0005  |    |		.DBGLEN	0x0002,0x0005
08b5 03db 03dd  |    |		.DBGLNO	0x03db,0x03dd,0x03df,0x03e2,0x03eb,0x03f2,0x040b
08bc ; --------------------------------------------------------------------------------------
08bc ; Debug chain
08bc ; --------------------------------------------------------------------------------------
08bc 0001 0002  |    |		.DBGLEN	0x0001,0x0002
08be 0413 0417  |    |		.DBGLNO	0x0413,0x0417,0x045e
08c1 ; --------------------------------------------------------------------------------------
08c1 ; Debug chain
08c1 ; --------------------------------------------------------------------------------------
08c1 0000 0003  |    |		.DBGLEN	0x0000,0x0003
08c3 0463 0479  | c y|		.DBGLNO	0x0463,0x0479,0x0490
08c6 ; --------------------------------------------------------------------------------------
08c6 ; Debug chain
08c6 ; --------------------------------------------------------------------------------------
08c6 0004 0011  |    |		.DBGLEN	0x0004,0x0011
08c8 049b 049d  |    |		.DBGLNO	0x049b,0x049d,0x049f,0x04a1,0x04a3,0x04b0,0x04c9,0x04d3,0x04d6,0x04d9,0x04db,0x04ea,0x04f3,0x04f7,0x04fb,0x04fe,0x0502,0x0506,0x0509,0x050b,0x0526
08dd 0001 0002  |    |		.XXX[0x11]
08df 0003 0006  |    |
08e1 0004 0005  |    |
08e3 0007 000b  |    |
08e5 000f 0008  |    |
08e7 0009 000a  |    |
08e9 000c 000d  |    |
08eb 000e 0010  |    |
08ed 0011       |    |
08ee ; --------------------------------------------------------------------------------------
08ee ; Debug chain
08ee ; --------------------------------------------------------------------------------------
08ee 0001 0003  |    |		.DBGLEN	0x0001,0x0003
08f0 0533 0538  | 3 8|		.DBGLNO	0x0533,0x0538,0x0545,0x0552
08f4 ; --------------------------------------------------------------------------------------
08f4 ; Debug chain
08f4 ; --------------------------------------------------------------------------------------
08f4 0001 0002  |    |		.DBGLEN	0x0001,0x0002
08f6 055b 0560  | [ `|		.DBGLNO	0x055b,0x0560,0x0566
08f9 ; --------------------------------------------------------------------------------------
08f9 ; Debug chain
08f9 ; --------------------------------------------------------------------------------------
08f9 0001 0005  |    |		.DBGLEN	0x0001,0x0005
08fb 0573 0576  | s v|		.DBGLNO	0x0573,0x0576,0x0579,0x057c,0x0580,0x0586
0901 ; --------------------------------------------------------------------------------------
0901 ; Debug chain
0901 ; --------------------------------------------------------------------------------------
0901 0001 000a  |    |		.DBGLEN	0x0001,0x000a
0903 0593 0598  |    |		.DBGLNO	0x0593,0x0598,0x059f,0x05a6,0x05ad,0x05b4,0x05bb,0x05c2,0x05c9,0x05d0,0x05d6
090e ; --------------------------------------------------------------------------------------
090e ; Debug chain
090e ; --------------------------------------------------------------------------------------
090e 0001 0005  |    |		.DBGLEN	0x0001,0x0005
0910 05e3 05e8  |    |		.DBGLNO	0x05e3,0x05e8,0x05ee,0x05f3,0x05f8,0x05fc
0916 ; --------------------------------------------------------------------------------------
0916 ; Debug chain
0916 ; --------------------------------------------------------------------------------------
0916 0001 0002  |    |		.DBGLEN	0x0001,0x0002
0918 0603 0605  |    |		.DBGLNO	0x0603,0x0605,0x0613
091b ; --------------------------------------------------------------------------------------
091b ; Debug chain
091b ; --------------------------------------------------------------------------------------
091b 0002 0007  |    |		.DBGLEN	0x0002,0x0007
091d 061b 061f  |    |		.DBGLNO	0x061b,0x061f,0x0620,0x0623,0x0627,0x062a,0x062f,0x0633,0x0639
0926 ; --------------------------------------------------------------------------------------
0926 ; Debug chain
0926 ; --------------------------------------------------------------------------------------
0926 0001 0002  |    |		.DBGLEN	0x0001,0x0002
0928 0643 0647  | C G|		.DBGLNO	0x0643,0x0647,0x0696
092b ; --------------------------------------------------------------------------------------
092b ; Debug chain
092b ; --------------------------------------------------------------------------------------
092b 0001 0001  |    |		.DBGLEN	0x0001,0x0001
092d 069b 069f  |    |		.DBGLNO	0x069b,0x069f
092f 0000 0000  |    |		.BLANK	0000[0xd1]