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

⟦ab1a4c1f3⟧

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

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0ba8       |    |		.CONST	0x0ba8								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 0007       |    |		.CONST	0x0007								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00a9       |    |		.CONST	0x00a9								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0039       | 9  |		.CONST	0x0039								; Number of locals
000b			INIT_0008:
000b 0007       |    |		Action	Break_Optional
000c 0007       |    |		Action	Break_Optional
000d 0007       |    |		Action	Break_Optional
000e 0007       |    |		Action	Break_Optional
000f 0007       |    |		Action	Break_Optional
0010 49bc       |I   |		Short_Literal	0x1bc
0011 e002       |    |		Load	0x0,0x2
0012 03f0       |    |		Declare_Variable	Discrete,Visible,With_Value
0013 4953       |IS  |		Short_Literal	0x153
0014 e002       |    |		Load	0x0,0x2
0015 03f0       |    |		Declare_Variable	Discrete,Visible,With_Value
0016 e003       |    |		Load	0x0,0x3
0017 0490       |    |		Execute_Immediate	Set_Value_Visible_Unchecked,0x90
0018 e002       |    |		Load	0x0,0x2
0019 0404       |    |		Execute_Immediate	Set_Value_Visible_Unchecked,0x4
001a e002       |    |		Load	0x0,0x2
001b 0446       | F  |		Execute_Immediate	Set_Value_Visible_Unchecked,0x46
001c e002       |    |		Load	0x0,0x2
001d 041c       |    |		Execute_Immediate	Set_Value_Visible_Unchecked,0x1c
001e e002       |    |		Load	0x0,0x2
001f 0420       |    |		Execute_Immediate	Set_Value_Visible_Unchecked,0x20
0020 e002       |    |		Load	0x0,0x2
0021 0403       |    |		Execute_Immediate	Set_Value_Visible_Unchecked,0x3
0022 e002       |    |		Load	0x0,0x2
0023 0404       |    |		Execute_Immediate	Set_Value_Visible_Unchecked,0x4
0024 e002       |    |		Load	0x0,0x2
0025 0402       |    |		Execute_Immediate	Set_Value_Visible_Unchecked,0x2
0026 e002       |    |		Load	0x0,0x2
0027 0402       |    |		Execute_Immediate	Set_Value_Visible_Unchecked,0x2
0028 4800       |H   |		Short_Literal	0x0
0029 4803       |H   |		Short_Literal	0x3
002a e004       |    |		Load	0x0,0x4
002b 035c       | \  |		Declare_Type	Array,Constrained,Visible
002c 00e1       |    |		Load_Encached	Boolean_Cache
002d e002       |    |		Load	0x0,0x2
002e 00d8       |    |		Load_Top	At_Offset_0
002f e002       |    |		Load	0x0,0x2
0030 02a0       |    |		Declare_Subprogram	Null_Subprogram
0031 4805       |H   |		Short_Literal	0x5
0032 032e       | .  |		Declare_Type	Record,Defined,Visible
0033 00d8       |    |		Load_Top	At_Offset_0
0034 02a0       |    |		Declare_Subprogram	Null_Subprogram
0035 4818       |H   |		Short_Literal	0x18
0036 03d6       |    |		Declare_Type	Access,Defined,Visible
0037 4800       |H   |		Short_Literal	0x0
0038 4807       |H   |		Short_Literal	0x7
0039 4800       |H   |		Short_Literal	0x0
003a 480f       |H   |		Short_Literal	0xf
003b e219       |    |		Load	0x1,0x19
003c 02a0       |    |		Declare_Subprogram	Null_Subprogram
003d 4802       |H   |		Short_Literal	0x2
003e 035e       | ^  |		Declare_Type	Array,Defined,Visible
003f 00d8       |    |		Load_Top	At_Offset_0
0040 0336       | 6  |		Declare_Variable	Array,Visible
0041 00d8       |    |		Load_Top	At_Offset_0
0042 0335       | 5  |		Declare_Variable	Array,Duplicate
0043 00cd       |    |		Action	Spare6_Action
0044 4807       |H   |		Short_Literal	0x7
0045 4800       |H   |		Short_Literal	0x0
0046 480f       |H   |		Short_Literal	0xf
0047 4800       |H   |		Short_Literal	0x0
0048 e219       |    |		Load	0x1,0x19
0049 03bc       |    |		Declare_Variable	Access,By_Allocation
004a 00d9       |    |		Load_Top	At_Offset_1
004b e21e       |    |		Load	0x1,0x1e
004c e21c       |    |		Load	0x1,0x1c
004d 01a6       |    |		Execute	Matrix,Field_Write
004e 3ff9       |?   |		Loop_Increasing	0x48
004f 3ff6       |?   |		Loop_Increasing	0x46
0050 00d9       |    |		Load_Top	At_Offset_1
0051 01a4       |    |		Execute	Matrix,Structure_Write
0052 0007       |    |		Action	Break_Optional
0053 0007       |    |		Action	Break_Optional
0054 0007       |    |		Action	Break_Optional
0055 0007       |    |		Action	Break_Optional
0056 0007       |    |		Action	Break_Optional
0057 0007       |    |		Action	Break_Optional
0058 0007       |    |		Action	Break_Optional
0059 0007       |    |		Action	Break_Optional
005a 00e1       |    |		Load_Encached	Boolean_Cache
005b 0400       |    |		Execute_Immediate	Set_Value_Visible_Unchecked,0x0
005c 00db       |    |		Load_Top	At_Offset_3
005d 0129       | )  |		Execute	Any,Make_Visible
005e e002       |    |		Load	0x0,0x2
005f 0129       | )  |		Execute	Any,Make_Visible
0060 e002       |    |		Load	0x0,0x2
0061 0129       | )  |		Execute	Any,Make_Visible
0062 e219       |    |		Load	0x1,0x19
0063 0129       | )  |		Execute	Any,Make_Visible
0064 e002       |    |		Load	0x0,0x2
0065 0129       | )  |		Execute	Any,Make_Visible
0066 e002       |    |		Load	0x0,0x2
0067 0129       | )  |		Execute	Any,Make_Visible
0068 e003       |    |		Load	0x0,0x3
0069 0129       | )  |		Execute	Any,Make_Visible
006a 029a 00b3  |    |		Declare_Subprogram	INIT_00b0,For_Outer_Call,Visible,Unelaborated
006c 029a 014b  |   K|		Declare_Subprogram	INIT_0148,For_Outer_Call,Visible,Unelaborated
006e 029a 0173  |   s|		Declare_Subprogram	INIT_0170,For_Outer_Call,Visible,Unelaborated
0070 029a 01db  |    |		Declare_Subprogram	INIT_01d8,For_Outer_Call,Visible,Unelaborated
0072 029a 0243  |   C|		Declare_Subprogram	INIT_0240,For_Outer_Call,Visible,Unelaborated
0074 029a 02f3  |    |		Declare_Subprogram	INIT_02f0,For_Outer_Call,Visible,Unelaborated
0076 029a 0423  |   #|		Declare_Subprogram	INIT_0420,For_Outer_Call,Visible,Unelaborated
0078 029a 054b  |   K|		Declare_Subprogram	INIT_0548,For_Outer_Call,Visible,Unelaborated
007a 029a 05c3  |    |		Declare_Subprogram	INIT_05c0,For_Outer_Call,Visible,Unelaborated
007c 00bf       |    |		Action	Accept_Activation
007d e005       |    |		Load	0x0,0x5
007e 0007       |    |		Action	Break_Optional
007f 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
0080 00c7       |    |		Action	Elaborate_Subprogram
0081 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26
0082 00c7       |    |		Action	Elaborate_Subprogram
0083 029d 05db  |    |		Declare_Subprogram	INIT_05d8,For_Outer_Call
0085 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
0086 00c7       |    |		Action	Elaborate_Subprogram
0087 029d 060b  |    |		Declare_Subprogram	INIT_0608,For_Outer_Call
0089 029d 0623  |   #|		Declare_Subprogram	INIT_0620,For_Outer_Call
008b 029d 0643  |   C|		Declare_Subprogram	INIT_0640,For_Outer_Call
008d 029d 0673  |   s|		Declare_Subprogram	INIT_0670,For_Outer_Call
008f 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29
0090 00c7       |    |		Action	Elaborate_Subprogram
0091 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25
0092 00c7       |    |		Action	Elaborate_Subprogram
0093 029d 06ab  |    |		Declare_Subprogram	INIT_06a8,For_Outer_Call
0095 029d 074b  |   K|		Declare_Subprogram	INIT_0748,For_Outer_Call
0097 029d 086b  |   k|		Declare_Subprogram	INIT_0868,For_Outer_Call
0099 1d2c       | ,  |		Execute_Immediate	Reference_Lex_1,0x2c
009a 00c7       |    |		Action	Elaborate_Subprogram
009b 029d 08db  |    |		Declare_Subprogram	INIT_08d8,For_Outer_Call
009d 1d2a       | *  |		Execute_Immediate	Reference_Lex_1,0x2a
009e 00c7       |    |		Action	Elaborate_Subprogram
009f 029d 094b  |   K|		Declare_Subprogram	INIT_0948,For_Outer_Call
00a1 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b
00a2 00c7       |    |		Action	Elaborate_Subprogram
00a3 029d 09db  |    |		Declare_Subprogram	INIT_09d8,For_Outer_Call
00a5 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
00a6 00c7       |    |		Action	Elaborate_Subprogram
00a7 029f 0a4b  |   K|		Declare_Subprogram	INIT_0a48,For_Call
00a9			BODY_0008:
00a9 8239       | 9  |		Call	0x1,0x39
00aa 00bc       |    |		Action	Signal_Activated
00ab 00bb       |    |		Action	Signal_Completion
00ac 0000 0000  |    |		.BLANK	0000[0x4]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3       |    |		.CONST	0x00b3								; Address of begin
00b1 0004       |    |		.CONST	0x0004								; Address of exception handler
00b2 0001       |    |		.CONST	0x0001								; Number of locals
00b3			BODY_00b0:
00b3			INIT_00b0:
00b3 e21d       |    |		Load	0x1,0x1d
00b4 682d       |h-  |		Jump_Zero	0xe2
00b5 e220       |    |		Load	0x1,0x20
00b6 702b       |p+  |		Jump_Nonzero	0xe2
00b7 4801       |H   |		Short_Literal	0x1
00b8 a21c       |    |		Store_Unchecked	0x1,0x1c
00b9 4800       |H   |		Short_Literal	0x0
00ba a221       | !  |		Store_Unchecked	0x1,0x21
00bb 4800       |H   |		Short_Literal	0x0
00bc a222       | "  |		Store_Unchecked	0x1,0x22
00bd 00cf       |    |		Action	Mark_Auxiliary
00be 0007       |    |		Action	Break_Optional
00bf e222       | "  |		Load	0x1,0x22
00c0 e221       | !  |		Load	0x1,0x21
00c1 4802       |H   |		Short_Literal	0x2
00c2 8238       | 8  |		Call	0x1,0x38
00c3 c221       | !  |		Store	0x1,0x21
00c4 c222       | "  |		Store	0x1,0x22
00c5 e222       | "  |		Load	0x1,0x22
00c6 7008       |p   |		Jump_Nonzero	0xcf
00c7 4800       |H   |		Short_Literal	0x0
00c8 a21c       |    |		Store_Unchecked	0x1,0x1c
00c9 e21f       |    |		Load	0x1,0x1f
00ca e21e       |    |		Load	0x1,0x1e
00cb 8006       |    |		Call	0x0,0x6
00cc e219       |    |		Load	0x1,0x19
00cd a21d       |    |		Store_Unchecked	0x1,0x1d
00ce 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00cf e221       | !  |		Load	0x1,0x21
00d0 e21e       |    |		Load	0x1,0x1e
00d1 027e       | ~  |		Execute	Discrete,Not_Equal
00d2 7004       |p   |		Jump_Nonzero	0xd7
00d3 e222       | "  |		Load	0x1,0x22
00d4 e21f       |    |		Load	0x1,0x1f
00d5 027e       | ~  |		Execute	Discrete,Not_Equal
00d6 6809       |h   |		Jump_Zero	0xe0
00d7 e222       | "  |		Load	0x1,0x22
00d8 e221       | !  |		Load	0x1,0x21
00d9 e21b       |    |		Load	0x1,0x1b
00da 01a7       |    |		Execute	Matrix,Field_Read
00db a220       |    |		Store_Unchecked	0x1,0x20
00dc e222       | "  |		Load	0x1,0x22
00dd e221       | !  |		Load	0x1,0x21
00de 8006       |    |		Call	0x0,0x6
00df 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00e0 00c9       |    |		Action	Pop_Auxiliary_Loop
00e1 7fdd       |    |		Jump	0xbf
00e2 e21d       |    |		Load	0x1,0x1d
00e3 7015       |p   |		Jump_Nonzero	0xf9
00e4 4800       |H   |		Short_Literal	0x0
00e5 a21e       |    |		Store_Unchecked	0x1,0x1e
00e6 4800       |H   |		Short_Literal	0x0
00e7 a21f       |    |		Store_Unchecked	0x1,0x1f
00e8 e21f       |    |		Load	0x1,0x1f
00e9 e21e       |    |		Load	0x1,0x1e
00ea 4801       |H   |		Short_Literal	0x1
00eb 8238       | 8  |		Call	0x1,0x38
00ec c21e       |    |		Store	0x1,0x1e
00ed c21f       |    |		Store	0x1,0x1f
00ee e21f       |    |		Load	0x1,0x1f
00ef 7001       |p   |		Jump_Nonzero	0xf1
00f0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00f1 e21f       |    |		Load	0x1,0x1f
00f2 e21e       |    |		Load	0x1,0x1e
00f3 8006       |    |		Call	0x0,0x6
00f4 e21f       |    |		Load	0x1,0x1f
00f5 e21e       |    |		Load	0x1,0x1e
00f6 e21b       |    |		Load	0x1,0x1b
00f7 01a7       |    |		Execute	Matrix,Field_Read
00f8 a21d       |    |		Store_Unchecked	0x1,0x1d
00f9 e220       |    |		Load	0x1,0x20
00fa 7005       |p   |		Jump_Nonzero	0x100
00fb e21e       |    |		Load	0x1,0x1e
00fc a221       | !  |		Store_Unchecked	0x1,0x21
00fd e21f       |    |		Load	0x1,0x1f
00fe a222       | "  |		Store_Unchecked	0x1,0x22
00ff 7805       |x   |		Jump	0x105
0100 e222       | "  |		Load	0x1,0x22
0101 e221       | !  |		Load	0x1,0x21
0102 8006       |    |		Call	0x0,0x6
0103 e219       |    |		Load	0x1,0x19
0104 a220       |    |		Store_Unchecked	0x1,0x20
0105 00cf       |    |		Action	Mark_Auxiliary
0106 0007       |    |		Action	Break_Optional
0107 e222       | "  |		Load	0x1,0x22
0108 e221       | !  |		Load	0x1,0x21
0109 4802       |H   |		Short_Literal	0x2
010a 8238       | 8  |		Call	0x1,0x38
010b c221       | !  |		Store	0x1,0x21
010c c222       | "  |		Store	0x1,0x22
010d e222       | "  |		Load	0x1,0x22
010e 6811       |h   |		Jump_Zero	0x120
010f e221       | !  |		Load	0x1,0x21
0110 e21e       |    |		Load	0x1,0x1e
0111 027e       | ~  |		Execute	Discrete,Not_Equal
0112 7004       |p   |		Jump_Nonzero	0x117
0113 e222       | "  |		Load	0x1,0x22
0114 e21f       |    |		Load	0x1,0x1f
0115 027e       | ~  |		Execute	Discrete,Not_Equal
0116 6828       |h(  |		Jump_Zero	0x13f
0117 e222       | "  |		Load	0x1,0x22
0118 e221       | !  |		Load	0x1,0x21
0119 e21b       |    |		Load	0x1,0x1b
011a 01a7       |    |		Execute	Matrix,Field_Read
011b a220       |    |		Store_Unchecked	0x1,0x20
011c e222       | "  |		Load	0x1,0x22
011d e221       | !  |		Load	0x1,0x21
011e 8006       |    |		Call	0x0,0x6
011f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0120 e21f       |    |		Load	0x1,0x1f
0121 e21e       |    |		Load	0x1,0x1e
0122 8006       |    |		Call	0x0,0x6
0123 e219       |    |		Load	0x1,0x19
0124 a21d       |    |		Store_Unchecked	0x1,0x1d
0125 e21c       |    |		Load	0x1,0x1c
0126 6803       |h   |		Jump_Zero	0x12a
0127 4800       |H   |		Short_Literal	0x0
0128 a21c       |    |		Store_Unchecked	0x1,0x1c
0129 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
012a e21f       |    |		Load	0x1,0x1f
012b e21e       |    |		Load	0x1,0x1e
012c 4801       |H   |		Short_Literal	0x1
012d 8238       | 8  |		Call	0x1,0x38
012e c21e       |    |		Store	0x1,0x1e
012f c21f       |    |		Store	0x1,0x1f
0130 e21f       |    |		Load	0x1,0x1f
0131 7001       |p   |		Jump_Nonzero	0x133
0132 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0133 e21f       |    |		Load	0x1,0x1f
0134 e21e       |    |		Load	0x1,0x1e
0135 8006       |    |		Call	0x0,0x6
0136 e21f       |    |		Load	0x1,0x1f
0137 e21e       |    |		Load	0x1,0x1e
0138 e21b       |    |		Load	0x1,0x1b
0139 01a7       |    |		Execute	Matrix,Field_Read
013a a21d       |    |		Store_Unchecked	0x1,0x1d
013b e21e       |    |		Load	0x1,0x1e
013c a221       | !  |		Store_Unchecked	0x1,0x21
013d e21f       |    |		Load	0x1,0x1f
013e a222       | "  |		Store_Unchecked	0x1,0x22
013f 00c9       |    |		Action	Pop_Auxiliary_Loop
0140 7fc6       |    |		Jump	0x107
0141 0000 0000  |    |		.BLANK	0000[0x7]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014d       | M  |		.CONST	0x014d								; Address of begin
0149 0004       |    |		.CONST	0x0004								; Address of exception handler
014a 0002       |    |		.CONST	0x0002								; Number of locals
014b			INIT_0148:
014b 029f 0a8b  |    |		Declare_Subprogram	INIT_0a88,For_Call
014d			BODY_0148:
014d e219       |    |		Load	0x1,0x19
014e a21d       |    |		Store_Unchecked	0x1,0x1d
014f e219       |    |		Load	0x1,0x19
0150 a220       |    |		Store_Unchecked	0x1,0x20
0151 4890       |H   |		Short_Literal	0x90
0152 a20f       |    |		Store_Unchecked	0x1,0xf
0153 00cf       |    |		Action	Mark_Auxiliary
0154 4807       |H   |		Short_Literal	0x7
0155 4800       |H   |		Short_Literal	0x0
0156 00cf       |    |		Action	Mark_Auxiliary
0157 480f       |H   |		Short_Literal	0xf
0158 4800       |H   |		Short_Literal	0x0
0159 0007       |    |		Action	Break_Optional
015a 8402       |    |		Call	0x2,0x2
015b 00c8       |    |		Action	Pop_Auxiliary_Range
015c 3ffd       |?   |		Loop_Increasing	0x15a
015d 00ce       |    |		Action	Pop_Auxiliary
015e 00c8       |    |		Action	Pop_Auxiliary_Range
015f 3ff6       |?   |		Loop_Increasing	0x156
0160 00ce       |    |		Action	Pop_Auxiliary
0161 8228       | (  |		Call	0x1,0x28
0162 4801       |H   |		Short_Literal	0x1
0163 4800       |H   |		Short_Literal	0x0
0164 4800       |H   |		Short_Literal	0x0
0165 4800       |H   |		Short_Literal	0x0
0166 4800       |H   |		Short_Literal	0x0
0167 e007       |    |		Load	0x0,0x7
0168 e008       |    |		Load	0x0,0x8
0169 8009       |    |		Call	0x0,0x9
016a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
016b 0000 0000  |    |		.BLANK	0000[0x5]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0175       | u  |		.CONST	0x0175								; Address of begin
0171 0004       |    |		.CONST	0x0004								; Address of exception handler
0172 0002       |    |		.CONST	0x0002								; Number of locals
0173			INIT_0170:
0173 e219       |    |		Load	0x1,0x19
0174 0007       |    |		Action	Break_Optional
0175			BODY_0170:
0175 e219       |    |		Load	0x1,0x19
0176 a21d       |    |		Store_Unchecked	0x1,0x1d
0177 e219       |    |		Load	0x1,0x19
0178 a220       |    |		Store_Unchecked	0x1,0x20
0179 e00a       |    |		Load	0x0,0xa
017a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
017b 4800       |H   |		Short_Literal	0x0
017c e5ff       |    |		Load	0x2,-0x1
017d e00a       |    |		Load	0x0,0xa
017e 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
017f c20f       |    |		Store	0x1,0xf
0180 4801       |H   |		Short_Literal	0x1
0181 e5ff       |    |		Load	0x2,-0x1
0182 e00b       |    |		Load	0x0,0xb
0183 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0184 00cf       |    |		Action	Mark_Auxiliary
0185 4801       |H   |		Short_Literal	0x1
0186 e21b       |    |		Load	0x1,0x1b
0187 01a9       |    |		Execute	Matrix,Reverse_Bounds
0188 00cf       |    |		Action	Mark_Auxiliary
0189 4802       |H   |		Short_Literal	0x2
018a e21b       |    |		Load	0x1,0x1b
018b 01a9       |    |		Execute	Matrix,Reverse_Bounds
018c 0007       |    |		Action	Break_Optional
018d 00d8       |    |		Load_Top	At_Offset_0
018e e405       |    |		Load	0x2,0x5
018f e21b       |    |		Load	0x1,0x1b
0190 01a7       |    |		Execute	Matrix,Field_Read
0191 a402       |    |		Store_Unchecked	0x2,0x2
0192 00cf       |    |		Action	Mark_Auxiliary
0193 e402       |    |		Load	0x2,0x2
0194 0227       | '  |		Execute	Access,All_Reference
0195 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0196 01d9       |    |		Execute	Vector,Reverse_Bounds
0197 0007       |    |		Action	Break_Optional
0198 e402       |    |		Load	0x2,0x2
0199 0229       | )  |		Execute	Access,All_Read
019a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
019b e00a       |    |		Load	0x0,0xa
019c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
019d 4800       |H   |		Short_Literal	0x0
019e e5ff       |    |		Load	0x2,-0x1
019f e00a       |    |		Load	0x0,0xa
01a0 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01a1 4800       |H   |		Short_Literal	0x0
01a2 00da       |    |		Load_Top	At_Offset_2
01a3 01d6       |    |		Execute	Vector,Field_Write
01a4 00d1       |    |		Pop_Control	Pop_Count_1
01a5 00c8       |    |		Action	Pop_Auxiliary_Range
01a6 3ff1       |?   |		Loop_Increasing	0x198
01a7 00ce       |    |		Action	Pop_Auxiliary
01a8 4801       |H   |		Short_Literal	0x1
01a9 e402       |    |		Load	0x2,0x2
01aa 0227       | '  |		Execute	Access,All_Reference
01ab 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01ac e402       |    |		Load	0x2,0x2
01ad 0229       | )  |		Execute	Access,All_Read
01ae e00a       |    |		Load	0x0,0xa
01af 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01b0 4800       |H   |		Short_Literal	0x0
01b1 e5ff       |    |		Load	0x2,-0x1
01b2 e00a       |    |		Load	0x0,0xa
01b3 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01b4 00d9       |    |		Load_Top	At_Offset_1
01b5 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
01b6 00d1       |    |		Pop_Control	Pop_Count_1
01b7 e402       |    |		Load	0x2,0x2
01b8 0229       | )  |		Execute	Access,All_Read
01b9 e00a       |    |		Load	0x0,0xa
01ba 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01bb 4800       |H   |		Short_Literal	0x0
01bc e5ff       |    |		Load	0x2,-0x1
01bd e00a       |    |		Load	0x0,0xa
01be 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01bf 00d9       |    |		Load_Top	At_Offset_1
01c0 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
01c1 00d1       |    |		Pop_Control	Pop_Count_1
01c2 e402       |    |		Load	0x2,0x2
01c3 0229       | )  |		Execute	Access,All_Read
01c4 e00a       |    |		Load	0x0,0xa
01c5 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01c6 4800       |H   |		Short_Literal	0x0
01c7 e5ff       |    |		Load	0x2,-0x1
01c8 e00a       |    |		Load	0x0,0xa
01c9 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01ca 00d9       |    |		Load_Top	At_Offset_1
01cb 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
01cc 00d1       |    |		Pop_Control	Pop_Count_1
01cd 4801       |H   |		Short_Literal	0x1
01ce e5ff       |    |		Load	0x2,-0x1
01cf e00b       |    |		Load	0x0,0xb
01d0 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
01d1 00c8       |    |		Action	Pop_Auxiliary_Range
01d2 3fba       |?   |		Loop_Increasing	0x18d
01d3 00ce       |    |		Action	Pop_Auxiliary
01d4 00c8       |    |		Action	Pop_Auxiliary_Range
01d5 3fb2       |?   |		Loop_Increasing	0x188
01d6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01d7 0000       |    |		.XXX[0x1]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01dd       |    |		.CONST	0x01dd								; Address of begin
01d9 0004       |    |		.CONST	0x0004								; Address of exception handler
01da 0002       |    |		.CONST	0x0002								; Number of locals
01db			INIT_01d8:
01db e219       |    |		Load	0x1,0x19
01dc 0007       |    |		Action	Break_Optional
01dd			BODY_01d8:
01dd e00a       |    |		Load	0x0,0xa
01de 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01df 4800       |H   |		Short_Literal	0x0
01e0 e20f       |    |		Load	0x1,0xf
01e1 e5ff       |    |		Load	0x2,-0x1
01e2 e00a       |    |		Load	0x0,0xa
01e3 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
01e4 4801       |H   |		Short_Literal	0x1
01e5 e5ff       |    |		Load	0x2,-0x1
01e6 e00b       |    |		Load	0x0,0xb
01e7 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
01e8 00cf       |    |		Action	Mark_Auxiliary
01e9 4801       |H   |		Short_Literal	0x1
01ea e21b       |    |		Load	0x1,0x1b
01eb 01a9       |    |		Execute	Matrix,Reverse_Bounds
01ec 00cf       |    |		Action	Mark_Auxiliary
01ed 4802       |H   |		Short_Literal	0x2
01ee e21b       |    |		Load	0x1,0x1b
01ef 01a9       |    |		Execute	Matrix,Reverse_Bounds
01f0 0007       |    |		Action	Break_Optional
01f1 00d8       |    |		Load_Top	At_Offset_0
01f2 e405       |    |		Load	0x2,0x5
01f3 e21b       |    |		Load	0x1,0x1b
01f4 01a7       |    |		Execute	Matrix,Field_Read
01f5 a402       |    |		Store_Unchecked	0x2,0x2
01f6 00cf       |    |		Action	Mark_Auxiliary
01f7 e402       |    |		Load	0x2,0x2
01f8 0227       | '  |		Execute	Access,All_Reference
01f9 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
01fa 01d9       |    |		Execute	Vector,Reverse_Bounds
01fb 0007       |    |		Action	Break_Optional
01fc e00a       |    |		Load	0x0,0xa
01fd 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01fe 4800       |H   |		Short_Literal	0x0
01ff 4800       |H   |		Short_Literal	0x0
0200 e402       |    |		Load	0x2,0x2
0201 0227       | '  |		Execute	Access,All_Reference
0202 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0203 01d7       |    |		Execute	Vector,Field_Read
0204 e5ff       |    |		Load	0x2,-0x1
0205 e00a       |    |		Load	0x0,0xa
0206 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0207 4820       |H   |		Short_Literal	0x20
0208 e5ff       |    |		Load	0x2,-0x1
0209 e00b       |    |		Load	0x0,0xb
020a 1846       | F  |		Execute	Package,Field_Execute,Field_Number 0x46
020b 00c8       |    |		Action	Pop_Auxiliary_Range
020c 3fef       |?   |		Loop_Increasing	0x1fc
020d 00ce       |    |		Action	Pop_Auxiliary
020e e00a       |    |		Load	0x0,0xa
020f 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0210 4800       |H   |		Short_Literal	0x0
0211 e402       |    |		Load	0x2,0x2
0212 0227       | '  |		Execute	Access,All_Reference
0213 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0214 e5ff       |    |		Load	0x2,-0x1
0215 e00a       |    |		Load	0x0,0xa
0216 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0217 4820       |H   |		Short_Literal	0x20
0218 e5ff       |    |		Load	0x2,-0x1
0219 e00b       |    |		Load	0x0,0xb
021a 1846       | F  |		Execute	Package,Field_Execute,Field_Number 0x46
021b e00a       |    |		Load	0x0,0xa
021c 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
021d 4800       |H   |		Short_Literal	0x0
021e e402       |    |		Load	0x2,0x2
021f 0227       | '  |		Execute	Access,All_Reference
0220 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0221 e5ff       |    |		Load	0x2,-0x1
0222 e00a       |    |		Load	0x0,0xa
0223 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0224 4820       |H   |		Short_Literal	0x20
0225 e5ff       |    |		Load	0x2,-0x1
0226 e00b       |    |		Load	0x0,0xb
0227 1846       | F  |		Execute	Package,Field_Execute,Field_Number 0x46
0228 e00a       |    |		Load	0x0,0xa
0229 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
022a 4800       |H   |		Short_Literal	0x0
022b e402       |    |		Load	0x2,0x2
022c 0227       | '  |		Execute	Access,All_Reference
022d 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
022e e5ff       |    |		Load	0x2,-0x1
022f e00a       |    |		Load	0x0,0xa
0230 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0231 4801       |H   |		Short_Literal	0x1
0232 e5ff       |    |		Load	0x2,-0x1
0233 e00b       |    |		Load	0x0,0xb
0234 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0235 00c8       |    |		Action	Pop_Auxiliary_Range
0236 3fba       |?   |		Loop_Increasing	0x1f1
0237 00ce       |    |		Action	Pop_Auxiliary
0238 00c8       |    |		Action	Pop_Auxiliary_Range
0239 3fb2       |?   |		Loop_Increasing	0x1ec
023a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
023b 0000 0000  |    |		.BLANK	0000[0x5]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0245       | E  |		.CONST	0x0245								; Address of begin
0241 0004       |    |		.CONST	0x0004								; Address of exception handler
0242 0002       |    |		.CONST	0x0002								; Number of locals
0243			INIT_0240:
0243 029f 0acb  |    |		Declare_Subprogram	INIT_0ac8,For_Call
0245			BODY_0240:
0245 480e       |H   |		Short_Literal	0xe
0246 4806       |H   |		Short_Literal	0x6
0247 e21b       |    |		Load	0x1,0x1b
0248 01a7       |    |		Execute	Matrix,Field_Read
0249 0227       | '  |		Execute	Access,All_Reference
024a 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
024b 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
024c 6827       |h'  |		Jump_Zero	0x274
024d e210       |    |		Load	0x1,0x10
024e 4806       |H   |		Short_Literal	0x6
024f e212       |    |		Load	0x1,0x12
0250 0a01       |    |		Execute_Immediate	Plus,0x1
0251 0271       | q  |		Execute	Discrete,Times
0252 0273       | s  |		Execute	Discrete,Plus
0253 e212       |    |		Load	0x1,0x12
0254 0a01       |    |		Execute_Immediate	Plus,0x1
0255 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
0256 0273       | s  |		Execute	Discrete,Plus
0257 e216       |    |		Load	0x1,0x16
0258 0902       |    |		Execute_Immediate	Binary_Scale,0x2
0259 0273       | s  |		Execute	Discrete,Plus
025a 480e       |H   |		Short_Literal	0xe
025b 4806       |H   |		Short_Literal	0x6
025c e21b       |    |		Load	0x1,0x1b
025d 01a7       |    |		Execute	Matrix,Field_Read
025e 0227       | '  |		Execute	Access,All_Reference
025f 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0260 e211       |    |		Load	0x1,0x11
0261 4803       |H   |		Short_Literal	0x3
0262 e213       |    |		Load	0x1,0x13
0263 0a01       |    |		Execute_Immediate	Plus,0x1
0264 0271       | q  |		Execute	Discrete,Times
0265 0273       | s  |		Execute	Discrete,Plus
0266 e213       |    |		Load	0x1,0x13
0267 0a01       |    |		Execute_Immediate	Plus,0x1
0268 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
0269 0273       | s  |		Execute	Discrete,Plus
026a 4803       |H   |		Short_Literal	0x3
026b e217       |    |		Load	0x1,0x17
026c 0271       | q  |		Execute	Discrete,Times
026d 0272       | r  |		Execute	Discrete,Minus
026e 480e       |H   |		Short_Literal	0xe
026f 4806       |H   |		Short_Literal	0x6
0270 e21b       |    |		Load	0x1,0x1b
0271 01a7       |    |		Execute	Matrix,Field_Read
0272 0227       | '  |		Execute	Access,All_Reference
0273 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0274 480e       |H   |		Short_Literal	0xe
0275 4804       |H   |		Short_Literal	0x4
0276 e21b       |    |		Load	0x1,0x1b
0277 01a7       |    |		Execute	Matrix,Field_Read
0278 0227       | '  |		Execute	Access,All_Reference
0279 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
027a 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
027b 681c       |h   |		Jump_Zero	0x298
027c e210       |    |		Load	0x1,0x10
027d 4800       |H   |		Short_Literal	0x0
027e e212       |    |		Load	0x1,0x12
027f 0a01       |    |		Execute_Immediate	Plus,0x1
0280 0271       | q  |		Execute	Discrete,Times
0281 0273       | s  |		Execute	Discrete,Plus
0282 480e       |H   |		Short_Literal	0xe
0283 4804       |H   |		Short_Literal	0x4
0284 e21b       |    |		Load	0x1,0x1b
0285 01a7       |    |		Execute	Matrix,Field_Read
0286 0227       | '  |		Execute	Access,All_Reference
0287 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0288 e211       |    |		Load	0x1,0x11
0289 4803       |H   |		Short_Literal	0x3
028a e213       |    |		Load	0x1,0x13
028b 0a01       |    |		Execute_Immediate	Plus,0x1
028c 0271       | q  |		Execute	Discrete,Times
028d 0273       | s  |		Execute	Discrete,Plus
028e e213       |    |		Load	0x1,0x13
028f 0a01       |    |		Execute_Immediate	Plus,0x1
0290 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
0291 0273       | s  |		Execute	Discrete,Plus
0292 480e       |H   |		Short_Literal	0xe
0293 4804       |H   |		Short_Literal	0x4
0294 e21b       |    |		Load	0x1,0x1b
0295 01a7       |    |		Execute	Matrix,Field_Read
0296 0227       | '  |		Execute	Access,All_Reference
0297 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0298 480e       |H   |		Short_Literal	0xe
0299 4802       |H   |		Short_Literal	0x2
029a e21b       |    |		Load	0x1,0x1b
029b 01a7       |    |		Execute	Matrix,Field_Read
029c 0227       | '  |		Execute	Access,All_Reference
029d 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
029e 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
029f 681c       |h   |		Jump_Zero	0x2bc
02a0 e210       |    |		Load	0x1,0x10
02a1 480d       |H   |		Short_Literal	0xd
02a2 e212       |    |		Load	0x1,0x12
02a3 0a01       |    |		Execute_Immediate	Plus,0x1
02a4 0271       | q  |		Execute	Discrete,Times
02a5 0273       | s  |		Execute	Discrete,Plus
02a6 480e       |H   |		Short_Literal	0xe
02a7 4802       |H   |		Short_Literal	0x2
02a8 e21b       |    |		Load	0x1,0x1b
02a9 01a7       |    |		Execute	Matrix,Field_Read
02aa 0227       | '  |		Execute	Access,All_Reference
02ab 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
02ac e211       |    |		Load	0x1,0x11
02ad 4803       |H   |		Short_Literal	0x3
02ae e213       |    |		Load	0x1,0x13
02af 0a01       |    |		Execute_Immediate	Plus,0x1
02b0 0271       | q  |		Execute	Discrete,Times
02b1 0273       | s  |		Execute	Discrete,Plus
02b2 e213       |    |		Load	0x1,0x13
02b3 0a01       |    |		Execute_Immediate	Plus,0x1
02b4 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
02b5 0273       | s  |		Execute	Discrete,Plus
02b6 480e       |H   |		Short_Literal	0xe
02b7 4802       |H   |		Short_Literal	0x2
02b8 e21b       |    |		Load	0x1,0x1b
02b9 01a7       |    |		Execute	Matrix,Field_Read
02ba 0227       | '  |		Execute	Access,All_Reference
02bb 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
02bc 480e       |H   |		Short_Literal	0xe
02bd 4800       |H   |		Short_Literal	0x0
02be e21b       |    |		Load	0x1,0x1b
02bf 01a7       |    |		Execute	Matrix,Field_Read
02c0 0227       | '  |		Execute	Access,All_Reference
02c1 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
02c2 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
02c3 681c       |h   |		Jump_Zero	0x2e0
02c4 e210       |    |		Load	0x1,0x10
02c5 480e       |H   |		Short_Literal	0xe
02c6 e212       |    |		Load	0x1,0x12
02c7 0a01       |    |		Execute_Immediate	Plus,0x1
02c8 0271       | q  |		Execute	Discrete,Times
02c9 0273       | s  |		Execute	Discrete,Plus
02ca 480e       |H   |		Short_Literal	0xe
02cb 4800       |H   |		Short_Literal	0x0
02cc e21b       |    |		Load	0x1,0x1b
02cd 01a7       |    |		Execute	Matrix,Field_Read
02ce 0227       | '  |		Execute	Access,All_Reference
02cf 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
02d0 e211       |    |		Load	0x1,0x11
02d1 4803       |H   |		Short_Literal	0x3
02d2 e213       |    |		Load	0x1,0x13
02d3 0a01       |    |		Execute_Immediate	Plus,0x1
02d4 0271       | q  |		Execute	Discrete,Times
02d5 0273       | s  |		Execute	Discrete,Plus
02d6 e213       |    |		Load	0x1,0x13
02d7 0a01       |    |		Execute_Immediate	Plus,0x1
02d8 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
02d9 0273       | s  |		Execute	Discrete,Plus
02da 480e       |H   |		Short_Literal	0xe
02db 4800       |H   |		Short_Literal	0x0
02dc e21b       |    |		Load	0x1,0x1b
02dd 01a7       |    |		Execute	Matrix,Field_Read
02de 0227       | '  |		Execute	Access,All_Reference
02df 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
02e0 00cf       |    |		Action	Mark_Auxiliary
02e1 4807       |H   |		Short_Literal	0x7
02e2 4800       |H   |		Short_Literal	0x0
02e3 00cf       |    |		Action	Mark_Auxiliary
02e4 4801       |H   |		Short_Literal	0x1
02e5 480c       |H   |		Short_Literal	0xc
02e6 0007       |    |		Action	Break_Optional
02e7 8402       |    |		Call	0x2,0x2
02e8 00c8       |    |		Action	Pop_Auxiliary_Range
02e9 37fd       |7   |		Loop_Decreasing	0x2e7
02ea 00ce       |    |		Action	Pop_Auxiliary
02eb 00c8       |    |		Action	Pop_Auxiliary_Range
02ec 3ff6       |?   |		Loop_Increasing	0x2e3
02ed 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02ee 0000 0000  |    |		.XXX[0x2]
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 02fb       |    |		.CONST	0x02fb								; Address of begin
02f1 0004       |    |		.CONST	0x0004								; Address of exception handler
02f2 0004       |    |		.CONST	0x0004								; Number of locals
02f3			INIT_02f0:
02f3 4800       |H   |		Short_Literal	0x0
02f4 488f       |H   |		Short_Literal	0x8f
02f5 e004       |    |		Load	0x0,0x4
02f6 035b       | [  |		Declare_Type	Array,Constrained
02f7 0337       | 7  |		Declare_Variable	Array
02f8 e003       |    |		Load	0x0,0x3
02f9 029f 0aeb  |    |		Declare_Subprogram	INIT_0ae8,For_Call
02fb			BODY_02f0:
02fb 00cf       |    |		Action	Mark_Auxiliary
02fc 4807       |H   |		Short_Literal	0x7
02fd 4800       |H   |		Short_Literal	0x0
02fe 00cf       |    |		Action	Mark_Auxiliary
02ff 480f       |H   |		Short_Literal	0xf
0300 4800       |H   |		Short_Literal	0x0
0301 0007       |    |		Action	Break_Optional
0302 8404       |    |		Call	0x2,0x4
0303 00c8       |    |		Action	Pop_Auxiliary_Range
0304 3ffd       |?   |		Loop_Increasing	0x302
0305 00ce       |    |		Action	Pop_Auxiliary
0306 00c8       |    |		Action	Pop_Auxiliary_Range
0307 3ff6       |?   |		Loop_Increasing	0x2fe
0308 00ce       |    |		Action	Pop_Auxiliary
0309 4800       |H   |		Short_Literal	0x0
030a 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
030b 00cf       |    |		Action	Mark_Auxiliary
030c 4803       |H   |		Short_Literal	0x3
030d 4800       |H   |		Short_Literal	0x0
030e 0007       |    |		Action	Break_Optional
030f 00d8       |    |		Load_Top	At_Offset_0
0310 0a01       |    |		Execute_Immediate	Plus,0x1
0311 00d8       |    |		Load_Top	At_Offset_0
0312 e00c       |    |		Load	0x0,0xc
0313 0260       | `  |		Execute	Discrete,In_Type
0314 7001       |p   |		Jump_Nonzero	0x316
0315 0801       |    |		Execute_Immediate	Raise,0x1
0316 e403       |    |		Load	0x2,0x3
0317 e402       |    |		Load	0x2,0x2
0318 01d6       |    |		Execute	Vector,Field_Write
0319 e403       |    |		Load	0x2,0x3
031a 0a01       |    |		Execute_Immediate	Plus,0x1
031b c403       |    |		Store	0x2,0x3
031c 00d8       |    |		Load_Top	At_Offset_0
031d 0a05       |    |		Execute_Immediate	Plus,0x5
031e 00d8       |    |		Load_Top	At_Offset_0
031f e00c       |    |		Load	0x0,0xc
0320 0260       | `  |		Execute	Discrete,In_Type
0321 7001       |p   |		Jump_Nonzero	0x323
0322 0801       |    |		Execute_Immediate	Raise,0x1
0323 e403       |    |		Load	0x2,0x3
0324 e402       |    |		Load	0x2,0x2
0325 01d6       |    |		Execute	Vector,Field_Write
0326 e403       |    |		Load	0x2,0x3
0327 0a01       |    |		Execute_Immediate	Plus,0x1
0328 c403       |    |		Store	0x2,0x3
0329 00cf       |    |		Action	Mark_Auxiliary
032a 4829       |H)  |		Short_Literal	0x29
032b 4808       |H   |		Short_Literal	0x8
032c 0007       |    |		Action	Break_Optional
032d 00d8       |    |		Load_Top	At_Offset_0
032e 482a       |H*  |		Short_Literal	0x2a
032f 026f       | o  |		Execute	Discrete,Remainder
0330 0a01       |    |		Execute_Immediate	Plus,0x1
0331 00d8       |    |		Load_Top	At_Offset_0
0332 e00c       |    |		Load	0x0,0xc
0333 0260       | `  |		Execute	Discrete,In_Type
0334 7001       |p   |		Jump_Nonzero	0x336
0335 0801       |    |		Execute_Immediate	Raise,0x1
0336 e403       |    |		Load	0x2,0x3
0337 e402       |    |		Load	0x2,0x2
0338 01d6       |    |		Execute	Vector,Field_Write
0339 e403       |    |		Load	0x2,0x3
033a 0a01       |    |		Execute_Immediate	Plus,0x1
033b c403       |    |		Store	0x2,0x3
033c 00c8       |    |		Action	Pop_Auxiliary_Range
033d 3fef       |?   |		Loop_Increasing	0x32d
033e 00ce       |    |		Action	Pop_Auxiliary
033f 00c8       |    |		Action	Pop_Auxiliary_Range
0340 3fce       |?   |		Loop_Increasing	0x30f
0341 00ce       |    |		Action	Pop_Auxiliary
0342 00d9       |    |		Load_Top	At_Offset_1
0343 0e90       |    |		Execute_Immediate	Not_Equal,-0x70
0344 6804       |h   |		Jump_Zero	0x349
0345 0092 0b99  |    |		Action	Push_String_Extended,0xb99					; "NTILES gak!"
0347 e00b       |    |		Load	0x0,0xb
0348 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0349 00da       |    |		Load_Top	At_Offset_2
034a 480e       |H   |		Short_Literal	0xe
034b 4800       |H   |		Short_Literal	0x0
034c e21b       |    |		Load	0x1,0x1b
034d 01a7       |    |		Execute	Matrix,Field_Read
034e 822f       | /  |		Call	0x1,0x2f
034f 00d1       |    |		Pop_Control	Pop_Count_1
0350 00da       |    |		Load_Top	At_Offset_2
0351 480e       |H   |		Short_Literal	0xe
0352 4802       |H   |		Short_Literal	0x2
0353 e21b       |    |		Load	0x1,0x1b
0354 01a7       |    |		Execute	Matrix,Field_Read
0355 822f       | /  |		Call	0x1,0x2f
0356 00d1       |    |		Pop_Control	Pop_Count_1
0357 00da       |    |		Load_Top	At_Offset_2
0358 480e       |H   |		Short_Literal	0xe
0359 4804       |H   |		Short_Literal	0x4
035a e21b       |    |		Load	0x1,0x1b
035b 01a7       |    |		Execute	Matrix,Field_Read
035c 822f       | /  |		Call	0x1,0x2f
035d 00d1       |    |		Pop_Control	Pop_Count_1
035e 00da       |    |		Load_Top	At_Offset_2
035f 480e       |H   |		Short_Literal	0xe
0360 4806       |H   |		Short_Literal	0x6
0361 e21b       |    |		Load	0x1,0x1b
0362 01a7       |    |		Execute	Matrix,Field_Read
0363 822f       | /  |		Call	0x1,0x2f
0364 00d1       |    |		Pop_Control	Pop_Count_1
0365 00cf       |    |		Action	Mark_Auxiliary
0366 480c       |H   |		Short_Literal	0xc
0367 4801       |H   |		Short_Literal	0x1
0368 0007       |    |		Action	Break_Optional
0369 e402       |    |		Load	0x2,0x2
036a 00d9       |    |		Load_Top	At_Offset_1
036b 4800       |H   |		Short_Literal	0x0
036c e21b       |    |		Load	0x1,0x1b
036d 01a7       |    |		Execute	Matrix,Field_Read
036e 822f       | /  |		Call	0x1,0x2f
036f 00d1       |    |		Pop_Control	Pop_Count_1
0370 e402       |    |		Load	0x2,0x2
0371 00d9       |    |		Load_Top	At_Offset_1
0372 4807       |H   |		Short_Literal	0x7
0373 e21b       |    |		Load	0x1,0x1b
0374 01a7       |    |		Execute	Matrix,Field_Read
0375 822f       | /  |		Call	0x1,0x2f
0376 00d1       |    |		Pop_Control	Pop_Count_1
0377 00c8       |    |		Action	Pop_Auxiliary_Range
0378 3ff0       |?   |		Loop_Increasing	0x369
0379 00c9       |    |		Action	Pop_Auxiliary_Loop
037a 4806       |H   |		Short_Literal	0x6
037b 4801       |H   |		Short_Literal	0x1
037c 0007       |    |		Action	Break_Optional
037d e402       |    |		Load	0x2,0x2
037e 4803       |H   |		Short_Literal	0x3
037f 00da       |    |		Load_Top	At_Offset_2
0380 e21b       |    |		Load	0x1,0x1b
0381 01a7       |    |		Execute	Matrix,Field_Read
0382 822f       | /  |		Call	0x1,0x2f
0383 00d1       |    |		Pop_Control	Pop_Count_1
0384 e402       |    |		Load	0x2,0x2
0385 480a       |H   |		Short_Literal	0xa
0386 00da       |    |		Load_Top	At_Offset_2
0387 e21b       |    |		Load	0x1,0x1b
0388 01a7       |    |		Execute	Matrix,Field_Read
0389 822f       | /  |		Call	0x1,0x2f
038a 00d1       |    |		Pop_Control	Pop_Count_1
038b 00c8       |    |		Action	Pop_Auxiliary_Range
038c 3ff0       |?   |		Loop_Increasing	0x37d
038d 00c9       |    |		Action	Pop_Auxiliary_Loop
038e 4805       |H   |		Short_Literal	0x5
038f 4802       |H   |		Short_Literal	0x2
0390 0007       |    |		Action	Break_Optional
0391 e402       |    |		Load	0x2,0x2
0392 4802       |H   |		Short_Literal	0x2
0393 00da       |    |		Load_Top	At_Offset_2
0394 e21b       |    |		Load	0x1,0x1b
0395 01a7       |    |		Execute	Matrix,Field_Read
0396 822f       | /  |		Call	0x1,0x2f
0397 00d1       |    |		Pop_Control	Pop_Count_1
0398 e402       |    |		Load	0x2,0x2
0399 480b       |H   |		Short_Literal	0xb
039a 00da       |    |		Load_Top	At_Offset_2
039b e21b       |    |		Load	0x1,0x1b
039c 01a7       |    |		Execute	Matrix,Field_Read
039d 822f       | /  |		Call	0x1,0x2f
039e 00d1       |    |		Pop_Control	Pop_Count_1
039f 00c8       |    |		Action	Pop_Auxiliary_Range
03a0 3ff0       |?   |		Loop_Increasing	0x391
03a1 00c9       |    |		Action	Pop_Auxiliary_Loop
03a2 4804       |H   |		Short_Literal	0x4
03a3 4803       |H   |		Short_Literal	0x3
03a4 0007       |    |		Action	Break_Optional
03a5 e402       |    |		Load	0x2,0x2
03a6 4801       |H   |		Short_Literal	0x1
03a7 00da       |    |		Load_Top	At_Offset_2
03a8 e21b       |    |		Load	0x1,0x1b
03a9 01a7       |    |		Execute	Matrix,Field_Read
03aa 822f       | /  |		Call	0x1,0x2f
03ab 00d1       |    |		Pop_Control	Pop_Count_1
03ac e402       |    |		Load	0x2,0x2
03ad 480c       |H   |		Short_Literal	0xc
03ae 00da       |    |		Load_Top	At_Offset_2
03af e21b       |    |		Load	0x1,0x1b
03b0 01a7       |    |		Execute	Matrix,Field_Read
03b1 822f       | /  |		Call	0x1,0x2f
03b2 00d1       |    |		Pop_Control	Pop_Count_1
03b3 00c8       |    |		Action	Pop_Auxiliary_Range
03b4 3ff0       |?   |		Loop_Increasing	0x3a5
03b5 00c9       |    |		Action	Pop_Auxiliary_Loop
03b6 4809       |H   |		Short_Literal	0x9
03b7 4804       |H   |		Short_Literal	0x4
03b8 0007       |    |		Action	Break_Optional
03b9 e402       |    |		Load	0x2,0x2
03ba 00d9       |    |		Load_Top	At_Offset_1
03bb 4801       |H   |		Short_Literal	0x1
03bc e21b       |    |		Load	0x1,0x1b
03bd 01a7       |    |		Execute	Matrix,Field_Read
03be 8230       | 0  |		Call	0x1,0x30
03bf 00d1       |    |		Pop_Control	Pop_Count_1
03c0 e402       |    |		Load	0x2,0x2
03c1 00d9       |    |		Load_Top	At_Offset_1
03c2 4806       |H   |		Short_Literal	0x6
03c3 e21b       |    |		Load	0x1,0x1b
03c4 01a7       |    |		Execute	Matrix,Field_Read
03c5 8230       | 0  |		Call	0x1,0x30
03c6 00d1       |    |		Pop_Control	Pop_Count_1
03c7 00c8       |    |		Action	Pop_Auxiliary_Range
03c8 3ff0       |?   |		Loop_Increasing	0x3b9
03c9 00c9       |    |		Action	Pop_Auxiliary_Loop
03ca 4805       |H   |		Short_Literal	0x5
03cb 4802       |H   |		Short_Literal	0x2
03cc 0007       |    |		Action	Break_Optional
03cd e402       |    |		Load	0x2,0x2
03ce 4804       |H   |		Short_Literal	0x4
03cf 00da       |    |		Load_Top	At_Offset_2
03d0 e21b       |    |		Load	0x1,0x1b
03d1 01a7       |    |		Execute	Matrix,Field_Read
03d2 8230       | 0  |		Call	0x1,0x30
03d3 00d1       |    |		Pop_Control	Pop_Count_1
03d4 e402       |    |		Load	0x2,0x2
03d5 4809       |H   |		Short_Literal	0x9
03d6 00da       |    |		Load_Top	At_Offset_2
03d7 e21b       |    |		Load	0x1,0x1b
03d8 01a7       |    |		Execute	Matrix,Field_Read
03d9 8230       | 0  |		Call	0x1,0x30
03da 00d1       |    |		Pop_Control	Pop_Count_1
03db 00c8       |    |		Action	Pop_Auxiliary_Range
03dc 3ff0       |?   |		Loop_Increasing	0x3cd
03dd 00c9       |    |		Action	Pop_Auxiliary_Loop
03de 4808       |H   |		Short_Literal	0x8
03df 4805       |H   |		Short_Literal	0x5
03e0 0007       |    |		Action	Break_Optional
03e1 e402       |    |		Load	0x2,0x2
03e2 00d9       |    |		Load_Top	At_Offset_1
03e3 4802       |H   |		Short_Literal	0x2
03e4 e21b       |    |		Load	0x1,0x1b
03e5 01a7       |    |		Execute	Matrix,Field_Read
03e6 8231       | 1  |		Call	0x1,0x31
03e7 00d1       |    |		Pop_Control	Pop_Count_1
03e8 e402       |    |		Load	0x2,0x2
03e9 00d9       |    |		Load_Top	At_Offset_1
03ea 4805       |H   |		Short_Literal	0x5
03eb e21b       |    |		Load	0x1,0x1b
03ec 01a7       |    |		Execute	Matrix,Field_Read
03ed 8231       | 1  |		Call	0x1,0x31
03ee 00d1       |    |		Pop_Control	Pop_Count_1
03ef 00c8       |    |		Action	Pop_Auxiliary_Range
03f0 3ff0       |?   |		Loop_Increasing	0x3e1
03f1 00c9       |    |		Action	Pop_Auxiliary_Loop
03f2 4804       |H   |		Short_Literal	0x4
03f3 4803       |H   |		Short_Literal	0x3
03f4 0007       |    |		Action	Break_Optional
03f5 e402       |    |		Load	0x2,0x2
03f6 4805       |H   |		Short_Literal	0x5
03f7 00da       |    |		Load_Top	At_Offset_2
03f8 e21b       |    |		Load	0x1,0x1b
03f9 01a7       |    |		Execute	Matrix,Field_Read
03fa 8231       | 1  |		Call	0x1,0x31
03fb 00d1       |    |		Pop_Control	Pop_Count_1
03fc e402       |    |		Load	0x2,0x2
03fd 4808       |H   |		Short_Literal	0x8
03fe 00da       |    |		Load_Top	At_Offset_2
03ff e21b       |    |		Load	0x1,0x1b
0400 01a7       |    |		Execute	Matrix,Field_Read
0401 8231       | 1  |		Call	0x1,0x31
0402 00d1       |    |		Pop_Control	Pop_Count_1
0403 00c8       |    |		Action	Pop_Auxiliary_Range
0404 3ff0       |?   |		Loop_Increasing	0x3f5
0405 00c9       |    |		Action	Pop_Auxiliary_Loop
0406 4804       |H   |		Short_Literal	0x4
0407 4803       |H   |		Short_Literal	0x3
0408 00cf       |    |		Action	Mark_Auxiliary
0409 4807       |H   |		Short_Literal	0x7
040a 4806       |H   |		Short_Literal	0x6
040b 0007       |    |		Action	Break_Optional
040c e402       |    |		Load	0x2,0x2
040d 00d9       |    |		Load_Top	At_Offset_1
040e e407       |    |		Load	0x2,0x7
040f e21b       |    |		Load	0x1,0x1b
0410 01a7       |    |		Execute	Matrix,Field_Read
0411 8232       | 2  |		Call	0x1,0x32
0412 00d1       |    |		Pop_Control	Pop_Count_1
0413 00c8       |    |		Action	Pop_Auxiliary_Range
0414 3ff7       |?   |		Loop_Increasing	0x40c
0415 00ce       |    |		Action	Pop_Auxiliary
0416 00c8       |    |		Action	Pop_Auxiliary_Range
0417 3ff0       |?   |		Loop_Increasing	0x408
0418 00ce       |    |		Action	Pop_Auxiliary
0419 8228       | (  |		Call	0x1,0x28
041a 4890       |H   |		Short_Literal	0x90
041b a20f       |    |		Store_Unchecked	0x1,0xf
041c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
041d 0000 0000  |    |		.XXX[0x3]
041f 0000       |    |
0420 ; --------------------------------------------------------------------------------------
0420 ; SUBPROGRAM
0420 ; --------------------------------------------------------------------------------------
0420 042b       | +  |		.CONST	0x042b								; Address of begin
0421 0004       |    |		.CONST	0x0004								; Address of exception handler
0422 0005       |    |		.CONST	0x0005								; Number of locals
0423			INIT_0420:
0423 e002       |    |		Load	0x0,0x2
0424 0007       |    |		Action	Break_Optional
0425 e002       |    |		Load	0x0,0x2
0426 0007       |    |		Action	Break_Optional
0427 e002       |    |		Load	0x0,0x2
0428 0007       |    |		Action	Break_Optional
0429 e002       |    |		Load	0x0,0x2
042a 0007       |    |		Action	Break_Optional
042b			BODY_0420:
042b e5ff       |    |		Load	0x2,-0x1
042c 2607       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7
042d 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
042e e211       |    |		Load	0x1,0x11
042f 0272       | r  |		Execute	Discrete,Minus
0430 005b       | [  |		Store_Top	Discrete,At_Offset_3
0431 00da       |    |		Load_Top	At_Offset_2
0432 0d00       |    |		Execute_Immediate	Less,0x0
0433 6801       |h   |		Jump_Zero	0x435
0434 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0435 00da       |    |		Load_Top	At_Offset_2
0436 e213       |    |		Load	0x1,0x13
0437 0a01       |    |		Execute_Immediate	Plus,0x1
0438 0270       | p  |		Execute	Discrete,Divide
0439 005a       | Z  |		Store_Top	Discrete,At_Offset_2
043a 00d9       |    |		Load_Top	At_Offset_1
043b 0c08       |    |		Execute_Immediate	Greater_Equal,0x8
043c 6801       |h   |		Jump_Zero	0x43e
043d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
043e e5ff       |    |		Load	0x2,-0x1
043f 2607       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7
0440 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0441 e210       |    |		Load	0x1,0x10
0442 0272       | r  |		Execute	Discrete,Minus
0443 c402       |    |		Store	0x2,0x2
0444 00db       |    |		Load_Top	At_Offset_3
0445 0d00       |    |		Execute_Immediate	Less,0x0
0446 6801       |h   |		Jump_Zero	0x448
0447 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0448 00db       |    |		Load_Top	At_Offset_3
0449 e212       |    |		Load	0x1,0x12
044a 0a01       |    |		Execute_Immediate	Plus,0x1
044b 0270       | p  |		Execute	Discrete,Divide
044c 0059       | Y  |		Store_Top	Discrete,At_Offset_1
044d 00d8       |    |		Load_Top	At_Offset_0
044e 0d00       |    |		Execute_Immediate	Less,0x0
044f 70f4       |p   |		Jump_Nonzero	0x544
0450 00d9       |    |		Load_Top	At_Offset_1
0451 0c0f       |    |		Execute_Immediate	Greater_Equal,0xf
0452 6801       |h   |		Jump_Zero	0x454
0453 78f0       |x   |		Jump	0x544
0454 00d8       |    |		Load_Top	At_Offset_0
0455 7010       |p   |		Jump_Nonzero	0x466
0456 e5ff       |    |		Load	0x2,-0x1
0457 480e       |H   |		Short_Literal	0xe
0458 4804       |H   |		Short_Literal	0x4
0459 e21b       |    |		Load	0x1,0x1b
045a 01a7       |    |		Execute	Matrix,Field_Read
045b 8236       | 6  |		Call	0x1,0x36
045c 68e7       |h   |		Jump_Zero	0x544
045d e5ff       |    |		Load	0x2,-0x1
045e 480e       |H   |		Short_Literal	0xe
045f 4804       |H   |		Short_Literal	0x4
0460 480e       |H   |		Short_Literal	0xe
0461 4804       |H   |		Short_Literal	0x4
0462 e21b       |    |		Load	0x1,0x1b
0463 01a7       |    |		Execute	Matrix,Field_Read
0464 8235       | 5  |		Call	0x1,0x35
0465 78de       |x   |		Jump	0x544
0466 00d8       |    |		Load_Top	At_Offset_0
0467 0f0d       |    |		Execute_Immediate	Equal,0xd
0468 6830       |h0  |		Jump_Zero	0x499
0469 e5ff       |    |		Load	0x2,-0x1
046a 480e       |H   |		Short_Literal	0xe
046b 4802       |H   |		Short_Literal	0x2
046c e21b       |    |		Load	0x1,0x1b
046d 01a7       |    |		Execute	Matrix,Field_Read
046e 8236       | 6  |		Call	0x1,0x36
046f 6809       |h   |		Jump_Zero	0x479
0470 e5ff       |    |		Load	0x2,-0x1
0471 480e       |H   |		Short_Literal	0xe
0472 4802       |H   |		Short_Literal	0x2
0473 480e       |H   |		Short_Literal	0xe
0474 4802       |H   |		Short_Literal	0x2
0475 e21b       |    |		Load	0x1,0x1b
0476 01a7       |    |		Execute	Matrix,Field_Read
0477 8235       | 5  |		Call	0x1,0x35
0478 78cb       |x   |		Jump	0x544
0479 e5ff       |    |		Load	0x2,-0x1
047a 480c       |H   |		Short_Literal	0xc
047b 4804       |H   |		Short_Literal	0x4
047c e21b       |    |		Load	0x1,0x1b
047d 01a7       |    |		Execute	Matrix,Field_Read
047e 8236       | 6  |		Call	0x1,0x36
047f 6809       |h   |		Jump_Zero	0x489
0480 e5ff       |    |		Load	0x2,-0x1
0481 480c       |H   |		Short_Literal	0xc
0482 4804       |H   |		Short_Literal	0x4
0483 480c       |H   |		Short_Literal	0xc
0484 4804       |H   |		Short_Literal	0x4
0485 e21b       |    |		Load	0x1,0x1b
0486 01a7       |    |		Execute	Matrix,Field_Read
0487 8235       | 5  |		Call	0x1,0x35
0488 78bb       |x   |		Jump	0x544
0489 e5ff       |    |		Load	0x2,-0x1
048a 480c       |H   |		Short_Literal	0xc
048b 4803       |H   |		Short_Literal	0x3
048c e21b       |    |		Load	0x1,0x1b
048d 01a7       |    |		Execute	Matrix,Field_Read
048e 8236       | 6  |		Call	0x1,0x36
048f 68b4       |h   |		Jump_Zero	0x544
0490 e5ff       |    |		Load	0x2,-0x1
0491 480c       |H   |		Short_Literal	0xc
0492 4803       |H   |		Short_Literal	0x3
0493 480c       |H   |		Short_Literal	0xc
0494 4803       |H   |		Short_Literal	0x3
0495 e21b       |    |		Load	0x1,0x1b
0496 01a7       |    |		Execute	Matrix,Field_Read
0497 8235       | 5  |		Call	0x1,0x35
0498 78ab       |x   |		Jump	0x544
0499 00d8       |    |		Load_Top	At_Offset_0
049a 0f0e       |    |		Execute_Immediate	Equal,0xe
049b 6820       |h   |		Jump_Zero	0x4bc
049c e5ff       |    |		Load	0x2,-0x1
049d 480e       |H   |		Short_Literal	0xe
049e 4800       |H   |		Short_Literal	0x0
049f e21b       |    |		Load	0x1,0x1b
04a0 01a7       |    |		Execute	Matrix,Field_Read
04a1 8236       | 6  |		Call	0x1,0x36
04a2 6809       |h   |		Jump_Zero	0x4ac
04a3 e5ff       |    |		Load	0x2,-0x1
04a4 480e       |H   |		Short_Literal	0xe
04a5 4800       |H   |		Short_Literal	0x0
04a6 480e       |H   |		Short_Literal	0xe
04a7 4800       |H   |		Short_Literal	0x0
04a8 e21b       |    |		Load	0x1,0x1b
04a9 01a7       |    |		Execute	Matrix,Field_Read
04aa 8235       | 5  |		Call	0x1,0x35
04ab 7898       |x   |		Jump	0x544
04ac e5ff       |    |		Load	0x2,-0x1
04ad 480e       |H   |		Short_Literal	0xe
04ae 4802       |H   |		Short_Literal	0x2
04af e21b       |    |		Load	0x1,0x1b
04b0 01a7       |    |		Execute	Matrix,Field_Read
04b1 8236       | 6  |		Call	0x1,0x36
04b2 6891       |h   |		Jump_Zero	0x544
04b3 e5ff       |    |		Load	0x2,-0x1
04b4 480e       |H   |		Short_Literal	0xe
04b5 4802       |H   |		Short_Literal	0x2
04b6 480e       |H   |		Short_Literal	0xe
04b7 4802       |H   |		Short_Literal	0x2
04b8 e21b       |    |		Load	0x1,0x1b
04b9 01a7       |    |		Execute	Matrix,Field_Read
04ba 8235       | 5  |		Call	0x1,0x35
04bb 7888       |x   |		Jump	0x544
04bc 00d9       |    |		Load_Top	At_Offset_1
04bd 0f03       |    |		Execute_Immediate	Equal,0x3
04be 7003       |p   |		Jump_Nonzero	0x4c2
04bf 00d9       |    |		Load_Top	At_Offset_1
04c0 0f04       |    |		Execute_Immediate	Equal,0x4
04c1 6816       |h   |		Jump_Zero	0x4d8
04c2 00d8       |    |		Load_Top	At_Offset_0
04c3 0f06       |    |		Execute_Immediate	Equal,0x6
04c4 7003       |p   |		Jump_Nonzero	0x4c8
04c5 00d8       |    |		Load_Top	At_Offset_0
04c6 0f07       |    |		Execute_Immediate	Equal,0x7
04c7 6810       |h   |		Jump_Zero	0x4d8
04c8 e5ff       |    |		Load	0x2,-0x1
04c9 480e       |H   |		Short_Literal	0xe
04ca 4806       |H   |		Short_Literal	0x6
04cb e21b       |    |		Load	0x1,0x1b
04cc 01a7       |    |		Execute	Matrix,Field_Read
04cd 8236       | 6  |		Call	0x1,0x36
04ce 6809       |h   |		Jump_Zero	0x4d8
04cf e5ff       |    |		Load	0x2,-0x1
04d0 480e       |H   |		Short_Literal	0xe
04d1 4806       |H   |		Short_Literal	0x6
04d2 480e       |H   |		Short_Literal	0xe
04d3 4806       |H   |		Short_Literal	0x6
04d4 e21b       |    |		Load	0x1,0x1b
04d5 01a7       |    |		Execute	Matrix,Field_Read
04d6 8235       | 5  |		Call	0x1,0x35
04d7 786c       |xl  |		Jump	0x544
04d8 00d8       |    |		Load_Top	At_Offset_0
04d9 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
04da 6823       |h#  |		Jump_Zero	0x4fe
04db 00d9       |    |		Load_Top	At_Offset_1
04dc 0d07       |    |		Execute_Immediate	Less,0x7
04dd 6820       |h   |		Jump_Zero	0x4fe
04de e5ff       |    |		Load	0x2,-0x1
04df 00d9       |    |		Load_Top	At_Offset_1
04e0 0aff       |    |		Execute_Immediate	Plus,-0x1
04e1 00db       |    |		Load_Top	At_Offset_3
04e2 0a01       |    |		Execute_Immediate	Plus,0x1
04e3 e21b       |    |		Load	0x1,0x1b
04e4 01a7       |    |		Execute	Matrix,Field_Read
04e5 8236       | 6  |		Call	0x1,0x36
04e6 6817       |h   |		Jump_Zero	0x4fe
04e7 e5ff       |    |		Load	0x2,-0x1
04e8 00d9       |    |		Load_Top	At_Offset_1
04e9 0aff       |    |		Execute_Immediate	Plus,-0x1
04ea 00d8       |    |		Load_Top	At_Offset_0
04eb e002       |    |		Load	0x0,0x2
04ec 0260       | `  |		Execute	Discrete,In_Type
04ed 7001       |p   |		Jump_Nonzero	0x4ef
04ee 0801       |    |		Execute_Immediate	Raise,0x1
04ef 00db       |    |		Load_Top	At_Offset_3
04f0 0a01       |    |		Execute_Immediate	Plus,0x1
04f1 00d8       |    |		Load_Top	At_Offset_0
04f2 e002       |    |		Load	0x0,0x2
04f3 0260       | `  |		Execute	Discrete,In_Type
04f4 7001       |p   |		Jump_Nonzero	0x4f6
04f5 0801       |    |		Execute_Immediate	Raise,0x1
04f6 00db       |    |		Load_Top	At_Offset_3
04f7 0aff       |    |		Execute_Immediate	Plus,-0x1
04f8 e404       |    |		Load	0x2,0x4
04f9 0a01       |    |		Execute_Immediate	Plus,0x1
04fa e21b       |    |		Load	0x1,0x1b
04fb 01a7       |    |		Execute	Matrix,Field_Read
04fc 8235       | 5  |		Call	0x1,0x35
04fd 7846       |xF  |		Jump	0x544
04fe 00d9       |    |		Load_Top	At_Offset_1
04ff 0d07       |    |		Execute_Immediate	Less,0x7
0500 6818       |h   |		Jump_Zero	0x519
0501 e5ff       |    |		Load	0x2,-0x1
0502 00d9       |    |		Load_Top	At_Offset_1
0503 00db       |    |		Load_Top	At_Offset_3
0504 0a01       |    |		Execute_Immediate	Plus,0x1
0505 e21b       |    |		Load	0x1,0x1b
0506 01a7       |    |		Execute	Matrix,Field_Read
0507 8236       | 6  |		Call	0x1,0x36
0508 6810       |h   |		Jump_Zero	0x519
0509 e5ff       |    |		Load	0x2,-0x1
050a 00d9       |    |		Load_Top	At_Offset_1
050b 00db       |    |		Load_Top	At_Offset_3
050c 0a01       |    |		Execute_Immediate	Plus,0x1
050d 00d8       |    |		Load_Top	At_Offset_0
050e e002       |    |		Load	0x0,0x2
050f 0260       | `  |		Execute	Discrete,In_Type
0510 7001       |p   |		Jump_Nonzero	0x512
0511 0801       |    |		Execute_Immediate	Raise,0x1
0512 00db       |    |		Load_Top	At_Offset_3
0513 e404       |    |		Load	0x2,0x4
0514 0a01       |    |		Execute_Immediate	Plus,0x1
0515 e21b       |    |		Load	0x1,0x1b
0516 01a7       |    |		Execute	Matrix,Field_Read
0517 8235       | 5  |		Call	0x1,0x35
0518 782b       |x+  |		Jump	0x544
0519 00d8       |    |		Load_Top	At_Offset_0
051a 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
051b 6818       |h   |		Jump_Zero	0x534
051c e5ff       |    |		Load	0x2,-0x1
051d 00d9       |    |		Load_Top	At_Offset_1
051e 0aff       |    |		Execute_Immediate	Plus,-0x1
051f 00db       |    |		Load_Top	At_Offset_3
0520 e21b       |    |		Load	0x1,0x1b
0521 01a7       |    |		Execute	Matrix,Field_Read
0522 8236       | 6  |		Call	0x1,0x36
0523 6810       |h   |		Jump_Zero	0x534
0524 e5ff       |    |		Load	0x2,-0x1
0525 00d9       |    |		Load_Top	At_Offset_1
0526 0aff       |    |		Execute_Immediate	Plus,-0x1
0527 00d8       |    |		Load_Top	At_Offset_0
0528 e002       |    |		Load	0x0,0x2
0529 0260       | `  |		Execute	Discrete,In_Type
052a 7001       |p   |		Jump_Nonzero	0x52c
052b 0801       |    |		Execute_Immediate	Raise,0x1
052c 00db       |    |		Load_Top	At_Offset_3
052d 00db       |    |		Load_Top	At_Offset_3
052e 0aff       |    |		Execute_Immediate	Plus,-0x1
052f e404       |    |		Load	0x2,0x4
0530 e21b       |    |		Load	0x1,0x1b
0531 01a7       |    |		Execute	Matrix,Field_Read
0532 8235       | 5  |		Call	0x1,0x35
0533 7810       |x   |		Jump	0x544
0534 e5ff       |    |		Load	0x2,-0x1
0535 00d9       |    |		Load_Top	At_Offset_1
0536 00db       |    |		Load_Top	At_Offset_3
0537 e21b       |    |		Load	0x1,0x1b
0538 01a7       |    |		Execute	Matrix,Field_Read
0539 8236       | 6  |		Call	0x1,0x36
053a 6809       |h   |		Jump_Zero	0x544
053b e5ff       |    |		Load	0x2,-0x1
053c 00d9       |    |		Load_Top	At_Offset_1
053d 00db       |    |		Load_Top	At_Offset_3
053e 00db       |    |		Load_Top	At_Offset_3
053f e404       |    |		Load	0x2,0x4
0540 e21b       |    |		Load	0x1,0x1b
0541 01a7       |    |		Execute	Matrix,Field_Read
0542 8235       | 5  |		Call	0x1,0x35
0543 7800       |x   |		Jump	0x544
0544 0008       |    |		Action	Idle
0545 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0546 0000 0000  |    |		.XXX[0x2]
0548 ; --------------------------------------------------------------------------------------
0548 ; SUBPROGRAM
0548 ; --------------------------------------------------------------------------------------
0548 054f       | O  |		.CONST	0x054f								; Address of begin
0549 0004       |    |		.CONST	0x0004								; Address of exception handler
054a 0003       |    |		.CONST	0x0003								; Number of locals
054b			INIT_0548:
054b e00c       |    |		Load	0x0,0xc
054c 0007       |    |		Action	Break_Optional
054d e00c       |    |		Load	0x0,0xc
054e 0007       |    |		Action	Break_Optional
054f			BODY_0548:
054f e00d       |    |		Load	0x0,0xd
0550 7052       |pR  |		Jump_Nonzero	0x5a3
0551 e21d       |    |		Load	0x1,0x1d
0552 6850       |hP  |		Jump_Zero	0x5a3
0553 e220       |    |		Load	0x1,0x20
0554 684e       |hN  |		Jump_Zero	0x5a3
0555 e21d       |    |		Load	0x1,0x1d
0556 0227       | '  |		Execute	Access,All_Reference
0557 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0558 0aff       |    |		Execute_Immediate	Plus,-0x1
0559 00d8       |    |		Load_Top	At_Offset_0
055a e003       |    |		Load	0x0,0x3
055b 0260       | `  |		Execute	Discrete,In_Type
055c 7001       |p   |		Jump_Nonzero	0x55e
055d 0801       |    |		Execute_Immediate	Raise,0x1
055e e21d       |    |		Load	0x1,0x1d
055f 0227       | '  |		Execute	Access,All_Reference
0560 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0561 01d7       |    |		Execute	Vector,Field_Read
0562 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0563 e220       |    |		Load	0x1,0x20
0564 0227       | '  |		Execute	Access,All_Reference
0565 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0566 0aff       |    |		Execute_Immediate	Plus,-0x1
0567 00d8       |    |		Load_Top	At_Offset_0
0568 e003       |    |		Load	0x0,0x3
0569 0260       | `  |		Execute	Discrete,In_Type
056a 7001       |p   |		Jump_Nonzero	0x56c
056b 0801       |    |		Execute_Immediate	Raise,0x1
056c e220       |    |		Load	0x1,0x20
056d 0227       | '  |		Execute	Access,All_Reference
056e 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
056f 01d7       |    |		Execute	Vector,Field_Read
0570 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0571 00d9       |    |		Load_Top	At_Offset_1
0572 0c09       |    |		Execute_Immediate	Greater_Equal,0x9
0573 7003       |p   |		Jump_Nonzero	0x577
0574 00d8       |    |		Load_Top	At_Offset_0
0575 0c09       |    |		Execute_Immediate	Greater_Equal,0x9
0576 6804       |h   |		Jump_Zero	0x57b
0577 00d9       |    |		Load_Top	At_Offset_1
0578 00d9       |    |		Load_Top	At_Offset_1
0579 027e       | ~  |		Execute	Discrete,Not_Equal
057a 7012       |p   |		Jump_Nonzero	0x58d
057b 00d9       |    |		Load_Top	At_Offset_1
057c 0d05       |    |		Execute_Immediate	Less,0x5
057d 6803       |h   |		Jump_Zero	0x581
057e 00d8       |    |		Load_Top	At_Offset_0
057f 0c05       |    |		Execute_Immediate	Greater_Equal,0x5
0580 700c       |p   |		Jump_Nonzero	0x58d
0581 00d9       |    |		Load_Top	At_Offset_1
0582 0c05       |    |		Execute_Immediate	Greater_Equal,0x5
0583 681f       |h   |		Jump_Zero	0x5a3
0584 00d9       |    |		Load_Top	At_Offset_1
0585 0d09       |    |		Execute_Immediate	Less,0x9
0586 681c       |h   |		Jump_Zero	0x5a3
0587 00d8       |    |		Load_Top	At_Offset_0
0588 0d05       |    |		Execute_Immediate	Less,0x5
0589 7003       |p   |		Jump_Nonzero	0x58d
058a 00d8       |    |		Load_Top	At_Offset_0
058b 0c09       |    |		Execute_Immediate	Greater_Equal,0x9
058c 6816       |h   |		Jump_Zero	0x5a3
058d e00e       |    |		Load	0x0,0xe
058e 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
058f 6804       |h   |		Jump_Zero	0x594
0590 e222       | "  |		Load	0x1,0x22
0591 e221       | !  |		Load	0x1,0x21
0592 8006       |    |		Call	0x0,0x6
0593 780b       |x   |		Jump	0x59f
0594 e21f       |    |		Load	0x1,0x1f
0595 e21e       |    |		Load	0x1,0x1e
0596 8006       |    |		Call	0x0,0x6
0597 e220       |    |		Load	0x1,0x20
0598 a21d       |    |		Store_Unchecked	0x1,0x1d
0599 e221       | !  |		Load	0x1,0x21
059a a21e       |    |		Store_Unchecked	0x1,0x1e
059b e222       | "  |		Load	0x1,0x22
059c a21f       |    |		Store_Unchecked	0x1,0x1f
059d 4800       |H   |		Short_Literal	0x0
059e a222       | "  |		Store_Unchecked	0x1,0x22
059f e219       |    |		Load	0x1,0x19
05a0 a220       |    |		Store_Unchecked	0x1,0x20
05a1 4800       |H   |		Short_Literal	0x0
05a2 a223       | #  |		Store_Unchecked	0x1,0x23
05a3 e00d       |    |		Load	0x0,0xd
05a4 7018       |p   |		Jump_Nonzero	0x5bd
05a5 e220       |    |		Load	0x1,0x20
05a6 680b       |h   |		Jump_Zero	0x5b2
05a7 e222       | "  |		Load	0x1,0x22
05a8 e221       | !  |		Load	0x1,0x21
05a9 8237       | 7  |		Call	0x1,0x37
05aa 6807       |h   |		Jump_Zero	0x5b2
05ab e222       | "  |		Load	0x1,0x22
05ac e221       | !  |		Load	0x1,0x21
05ad 8006       |    |		Call	0x0,0x6
05ae e219       |    |		Load	0x1,0x19
05af a220       |    |		Store_Unchecked	0x1,0x20
05b0 4800       |H   |		Short_Literal	0x0
05b1 a223       | #  |		Store_Unchecked	0x1,0x23
05b2 e21d       |    |		Load	0x1,0x1d
05b3 6809       |h   |		Jump_Zero	0x5bd
05b4 e21f       |    |		Load	0x1,0x1f
05b5 e21e       |    |		Load	0x1,0x1e
05b6 8237       | 7  |		Call	0x1,0x37
05b7 6805       |h   |		Jump_Zero	0x5bd
05b8 e21f       |    |		Load	0x1,0x1f
05b9 e21e       |    |		Load	0x1,0x1e
05ba 8006       |    |		Call	0x0,0x6
05bb e219       |    |		Load	0x1,0x19
05bc a21d       |    |		Store_Unchecked	0x1,0x1d
05bd 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
05be 0000 0000  |    |		.XXX[0x2]
05c0 ; --------------------------------------------------------------------------------------
05c0 ; SUBPROGRAM
05c0 ; --------------------------------------------------------------------------------------
05c0 05c3       |    |		.CONST	0x05c3								; Address of begin
05c1 0004       |    |		.CONST	0x0004								; Address of exception handler
05c2 0001       |    |		.CONST	0x0001								; Number of locals
05c3			BODY_05c0:
05c3			INIT_05c0:
05c3 e21d       |    |		Load	0x1,0x1d
05c4 680b       |h   |		Jump_Zero	0x5d0
05c5 e220       |    |		Load	0x1,0x20
05c6 6809       |h   |		Jump_Zero	0x5d0
05c7 00da       |    |		Load_Top	At_Offset_2
05c8 2607       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7
05c9 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
05ca a223       | #  |		Store_Unchecked	0x1,0x23
05cb 00da       |    |		Load_Top	At_Offset_2
05cc e222       | "  |		Load	0x1,0x22
05cd e221       | !  |		Load	0x1,0x21
05ce e220       |    |		Load	0x1,0x20
05cf 8235       | 5  |		Call	0x1,0x35
05d0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
05d1 0000 0000  |    |		.BLANK	0000[0x7]
05d8 ; --------------------------------------------------------------------------------------
05d8 ; SUBPROGRAM
05d8 ; --------------------------------------------------------------------------------------
05d8 05df       |    |		.CONST	0x05df								; Address of begin
05d9 0004       |    |		.CONST	0x0004								; Address of exception handler
05da 0003       |    |		.CONST	0x0003								; Number of locals
05db			INIT_05d8:
05db e00c       |    |		Load	0x0,0xc
05dc 0007       |    |		Action	Break_Optional
05dd e003       |    |		Load	0x0,0x3
05de 0007       |    |		Action	Break_Optional
05df			BODY_05d8:
05df e22d       | -  |		Load	0x1,0x2d
05e0 800f       |    |		Call	0x0,0xf
05e1 5822       |X"  |		Indirect_Literal	Float,0x604,1073741823.0
05e2 023b       | ;  |		Execute	Float,Times
05e3 0235       | 5  |		Execute	Float,Round_To_Discrete
05e4 e003       |    |		Load	0x0,0x3
05e5 025e       | ^  |		Execute	Discrete,Convert
05e6 4890       |H   |		Short_Literal	0x90
05e7 026f       | o  |		Execute	Discrete,Remainder
05e8 0059       | Y  |		Store_Top	Discrete,At_Offset_1
05e9 00cf       |    |		Action	Mark_Auxiliary
05ea 7809       |x   |		Jump	0x5f4
05eb 00d9       |    |		Load_Top	At_Offset_1
05ec 0a01       |    |		Execute_Immediate	Plus,0x1
05ed 005a       | Z  |		Store_Top	Discrete,At_Offset_2
05ee 00d9       |    |		Load_Top	At_Offset_1
05ef 0f90       |    |		Execute_Immediate	Equal,-0x70
05f0 6802       |h   |		Jump_Zero	0x5f3
05f1 4800       |H   |		Short_Literal	0x0
05f2 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
05f3 00c9       |    |		Action	Pop_Auxiliary_Loop
05f4 00d9       |    |		Load_Top	At_Offset_1
05f5 e5ff       |    |		Load	0x2,-0x1
05f6 01d7       |    |		Execute	Vector,Field_Read
05f7 6ff3       |o   |		Jump_Zero	0x5eb
05f8 00ce       |    |		Action	Pop_Auxiliary
05f9 00d8       |    |		Load_Top	At_Offset_0
05fa e5ff       |    |		Load	0x2,-0x1
05fb 01d7       |    |		Execute	Vector,Field_Read
05fc 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
05fd 4800       |H   |		Short_Literal	0x0
05fe 00d9       |    |		Load_Top	At_Offset_1
05ff e5ff       |    |		Load	0x2,-0x1
0600 01d6       |    |		Execute	Vector,Field_Write
0601 00d9       |    |		Load_Top	At_Offset_1
0602 a5fe       |    |		Store_Unchecked	0x2,-0x2
0603 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0604 41cf ffff  |A   |		.DBL	1073741823.0
0606 ff80 0000  |    |
0608 ; --------------------------------------------------------------------------------------
0608 ; SUBPROGRAM
0608 ; --------------------------------------------------------------------------------------
0608 060b       |    |		.CONST	0x060b								; Address of begin
0609 0004       |    |		.CONST	0x0004								; Address of exception handler
060a 0001       |    |		.CONST	0x0001								; Number of locals
060b			BODY_0608:
060b			INIT_0608:
060b 00da       |    |		Load_Top	At_Offset_2
060c 0229       | )  |		Execute	Access,All_Read
060d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
060e e00c       |    |		Load	0x0,0xc
060f e5fe       |    |		Load	0x2,-0x2
0610 822e       | .  |		Call	0x1,0x2e
0611 00d1       |    |		Pop_Control	Pop_Count_1
0612 4800       |H   |		Short_Literal	0x0
0613 00da       |    |		Load_Top	At_Offset_2
0614 01d6       |    |		Execute	Vector,Field_Write
0615 00d1       |    |		Pop_Control	Pop_Count_1
0616 4801       |H   |		Short_Literal	0x1
0617 00db       |    |		Load_Top	At_Offset_3
0618 0227       | '  |		Execute	Access,All_Reference
0619 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
061a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
061b 0000 0000  |    |		.BLANK	0000[0x5]
0620 ; --------------------------------------------------------------------------------------
0620 ; SUBPROGRAM
0620 ; --------------------------------------------------------------------------------------
0620 0623       | #  |		.CONST	0x0623								; Address of begin
0621 0004       |    |		.CONST	0x0004								; Address of exception handler
0622 0001       |    |		.CONST	0x0001								; Number of locals
0623			BODY_0620:
0623			INIT_0620:
0623 00da       |    |		Load_Top	At_Offset_2
0624 0229       | )  |		Execute	Access,All_Read
0625 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0626 e00c       |    |		Load	0x0,0xc
0627 e5fe       |    |		Load	0x2,-0x2
0628 822e       | .  |		Call	0x1,0x2e
0629 00d1       |    |		Pop_Control	Pop_Count_1
062a 4800       |H   |		Short_Literal	0x0
062b 00da       |    |		Load_Top	At_Offset_2
062c 01d6       |    |		Execute	Vector,Field_Write
062d 00d1       |    |		Pop_Control	Pop_Count_1
062e 00da       |    |		Load_Top	At_Offset_2
062f 0229       | )  |		Execute	Access,All_Read
0630 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0631 e00c       |    |		Load	0x0,0xc
0632 e5fe       |    |		Load	0x2,-0x2
0633 822e       | .  |		Call	0x1,0x2e
0634 00d1       |    |		Pop_Control	Pop_Count_1
0635 4801       |H   |		Short_Literal	0x1
0636 00da       |    |		Load_Top	At_Offset_2
0637 01d6       |    |		Execute	Vector,Field_Write
0638 00d1       |    |		Pop_Control	Pop_Count_1
0639 4802       |H   |		Short_Literal	0x2
063a 00db       |    |		Load_Top	At_Offset_3
063b 0227       | '  |		Execute	Access,All_Reference
063c 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
063d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
063e 0000 0000  |    |		.XXX[0x2]
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 0643       | C  |		.CONST	0x0643								; Address of begin
0641 0004       |    |		.CONST	0x0004								; Address of exception handler
0642 0001       |    |		.CONST	0x0001								; Number of locals
0643			BODY_0640:
0643			INIT_0640:
0643 00da       |    |		Load_Top	At_Offset_2
0644 0229       | )  |		Execute	Access,All_Read
0645 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0646 e00c       |    |		Load	0x0,0xc
0647 e5fe       |    |		Load	0x2,-0x2
0648 822e       | .  |		Call	0x1,0x2e
0649 00d1       |    |		Pop_Control	Pop_Count_1
064a 4800       |H   |		Short_Literal	0x0
064b 00da       |    |		Load_Top	At_Offset_2
064c 01d6       |    |		Execute	Vector,Field_Write
064d 00d1       |    |		Pop_Control	Pop_Count_1
064e 00da       |    |		Load_Top	At_Offset_2
064f 0229       | )  |		Execute	Access,All_Read
0650 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0651 e00c       |    |		Load	0x0,0xc
0652 e5fe       |    |		Load	0x2,-0x2
0653 822e       | .  |		Call	0x1,0x2e
0654 00d1       |    |		Pop_Control	Pop_Count_1
0655 4801       |H   |		Short_Literal	0x1
0656 00da       |    |		Load_Top	At_Offset_2
0657 01d6       |    |		Execute	Vector,Field_Write
0658 00d1       |    |		Pop_Control	Pop_Count_1
0659 00da       |    |		Load_Top	At_Offset_2
065a 0229       | )  |		Execute	Access,All_Read
065b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
065c e00c       |    |		Load	0x0,0xc
065d e5fe       |    |		Load	0x2,-0x2
065e 822e       | .  |		Call	0x1,0x2e
065f 00d1       |    |		Pop_Control	Pop_Count_1
0660 4802       |H   |		Short_Literal	0x2
0661 00da       |    |		Load_Top	At_Offset_2
0662 01d6       |    |		Execute	Vector,Field_Write
0663 00d1       |    |		Pop_Control	Pop_Count_1
0664 4803       |H   |		Short_Literal	0x3
0665 00db       |    |		Load_Top	At_Offset_3
0666 0227       | '  |		Execute	Access,All_Reference
0667 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0668 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0669 0000 0000  |    |		.BLANK	0000[0x7]
0670 ; --------------------------------------------------------------------------------------
0670 ; SUBPROGRAM
0670 ; --------------------------------------------------------------------------------------
0670 0673       | s  |		.CONST	0x0673								; Address of begin
0671 0004       |    |		.CONST	0x0004								; Address of exception handler
0672 0001       |    |		.CONST	0x0001								; Number of locals
0673			BODY_0670:
0673			INIT_0670:
0673 00da       |    |		Load_Top	At_Offset_2
0674 0229       | )  |		Execute	Access,All_Read
0675 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0676 e00c       |    |		Load	0x0,0xc
0677 e5fe       |    |		Load	0x2,-0x2
0678 822e       | .  |		Call	0x1,0x2e
0679 00d1       |    |		Pop_Control	Pop_Count_1
067a 4800       |H   |		Short_Literal	0x0
067b 00da       |    |		Load_Top	At_Offset_2
067c 01d6       |    |		Execute	Vector,Field_Write
067d 00d1       |    |		Pop_Control	Pop_Count_1
067e 00da       |    |		Load_Top	At_Offset_2
067f 0229       | )  |		Execute	Access,All_Read
0680 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0681 e00c       |    |		Load	0x0,0xc
0682 e5fe       |    |		Load	0x2,-0x2
0683 822e       | .  |		Call	0x1,0x2e
0684 00d1       |    |		Pop_Control	Pop_Count_1
0685 4801       |H   |		Short_Literal	0x1
0686 00da       |    |		Load_Top	At_Offset_2
0687 01d6       |    |		Execute	Vector,Field_Write
0688 00d1       |    |		Pop_Control	Pop_Count_1
0689 00da       |    |		Load_Top	At_Offset_2
068a 0229       | )  |		Execute	Access,All_Read
068b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
068c e00c       |    |		Load	0x0,0xc
068d e5fe       |    |		Load	0x2,-0x2
068e 822e       | .  |		Call	0x1,0x2e
068f 00d1       |    |		Pop_Control	Pop_Count_1
0690 4802       |H   |		Short_Literal	0x2
0691 00da       |    |		Load_Top	At_Offset_2
0692 01d6       |    |		Execute	Vector,Field_Write
0693 00d1       |    |		Pop_Control	Pop_Count_1
0694 00da       |    |		Load_Top	At_Offset_2
0695 0229       | )  |		Execute	Access,All_Read
0696 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0697 e00c       |    |		Load	0x0,0xc
0698 e5fe       |    |		Load	0x2,-0x2
0699 822e       | .  |		Call	0x1,0x2e
069a 00d1       |    |		Pop_Control	Pop_Count_1
069b 4803       |H   |		Short_Literal	0x3
069c 00da       |    |		Load_Top	At_Offset_2
069d 01d6       |    |		Execute	Vector,Field_Write
069e 00d1       |    |		Pop_Control	Pop_Count_1
069f 4804       |H   |		Short_Literal	0x4
06a0 00db       |    |		Load_Top	At_Offset_3
06a1 0227       | '  |		Execute	Access,All_Reference
06a2 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
06a3 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
06a4 0000 0000  |    |		.BLANK	0000[0x4]
06a8 ; --------------------------------------------------------------------------------------
06a8 ; SUBPROGRAM
06a8 ; --------------------------------------------------------------------------------------
06a8 06b0       |    |		.CONST	0x06b0								; Address of begin
06a9 0004       |    |		.CONST	0x0004								; Address of exception handler
06aa 0002       |    |		.CONST	0x0002								; Number of locals
06ab			INIT_06a8:
06ab 00db       |    |		Load_Top	At_Offset_3
06ac 00db       |    |		Load_Top	At_Offset_3
06ad e21b       |    |		Load	0x1,0x1b
06ae 01a5       |    |		Execute	Matrix,Field_Reference
06af 0007       |    |		Action	Break_Optional
06b0			BODY_06a8:
06b0 00d8       |    |		Load_Top	At_Offset_0
06b1 0227       | '  |		Execute	Access,All_Reference
06b2 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
06b3 6804       |h   |		Jump_Zero	0x6b8
06b4 00d8       |    |		Load_Top	At_Offset_0
06b5 0227       | '  |		Execute	Access,All_Reference
06b6 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
06b7 6801       |h   |		Jump_Zero	0x6b9
06b8 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
06b9 4801       |H   |		Short_Literal	0x1
06ba 00d9       |    |		Load_Top	At_Offset_1
06bb 0227       | '  |		Execute	Access,All_Reference
06bc 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
06bd e5fe       |    |		Load	0x2,-0x2
06be 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
06bf 6815       |h   |		Jump_Zero	0x6d5
06c0 e5fe       |    |		Load	0x2,-0x2
06c1 0aff       |    |		Execute_Immediate	Plus,-0x1
06c2 e5ff       |    |		Load	0x2,-0x1
06c3 e21b       |    |		Load	0x1,0x1b
06c4 01a7       |    |		Execute	Matrix,Field_Read
06c5 0227       | '  |		Execute	Access,All_Reference
06c6 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
06c7 00d9       |    |		Load_Top	At_Offset_1
06c8 0227       | '  |		Execute	Access,All_Reference
06c9 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
06ca 027d       | }  |		Execute	Discrete,Greater
06cb 6809       |h   |		Jump_Zero	0x6d5
06cc e5fe       |    |		Load	0x2,-0x2
06cd 0aff       |    |		Execute_Immediate	Plus,-0x1
06ce 00d8       |    |		Load_Top	At_Offset_0
06cf e002       |    |		Load	0x0,0x2
06d0 0260       | `  |		Execute	Discrete,In_Type
06d1 7001       |p   |		Jump_Nonzero	0x6d3
06d2 0801       |    |		Execute_Immediate	Raise,0x1
06d3 e5ff       |    |		Load	0x2,-0x1
06d4 8233       | 3  |		Call	0x1,0x33
06d5 00db       |    |		Load_Top	At_Offset_3
06d6 0d07       |    |		Execute_Immediate	Less,0x7
06d7 6815       |h   |		Jump_Zero	0x6ed
06d8 e5fe       |    |		Load	0x2,-0x2
06d9 e5ff       |    |		Load	0x2,-0x1
06da 0a01       |    |		Execute_Immediate	Plus,0x1
06db e21b       |    |		Load	0x1,0x1b
06dc 01a7       |    |		Execute	Matrix,Field_Read
06dd 0227       | '  |		Execute	Access,All_Reference
06de 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
06df 00d9       |    |		Load_Top	At_Offset_1
06e0 0227       | '  |		Execute	Access,All_Reference
06e1 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
06e2 027d       | }  |		Execute	Discrete,Greater
06e3 6809       |h   |		Jump_Zero	0x6ed
06e4 e5fe       |    |		Load	0x2,-0x2
06e5 e5ff       |    |		Load	0x2,-0x1
06e6 0a01       |    |		Execute_Immediate	Plus,0x1
06e7 00d8       |    |		Load_Top	At_Offset_0
06e8 e002       |    |		Load	0x0,0x2
06e9 0260       | `  |		Execute	Discrete,In_Type
06ea 7001       |p   |		Jump_Nonzero	0x6ec
06eb 0801       |    |		Execute_Immediate	Raise,0x1
06ec 8233       | 3  |		Call	0x1,0x33
06ed 00db       |    |		Load_Top	At_Offset_3
06ee 0d07       |    |		Execute_Immediate	Less,0x7
06ef 681c       |h   |		Jump_Zero	0x70c
06f0 e5fe       |    |		Load	0x2,-0x2
06f1 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
06f2 6819       |h   |		Jump_Zero	0x70c
06f3 e5fe       |    |		Load	0x2,-0x2
06f4 0aff       |    |		Execute_Immediate	Plus,-0x1
06f5 e5ff       |    |		Load	0x2,-0x1
06f6 0a01       |    |		Execute_Immediate	Plus,0x1
06f7 e21b       |    |		Load	0x1,0x1b
06f8 01a7       |    |		Execute	Matrix,Field_Read
06f9 0227       | '  |		Execute	Access,All_Reference
06fa 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
06fb 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
06fc 680f       |h   |		Jump_Zero	0x70c
06fd e5fe       |    |		Load	0x2,-0x2
06fe 0aff       |    |		Execute_Immediate	Plus,-0x1
06ff 00d8       |    |		Load_Top	At_Offset_0
0700 e002       |    |		Load	0x0,0x2
0701 0260       | `  |		Execute	Discrete,In_Type
0702 7001       |p   |		Jump_Nonzero	0x704
0703 0801       |    |		Execute_Immediate	Raise,0x1
0704 e5ff       |    |		Load	0x2,-0x1
0705 0a01       |    |		Execute_Immediate	Plus,0x1
0706 00d8       |    |		Load_Top	At_Offset_0
0707 e002       |    |		Load	0x0,0x2
0708 0260       | `  |		Execute	Discrete,In_Type
0709 7001       |p   |		Jump_Nonzero	0x70b
070a 0801       |    |		Execute_Immediate	Raise,0x1
070b 8233       | 3  |		Call	0x1,0x33
070c 00db       |    |		Load_Top	At_Offset_3
070d 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
070e 681f       |h   |		Jump_Zero	0x72e
070f e5fe       |    |		Load	0x2,-0x2
0710 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0711 681c       |h   |		Jump_Zero	0x72e
0712 e5fe       |    |		Load	0x2,-0x2
0713 0aff       |    |		Execute_Immediate	Plus,-0x1
0714 e5ff       |    |		Load	0x2,-0x1
0715 0aff       |    |		Execute_Immediate	Plus,-0x1
0716 e21b       |    |		Load	0x1,0x1b
0717 01a7       |    |		Execute	Matrix,Field_Read
0718 0227       | '  |		Execute	Access,All_Reference
0719 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
071a 00d9       |    |		Load_Top	At_Offset_1
071b 0227       | '  |		Execute	Access,All_Reference
071c 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
071d 027e       | ~  |		Execute	Discrete,Not_Equal
071e 680f       |h   |		Jump_Zero	0x72e
071f e5fe       |    |		Load	0x2,-0x2
0720 0aff       |    |		Execute_Immediate	Plus,-0x1
0721 00d8       |    |		Load_Top	At_Offset_0
0722 e002       |    |		Load	0x0,0x2
0723 0260       | `  |		Execute	Discrete,In_Type
0724 7001       |p   |		Jump_Nonzero	0x726
0725 0801       |    |		Execute_Immediate	Raise,0x1
0726 e5ff       |    |		Load	0x2,-0x1
0727 0aff       |    |		Execute_Immediate	Plus,-0x1
0728 00d8       |    |		Load_Top	At_Offset_0
0729 e002       |    |		Load	0x0,0x2
072a 0260       | `  |		Execute	Discrete,In_Type
072b 7001       |p   |		Jump_Nonzero	0x72d
072c 0801       |    |		Execute_Immediate	Raise,0x1
072d 8233       | 3  |		Call	0x1,0x33
072e 00db       |    |		Load_Top	At_Offset_3
072f 0f03       |    |		Execute_Immediate	Equal,0x3
0730 7003       |p   |		Jump_Nonzero	0x734
0731 00db       |    |		Load_Top	At_Offset_3
0732 0f04       |    |		Execute_Immediate	Equal,0x4
0733 6810       |h   |		Jump_Zero	0x744
0734 e5fe       |    |		Load	0x2,-0x2
0735 0f06       |    |		Execute_Immediate	Equal,0x6
0736 7003       |p   |		Jump_Nonzero	0x73a
0737 e5fe       |    |		Load	0x2,-0x2
0738 0f07       |    |		Execute_Immediate	Equal,0x7
0739 6804       |h   |		Jump_Zero	0x73e
073a 480e       |H   |		Short_Literal	0xe
073b 4806       |H   |		Short_Literal	0x6
073c 8233       | 3  |		Call	0x1,0x33
073d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
073e e5fe       |    |		Load	0x2,-0x2
073f 0f01       |    |		Execute_Immediate	Equal,0x1
0740 6803       |h   |		Jump_Zero	0x744
0741 480e       |H   |		Short_Literal	0xe
0742 4804       |H   |		Short_Literal	0x4
0743 8233       | 3  |		Call	0x1,0x33
0744 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0745 0000 0000  |    |		.XXX[0x3]
0747 0000       |    |
0748 ; --------------------------------------------------------------------------------------
0748 ; SUBPROGRAM
0748 ; --------------------------------------------------------------------------------------
0748 074d       | M  |		.CONST	0x074d								; Address of begin
0749 0004       |    |		.CONST	0x0004								; Address of exception handler
074a 0002       |    |		.CONST	0x0002								; Number of locals
074b			INIT_0748:
074b 029f 0b13  |    |		Declare_Subprogram	INIT_0b10,For_Call
074d			BODY_0748:
074d 00db       |    |		Load_Top	At_Offset_3
074e 0227       | '  |		Execute	Access,All_Reference
074f 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0750 0f01       |    |		Execute_Immediate	Equal,0x1
0751 6852       |hR  |		Jump_Zero	0x7a4
0752 e010       |    |		Load	0x0,0x10
0753 e011       |    |		Load	0x0,0x11
0754 8012       |    |		Call	0x0,0x12
0755 682a       |h*  |		Jump_Zero	0x780
0756 4800       |H   |		Short_Literal	0x0
0757 e213       |    |		Load	0x1,0x13
0758 e217       |    |		Load	0x1,0x17
0759 0273       | s  |		Execute	Discrete,Plus
075a 0a02       |    |		Execute_Immediate	Plus,0x2
075b e215       |    |		Load	0x1,0x15
075c 0273       | s  |		Execute	Discrete,Plus
075d 00d8       |    |		Load_Top	At_Offset_0
075e e013       |    |		Load	0x0,0x13
075f 0260       | `  |		Execute	Discrete,In_Type
0760 7001       |p   |		Jump_Nonzero	0x762
0761 0801       |    |		Execute_Immediate	Raise,0x1
0762 e212       |    |		Load	0x1,0x12
0763 e216       |    |		Load	0x1,0x16
0764 0273       | s  |		Execute	Discrete,Plus
0765 0a02       |    |		Execute_Immediate	Plus,0x2
0766 e214       |    |		Load	0x1,0x14
0767 0273       | s  |		Execute	Discrete,Plus
0768 00d8       |    |		Load_Top	At_Offset_0
0769 e013       |    |		Load	0x0,0x13
076a 0260       | `  |		Execute	Discrete,In_Type
076b 7001       |p   |		Jump_Nonzero	0x76d
076c 0801       |    |		Execute_Immediate	Raise,0x1
076d e5ff       |    |		Load	0x2,-0x1
076e 0227       | '  |		Execute	Access,All_Reference
076f 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0770 e217       |    |		Load	0x1,0x17
0771 0272       | r  |		Execute	Discrete,Minus
0772 e215       |    |		Load	0x1,0x15
0773 0272       | r  |		Execute	Discrete,Minus
0774 00d8       |    |		Load_Top	At_Offset_0
0775 e002       |    |		Load	0x0,0x2
0776 0260       | `  |		Execute	Discrete,In_Type
0777 7001       |p   |		Jump_Nonzero	0x779
0778 0801       |    |		Execute_Immediate	Raise,0x1
0779 e5ff       |    |		Load	0x2,-0x1
077a 0227       | '  |		Execute	Access,All_Reference
077b 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
077c e007       |    |		Load	0x0,0x7
077d e008       |    |		Load	0x0,0x8
077e 8009       |    |		Call	0x0,0x9
077f 7825       |x%  |		Jump	0x7a5
0780 4800       |H   |		Short_Literal	0x0
0781 e213       |    |		Load	0x1,0x13
0782 e217       |    |		Load	0x1,0x17
0783 0273       | s  |		Execute	Discrete,Plus
0784 0a02       |    |		Execute_Immediate	Plus,0x2
0785 00d8       |    |		Load_Top	At_Offset_0
0786 e013       |    |		Load	0x0,0x13
0787 0260       | `  |		Execute	Discrete,In_Type
0788 7001       |p   |		Jump_Nonzero	0x78a
0789 0801       |    |		Execute_Immediate	Raise,0x1
078a e212       |    |		Load	0x1,0x12
078b e216       |    |		Load	0x1,0x16
078c 0273       | s  |		Execute	Discrete,Plus
078d 0a02       |    |		Execute_Immediate	Plus,0x2
078e 00d8       |    |		Load_Top	At_Offset_0
078f e013       |    |		Load	0x0,0x13
0790 0260       | `  |		Execute	Discrete,In_Type
0791 7001       |p   |		Jump_Nonzero	0x793
0792 0801       |    |		Execute_Immediate	Raise,0x1
0793 e5ff       |    |		Load	0x2,-0x1
0794 0227       | '  |		Execute	Access,All_Reference
0795 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0796 e217       |    |		Load	0x1,0x17
0797 0272       | r  |		Execute	Discrete,Minus
0798 00d8       |    |		Load_Top	At_Offset_0
0799 e002       |    |		Load	0x0,0x2
079a 0260       | `  |		Execute	Discrete,In_Type
079b 7001       |p   |		Jump_Nonzero	0x79d
079c 0801       |    |		Execute_Immediate	Raise,0x1
079d e5ff       |    |		Load	0x2,-0x1
079e 0227       | '  |		Execute	Access,All_Reference
079f 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
07a0 e007       |    |		Load	0x0,0x7
07a1 e008       |    |		Load	0x0,0x8
07a2 8009       |    |		Call	0x0,0x9
07a3 7801       |x   |		Jump	0x7a5
07a4 8402       |    |		Call	0x2,0x2
07a5 00db       |    |		Load_Top	At_Offset_3
07a6 0227       | '  |		Execute	Access,All_Reference
07a7 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
07a8 0aff       |    |		Execute_Immediate	Plus,-0x1
07a9 e5ff       |    |		Load	0x2,-0x1
07aa 0227       | '  |		Execute	Access,All_Reference
07ab 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
07ac e5fd       |    |		Load	0x2,-0x3
07ad 0f0e       |    |		Execute_Immediate	Equal,0xe
07ae 6831       |h1  |		Jump_Zero	0x7e0
07af e5fe       |    |		Load	0x2,-0x2
07b0 0f06       |    |		Execute_Immediate	Equal,0x6
07b1 680d       |h   |		Jump_Zero	0x7bf
07b2 4806       |H   |		Short_Literal	0x6
07b3 4803       |H   |		Short_Literal	0x3
07b4 8233       | 3  |		Call	0x1,0x33
07b5 4807       |H   |		Short_Literal	0x7
07b6 4803       |H   |		Short_Literal	0x3
07b7 8233       | 3  |		Call	0x1,0x33
07b8 4806       |H   |		Short_Literal	0x6
07b9 4804       |H   |		Short_Literal	0x4
07ba 8233       | 3  |		Call	0x1,0x33
07bb 4807       |H   |		Short_Literal	0x7
07bc 4804       |H   |		Short_Literal	0x4
07bd 8233       | 3  |		Call	0x1,0x33
07be 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
07bf e5fe       |    |		Load	0x2,-0x2
07c0 0f04       |    |		Execute_Immediate	Equal,0x4
07c1 6807       |h   |		Jump_Zero	0x7c9
07c2 4801       |H   |		Short_Literal	0x1
07c3 4803       |H   |		Short_Literal	0x3
07c4 8233       | 3  |		Call	0x1,0x33
07c5 4801       |H   |		Short_Literal	0x1
07c6 4804       |H   |		Short_Literal	0x4
07c7 8233       | 3  |		Call	0x1,0x33
07c8 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
07c9 e5fe       |    |		Load	0x2,-0x2
07ca 0f02       |    |		Execute_Immediate	Equal,0x2
07cb 680a       |h   |		Jump_Zero	0x7d6
07cc 480e       |H   |		Short_Literal	0xe
07cd 4800       |H   |		Short_Literal	0x0
07ce 8233       | 3  |		Call	0x1,0x33
07cf 480c       |H   |		Short_Literal	0xc
07d0 4803       |H   |		Short_Literal	0x3
07d1 8233       | 3  |		Call	0x1,0x33
07d2 480c       |H   |		Short_Literal	0xc
07d3 4804       |H   |		Short_Literal	0x4
07d4 8233       | 3  |		Call	0x1,0x33
07d5 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
07d6 480e       |H   |		Short_Literal	0xe
07d7 4802       |H   |		Short_Literal	0x2
07d8 8233       | 3  |		Call	0x1,0x33
07d9 480c       |H   |		Short_Literal	0xc
07da 4803       |H   |		Short_Literal	0x3
07db 8233       | 3  |		Call	0x1,0x33
07dc 480c       |H   |		Short_Literal	0xc
07dd 4804       |H   |		Short_Literal	0x4
07de 8233       | 3  |		Call	0x1,0x33
07df 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
07e0 e5fd       |    |		Load	0x2,-0x3
07e1 0f01       |    |		Execute_Immediate	Equal,0x1
07e2 6809       |h   |		Jump_Zero	0x7ec
07e3 e5fe       |    |		Load	0x2,-0x2
07e4 0f03       |    |		Execute_Immediate	Equal,0x3
07e5 7003       |p   |		Jump_Nonzero	0x7e9
07e6 e5fe       |    |		Load	0x2,-0x2
07e7 0f04       |    |		Execute_Immediate	Equal,0x4
07e8 6803       |h   |		Jump_Zero	0x7ec
07e9 480e       |H   |		Short_Literal	0xe
07ea 4804       |H   |		Short_Literal	0x4
07eb 8233       | 3  |		Call	0x1,0x33
07ec e5fd       |    |		Load	0x2,-0x3
07ed 0f0c       |    |		Execute_Immediate	Equal,0xc
07ee 6809       |h   |		Jump_Zero	0x7f8
07ef e5fe       |    |		Load	0x2,-0x2
07f0 0f03       |    |		Execute_Immediate	Equal,0x3
07f1 7003       |p   |		Jump_Nonzero	0x7f5
07f2 e5fe       |    |		Load	0x2,-0x2
07f3 0f04       |    |		Execute_Immediate	Equal,0x4
07f4 6803       |h   |		Jump_Zero	0x7f8
07f5 480e       |H   |		Short_Literal	0xe
07f6 4802       |H   |		Short_Literal	0x2
07f7 8233       | 3  |		Call	0x1,0x33
07f8 e5fe       |    |		Load	0x2,-0x2
07f9 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
07fa 6832       |h2  |		Jump_Zero	0x82d
07fb e5fd       |    |		Load	0x2,-0x3
07fc 0a01       |    |		Execute_Immediate	Plus,0x1
07fd 00d8       |    |		Load_Top	At_Offset_0
07fe e002       |    |		Load	0x0,0x2
07ff 0260       | `  |		Execute	Discrete,In_Type
0800 7001       |p   |		Jump_Nonzero	0x802
0801 0801       |    |		Execute_Immediate	Raise,0x1
0802 e5fe       |    |		Load	0x2,-0x2
0803 0aff       |    |		Execute_Immediate	Plus,-0x1
0804 00d8       |    |		Load_Top	At_Offset_0
0805 e002       |    |		Load	0x0,0x2
0806 0260       | `  |		Execute	Discrete,In_Type
0807 7001       |p   |		Jump_Nonzero	0x809
0808 0801       |    |		Execute_Immediate	Raise,0x1
0809 8233       | 3  |		Call	0x1,0x33
080a e5fd       |    |		Load	0x2,-0x3
080b e5fe       |    |		Load	0x2,-0x2
080c 0aff       |    |		Execute_Immediate	Plus,-0x1
080d 00d8       |    |		Load_Top	At_Offset_0
080e e002       |    |		Load	0x0,0x2
080f 0260       | `  |		Execute	Discrete,In_Type
0810 7001       |p   |		Jump_Nonzero	0x812
0811 0801       |    |		Execute_Immediate	Raise,0x1
0812 8233       | 3  |		Call	0x1,0x33
0813 e5fd       |    |		Load	0x2,-0x3
0814 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0815 6817       |h   |		Jump_Zero	0x82d
0816 e5fd       |    |		Load	0x2,-0x3
0817 e5fe       |    |		Load	0x2,-0x2
0818 0aff       |    |		Execute_Immediate	Plus,-0x1
0819 e21b       |    |		Load	0x1,0x1b
081a 01a7       |    |		Execute	Matrix,Field_Read
081b 0227       | '  |		Execute	Access,All_Reference
081c 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
081d 700f       |p   |		Jump_Nonzero	0x82d
081e e5fd       |    |		Load	0x2,-0x3
081f 0aff       |    |		Execute_Immediate	Plus,-0x1
0820 00d8       |    |		Load_Top	At_Offset_0
0821 e002       |    |		Load	0x0,0x2
0822 0260       | `  |		Execute	Discrete,In_Type
0823 7001       |p   |		Jump_Nonzero	0x825
0824 0801       |    |		Execute_Immediate	Raise,0x1
0825 e5fe       |    |		Load	0x2,-0x2
0826 0aff       |    |		Execute_Immediate	Plus,-0x1
0827 00d8       |    |		Load_Top	At_Offset_0
0828 e002       |    |		Load	0x0,0x2
0829 0260       | `  |		Execute	Discrete,In_Type
082a 7001       |p   |		Jump_Nonzero	0x82c
082b 0801       |    |		Execute_Immediate	Raise,0x1
082c 8233       | 3  |		Call	0x1,0x33
082d e5fd       |    |		Load	0x2,-0x3
082e 0a01       |    |		Execute_Immediate	Plus,0x1
082f 00d8       |    |		Load_Top	At_Offset_0
0830 e002       |    |		Load	0x0,0x2
0831 0260       | `  |		Execute	Discrete,In_Type
0832 7001       |p   |		Jump_Nonzero	0x834
0833 0801       |    |		Execute_Immediate	Raise,0x1
0834 e5fe       |    |		Load	0x2,-0x2
0835 8233       | 3  |		Call	0x1,0x33
0836 e5fd       |    |		Load	0x2,-0x3
0837 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0838 6809       |h   |		Jump_Zero	0x842
0839 e5fd       |    |		Load	0x2,-0x3
083a 0aff       |    |		Execute_Immediate	Plus,-0x1
083b 00d8       |    |		Load_Top	At_Offset_0
083c e002       |    |		Load	0x0,0x2
083d 0260       | `  |		Execute	Discrete,In_Type
083e 7001       |p   |		Jump_Nonzero	0x840
083f 0801       |    |		Execute_Immediate	Raise,0x1
0840 e5fe       |    |		Load	0x2,-0x2
0841 8233       | 3  |		Call	0x1,0x33
0842 e5fe       |    |		Load	0x2,-0x2
0843 0d07       |    |		Execute_Immediate	Less,0x7
0844 681b       |h   |		Jump_Zero	0x860
0845 e5fd       |    |		Load	0x2,-0x3
0846 e5fe       |    |		Load	0x2,-0x2
0847 0a01       |    |		Execute_Immediate	Plus,0x1
0848 00d8       |    |		Load_Top	At_Offset_0
0849 e002       |    |		Load	0x0,0x2
084a 0260       | `  |		Execute	Discrete,In_Type
084b 7001       |p   |		Jump_Nonzero	0x84d
084c 0801       |    |		Execute_Immediate	Raise,0x1
084d 8233       | 3  |		Call	0x1,0x33
084e e5fd       |    |		Load	0x2,-0x3
084f 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0850 680f       |h   |		Jump_Zero	0x860
0851 e5fd       |    |		Load	0x2,-0x3
0852 0aff       |    |		Execute_Immediate	Plus,-0x1
0853 00d8       |    |		Load_Top	At_Offset_0
0854 e002       |    |		Load	0x0,0x2
0855 0260       | `  |		Execute	Discrete,In_Type
0856 7001       |p   |		Jump_Nonzero	0x858
0857 0801       |    |		Execute_Immediate	Raise,0x1
0858 e5fe       |    |		Load	0x2,-0x2
0859 0a01       |    |		Execute_Immediate	Plus,0x1
085a 00d8       |    |		Load_Top	At_Offset_0
085b e002       |    |		Load	0x0,0x2
085c 0260       | `  |		Execute	Discrete,In_Type
085d 7001       |p   |		Jump_Nonzero	0x85f
085e 0801       |    |		Execute_Immediate	Raise,0x1
085f 8233       | 3  |		Call	0x1,0x33
0860 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0861 0000 0000  |    |		.BLANK	0000[0x7]
0868 ; --------------------------------------------------------------------------------------
0868 ; SUBPROGRAM
0868 ; --------------------------------------------------------------------------------------
0868 086d       | m  |		.CONST	0x086d								; Address of begin
0869 0004       |    |		.CONST	0x0004								; Address of exception handler
086a 0002       |    |		.CONST	0x0002								; Number of locals
086b			INIT_0868:
086b 029f 0b83  |    |		Declare_Subprogram	INIT_0b80,For_Call
086d			BODY_0868:
086d e21d       |    |		Load	0x1,0x1d
086e 700a       |p   |		Jump_Nonzero	0x879
086f 00db       |    |		Load_Top	At_Offset_3
0870 a21d       |    |		Store_Unchecked	0x1,0x1d
0871 e5fe       |    |		Load	0x2,-0x2
0872 a21e       |    |		Store_Unchecked	0x1,0x1e
0873 e5fd       |    |		Load	0x2,-0x3
0874 a21f       |    |		Store_Unchecked	0x1,0x1f
0875 e5fd       |    |		Load	0x2,-0x3
0876 e5fe       |    |		Load	0x2,-0x2
0877 8006       |    |		Call	0x0,0x6
0878 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0879 e21d       |    |		Load	0x1,0x1d
087a e5ff       |    |		Load	0x2,-0x1
087b 022e       | .  |		Execute	Access,Not_Equal
087c 682b       |h+  |		Jump_Zero	0x8a8
087d e221       | !  |		Load	0x1,0x21
087e e5fe       |    |		Load	0x2,-0x2
087f 027f       |    |		Execute	Discrete,Equal
0880 680f       |h   |		Jump_Zero	0x890
0881 e222       | "  |		Load	0x1,0x22
0882 e5fd       |    |		Load	0x2,-0x3
0883 027f       |    |		Execute	Discrete,Equal
0884 680b       |h   |		Jump_Zero	0x890
0885 e223       | #  |		Load	0x1,0x23
0886 e00e       |    |		Load	0x0,0xe
0887 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0888 0273       | s  |		Execute	Discrete,Plus
0889 e5fc       |    |		Load	0x2,-0x4
088a 2607       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7
088b 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
088c 027b       | {  |		Execute	Discrete,Greater_Equal
088d 6802       |h   |		Jump_Zero	0x890
088e 00db       |    |		Load_Top	At_Offset_3
088f a220       |    |		Store_Unchecked	0x1,0x20
0890 e220       |    |		Load	0x1,0x20
0891 700e       |p   |		Jump_Nonzero	0x8a0
0892 00db       |    |		Load_Top	At_Offset_3
0893 a220       |    |		Store_Unchecked	0x1,0x20
0894 e5fe       |    |		Load	0x2,-0x2
0895 a221       | !  |		Store_Unchecked	0x1,0x21
0896 e5fd       |    |		Load	0x2,-0x3
0897 a222       | "  |		Store_Unchecked	0x1,0x22
0898 e5fc       |    |		Load	0x2,-0x4
0899 2607       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7
089a 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
089b a223       | #  |		Store_Unchecked	0x1,0x23
089c e5fd       |    |		Load	0x2,-0x3
089d e5fe       |    |		Load	0x2,-0x2
089e 8006       |    |		Call	0x0,0x6
089f 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
08a0 e220       |    |		Load	0x1,0x20
08a1 e5ff       |    |		Load	0x2,-0x1
08a2 022e       | .  |		Execute	Access,Not_Equal
08a3 6804       |h   |		Jump_Zero	0x8a8
08a4 4800       |H   |		Short_Literal	0x0
08a5 e008       |    |		Load	0x0,0x8
08a6 8014       |    |		Call	0x0,0x14
08a7 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
08a8 e220       |    |		Load	0x1,0x20
08a9 681c       |h   |		Jump_Zero	0x8c6
08aa e223       | #  |		Load	0x1,0x23
08ab e00e       |    |		Load	0x0,0xe
08ac 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
08ad 0273       | s  |		Execute	Discrete,Plus
08ae e5fc       |    |		Load	0x2,-0x4
08af 2607       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7
08b0 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
08b1 027b       | {  |		Execute	Discrete,Greater_Equal
08b2 6813       |h   |		Jump_Zero	0x8c6
08b3 4800       |H   |		Short_Literal	0x0
08b4 a21c       |    |		Store_Unchecked	0x1,0x1c
08b5 e21f       |    |		Load	0x1,0x1f
08b6 e21e       |    |		Load	0x1,0x1e
08b7 e21d       |    |		Load	0x1,0x1d
08b8 8234       | 4  |		Call	0x1,0x34
08b9 e219       |    |		Load	0x1,0x19
08ba a21d       |    |		Store_Unchecked	0x1,0x1d
08bb e222       | "  |		Load	0x1,0x22
08bc e221       | !  |		Load	0x1,0x21
08bd e220       |    |		Load	0x1,0x20
08be 8234       | 4  |		Call	0x1,0x34
08bf e219       |    |		Load	0x1,0x19
08c0 a220       |    |		Store_Unchecked	0x1,0x20
08c1 e20f       |    |		Load	0x1,0xf
08c2 0afe       |    |		Execute_Immediate	Plus,-0x2
08c3 c20f       |    |		Store	0x1,0xf
08c4 8015       |    |		Call	0x0,0x15
08c5 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
08c6 e21d       |    |		Load	0x1,0x1d
08c7 e5ff       |    |		Load	0x2,-0x1
08c8 022f       | /  |		Execute	Access,Equal
08c9 6802       |h   |		Jump_Zero	0x8cc
08ca 8402       |    |		Call	0x2,0x2
08cb 7805       |x   |		Jump	0x8d1
08cc e219       |    |		Load	0x1,0x19
08cd a220       |    |		Store_Unchecked	0x1,0x20
08ce e222       | "  |		Load	0x1,0x22
08cf e221       | !  |		Load	0x1,0x21
08d0 8006       |    |		Call	0x0,0x6
08d1 e5fc       |    |		Load	0x2,-0x4
08d2 2607       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7
08d3 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
08d4 a223       | #  |		Store_Unchecked	0x1,0x23
08d5 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
08d6 0000 0000  |    |		.XXX[0x2]
08d8 ; --------------------------------------------------------------------------------------
08d8 ; SUBPROGRAM
08d8 ; --------------------------------------------------------------------------------------
08d8 08f1       |    |		.CONST	0x08f1								; Address of begin
08d9 0004       |    |		.CONST	0x0004								; Address of exception handler
08da 0003       |    |		.CONST	0x0003								; Number of locals
08db			INIT_08d8:
08db 00da       |    |		Load_Top	At_Offset_2
08dc 0227       | '  |		Execute	Access,All_Reference
08dd 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
08de 00db       |    |		Load_Top	At_Offset_3
08df 0227       | '  |		Execute	Access,All_Reference
08e0 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
08e1 e216       |    |		Load	0x1,0x16
08e2 0271       | q  |		Execute	Discrete,Times
08e3 0273       | s  |		Execute	Discrete,Plus
08e4 e002       |    |		Load	0x0,0x2
08e5 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
08e6 00db       |    |		Load_Top	At_Offset_3
08e7 0227       | '  |		Execute	Access,All_Reference
08e8 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
08e9 e5ff       |    |		Load	0x2,-0x1
08ea 0227       | '  |		Execute	Access,All_Reference
08eb 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
08ec e217       |    |		Load	0x1,0x17
08ed 0271       | q  |		Execute	Discrete,Times
08ee 0272       | r  |		Execute	Discrete,Minus
08ef e002       |    |		Load	0x0,0x2
08f0 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
08f1			BODY_08d8:
08f1 e5ff       |    |		Load	0x2,-0x1
08f2 0227       | '  |		Execute	Access,All_Reference
08f3 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
08f4 7002       |p   |		Jump_Nonzero	0x8f7
08f5 4800       |H   |		Short_Literal	0x0
08f6 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
08f7 e5fe       |    |		Load	0x2,-0x2
08f8 2607       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7
08f9 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
08fa 00da       |    |		Load_Top	At_Offset_2
08fb 027b       | {  |		Execute	Discrete,Greater_Equal
08fc 681a       |h   |		Jump_Zero	0x917
08fd e5fe       |    |		Load	0x2,-0x2
08fe 2607       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7
08ff 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0900 00da       |    |		Load_Top	At_Offset_2
0901 e212       |    |		Load	0x1,0x12
0902 0273       | s  |		Execute	Discrete,Plus
0903 0a01       |    |		Execute_Immediate	Plus,0x1
0904 027a       | z  |		Execute	Discrete,Less_Equal
0905 6811       |h   |		Jump_Zero	0x917
0906 e5fe       |    |		Load	0x2,-0x2
0907 2607       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7
0908 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
0909 00d9       |    |		Load_Top	At_Offset_1
090a 027b       | {  |		Execute	Discrete,Greater_Equal
090b 680b       |h   |		Jump_Zero	0x917
090c e5fe       |    |		Load	0x2,-0x2
090d 2607       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7
090e 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
090f 00d9       |    |		Load_Top	At_Offset_1
0910 e213       |    |		Load	0x1,0x13
0911 0273       | s  |		Execute	Discrete,Plus
0912 0a01       |    |		Execute_Immediate	Plus,0x1
0913 027a       | z  |		Execute	Discrete,Less_Equal
0914 6802       |h   |		Jump_Zero	0x917
0915 4801       |H   |		Short_Literal	0x1
0916 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0917 e5fe       |    |		Load	0x2,-0x2
0918 2607       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7
0919 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
091a e5ff       |    |		Load	0x2,-0x1
091b 0227       | '  |		Execute	Access,All_Reference
091c 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
091d 027b       | {  |		Execute	Discrete,Greater_Equal
091e 6820       |h   |		Jump_Zero	0x93f
091f e5fe       |    |		Load	0x2,-0x2
0920 2607       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7
0921 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0922 e5ff       |    |		Load	0x2,-0x1
0923 0227       | '  |		Execute	Access,All_Reference
0924 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0925 e212       |    |		Load	0x1,0x12
0926 0273       | s  |		Execute	Discrete,Plus
0927 0a01       |    |		Execute_Immediate	Plus,0x1
0928 027a       | z  |		Execute	Discrete,Less_Equal
0929 6815       |h   |		Jump_Zero	0x93f
092a e5fe       |    |		Load	0x2,-0x2
092b 2607       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7
092c 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
092d e5ff       |    |		Load	0x2,-0x1
092e 0227       | '  |		Execute	Access,All_Reference
092f 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0930 027b       | {  |		Execute	Discrete,Greater_Equal
0931 680d       |h   |		Jump_Zero	0x93f
0932 e5fe       |    |		Load	0x2,-0x2
0933 2607       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7
0934 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
0935 e5ff       |    |		Load	0x2,-0x1
0936 0227       | '  |		Execute	Access,All_Reference
0937 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0938 e213       |    |		Load	0x1,0x13
0939 0273       | s  |		Execute	Discrete,Plus
093a 0a01       |    |		Execute_Immediate	Plus,0x1
093b 027a       | z  |		Execute	Discrete,Less_Equal
093c 6802       |h   |		Jump_Zero	0x93f
093d 4801       |H   |		Short_Literal	0x1
093e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
093f 4800       |H   |		Short_Literal	0x0
0940 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0941 0000 0000  |    |		.BLANK	0000[0x7]
0948 ; --------------------------------------------------------------------------------------
0948 ; SUBPROGRAM
0948 ; --------------------------------------------------------------------------------------
0948 094b       | K  |		.CONST	0x094b								; Address of begin
0949 0004       |    |		.CONST	0x0004								; Address of exception handler
094a 0001       |    |		.CONST	0x0001								; Number of locals
094b			BODY_0948:
094b			INIT_0948:
094b 00da       |    |		Load_Top	At_Offset_2
094c 0f03       |    |		Execute_Immediate	Equal,0x3
094d 7003       |p   |		Jump_Nonzero	0x951
094e 00da       |    |		Load_Top	At_Offset_2
094f 0f04       |    |		Execute_Immediate	Equal,0x4
0950 683c       |h<  |		Jump_Zero	0x98d
0951 00db       |    |		Load_Top	At_Offset_3
0952 0f06       |    |		Execute_Immediate	Equal,0x6
0953 7003       |p   |		Jump_Nonzero	0x957
0954 00db       |    |		Load_Top	At_Offset_3
0955 0f07       |    |		Execute_Immediate	Equal,0x7
0956 680a       |h   |		Jump_Zero	0x961
0957 480e       |H   |		Short_Literal	0xe
0958 4806       |H   |		Short_Literal	0x6
0959 e21b       |    |		Load	0x1,0x1b
095a 01a7       |    |		Execute	Matrix,Field_Read
095b 0227       | '  |		Execute	Access,All_Reference
095c 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
095d 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
095e 6802       |h   |		Jump_Zero	0x961
095f 4801       |H   |		Short_Literal	0x1
0960 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0961 00db       |    |		Load_Top	At_Offset_3
0962 0f01       |    |		Execute_Immediate	Equal,0x1
0963 6813       |h   |		Jump_Zero	0x977
0964 480e       |H   |		Short_Literal	0xe
0965 4804       |H   |		Short_Literal	0x4
0966 e21b       |    |		Load	0x1,0x1b
0967 01a7       |    |		Execute	Matrix,Field_Read
0968 0227       | '  |		Execute	Access,All_Reference
0969 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
096a 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
096b 680b       |h   |		Jump_Zero	0x977
096c 00db       |    |		Load_Top	At_Offset_3
096d 0a01       |    |		Execute_Immediate	Plus,0x1
096e 00db       |    |		Load_Top	At_Offset_3
096f e21b       |    |		Load	0x1,0x1b
0970 01a7       |    |		Execute	Matrix,Field_Read
0971 0227       | '  |		Execute	Access,All_Reference
0972 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0973 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0974 6802       |h   |		Jump_Zero	0x977
0975 4801       |H   |		Short_Literal	0x1
0976 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0977 00db       |    |		Load_Top	At_Offset_3
0978 0f0c       |    |		Execute_Immediate	Equal,0xc
0979 6813       |h   |		Jump_Zero	0x98d
097a 480e       |H   |		Short_Literal	0xe
097b 4802       |H   |		Short_Literal	0x2
097c e21b       |    |		Load	0x1,0x1b
097d 01a7       |    |		Execute	Matrix,Field_Read
097e 0227       | '  |		Execute	Access,All_Reference
097f 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0980 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0981 680b       |h   |		Jump_Zero	0x98d
0982 00db       |    |		Load_Top	At_Offset_3
0983 0aff       |    |		Execute_Immediate	Plus,-0x1
0984 00db       |    |		Load_Top	At_Offset_3
0985 e21b       |    |		Load	0x1,0x1b
0986 01a7       |    |		Execute	Matrix,Field_Read
0987 0227       | '  |		Execute	Access,All_Reference
0988 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0989 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
098a 6802       |h   |		Jump_Zero	0x98d
098b 4801       |H   |		Short_Literal	0x1
098c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
098d 00db       |    |		Load_Top	At_Offset_3
098e 0aff       |    |		Execute_Immediate	Plus,-0x1
098f 00db       |    |		Load_Top	At_Offset_3
0990 e21b       |    |		Load	0x1,0x1b
0991 01a7       |    |		Execute	Matrix,Field_Read
0992 0227       | '  |		Execute	Access,All_Reference
0993 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0994 e5fe       |    |		Load	0x2,-0x2
0995 e5ff       |    |		Load	0x2,-0x1
0996 e21b       |    |		Load	0x1,0x1b
0997 01a7       |    |		Execute	Matrix,Field_Read
0998 0227       | '  |		Execute	Access,All_Reference
0999 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
099a 027b       | {  |		Execute	Discrete,Greater_Equal
099b 6811       |h   |		Jump_Zero	0x9ad
099c 00db       |    |		Load_Top	At_Offset_3
099d 0a01       |    |		Execute_Immediate	Plus,0x1
099e 00db       |    |		Load_Top	At_Offset_3
099f e21b       |    |		Load	0x1,0x1b
09a0 01a7       |    |		Execute	Matrix,Field_Read
09a1 0227       | '  |		Execute	Access,All_Reference
09a2 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
09a3 e5fe       |    |		Load	0x2,-0x2
09a4 e5ff       |    |		Load	0x2,-0x1
09a5 e21b       |    |		Load	0x1,0x1b
09a6 01a7       |    |		Execute	Matrix,Field_Read
09a7 0227       | '  |		Execute	Access,All_Reference
09a8 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
09a9 027b       | {  |		Execute	Discrete,Greater_Equal
09aa 6802       |h   |		Jump_Zero	0x9ad
09ab 4801       |H   |		Short_Literal	0x1
09ac 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
09ad 00db       |    |		Load_Top	At_Offset_3
09ae 0f0e       |    |		Execute_Immediate	Equal,0xe
09af 681f       |h   |		Jump_Zero	0x9cf
09b0 00da       |    |		Load_Top	At_Offset_2
09b1 0e02       |    |		Execute_Immediate	Not_Equal,0x2
09b2 6802       |h   |		Jump_Zero	0x9b5
09b3 4800       |H   |		Short_Literal	0x0
09b4 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
09b5 480e       |H   |		Short_Literal	0xe
09b6 4800       |H   |		Short_Literal	0x0
09b7 e21b       |    |		Load	0x1,0x1b
09b8 01a7       |    |		Execute	Matrix,Field_Read
09b9 0227       | '  |		Execute	Access,All_Reference
09ba 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
09bb 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
09bc 6812       |h   |		Jump_Zero	0x9cf
09bd 480c       |H   |		Short_Literal	0xc
09be 4803       |H   |		Short_Literal	0x3
09bf e21b       |    |		Load	0x1,0x1b
09c0 01a7       |    |		Execute	Matrix,Field_Read
09c1 0227       | '  |		Execute	Access,All_Reference
09c2 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
09c3 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
09c4 7008       |p   |		Jump_Nonzero	0x9cd
09c5 480c       |H   |		Short_Literal	0xc
09c6 4804       |H   |		Short_Literal	0x4
09c7 e21b       |    |		Load	0x1,0x1b
09c8 01a7       |    |		Execute	Matrix,Field_Read
09c9 0227       | '  |		Execute	Access,All_Reference
09ca 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
09cb 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
09cc 6802       |h   |		Jump_Zero	0x9cf
09cd 4801       |H   |		Short_Literal	0x1
09ce 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
09cf 4800       |H   |		Short_Literal	0x0
09d0 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
09d1 0000 0000  |    |		.BLANK	0000[0x7]
09d8 ; --------------------------------------------------------------------------------------
09d8 ; SUBPROGRAM
09d8 ; --------------------------------------------------------------------------------------
09d8 09df       |    |		.CONST	0x09df								; Address of begin
09d9 0004       |    |		.CONST	0x0004								; Address of exception handler
09da 0003       |    |		.CONST	0x0003								; Number of locals
09db			INIT_09d8:
09db e00c       |    |		Load	0x0,0xc
09dc 0007       |    |		Action	Break_Optional
09dd e00c       |    |		Load	0x0,0xc
09de 0007       |    |		Action	Break_Optional
09df			BODY_09d8:
09df 0008       |    |		Action	Idle
09e0 0007       |    |		Action	Break_Optional
09e1 e5fd       |    |		Load	0x2,-0x3
09e2 0a01       |    |		Execute_Immediate	Plus,0x1
09e3 c5fd       |    |		Store	0x2,-0x3
09e4 e5fd       |    |		Load	0x2,-0x3
09e5 0c0f       |    |		Execute_Immediate	Greater_Equal,0xf
09e6 680d       |h   |		Jump_Zero	0x9f4
09e7 4801       |H   |		Short_Literal	0x1
09e8 a5fd       |    |		Store_Unchecked	0x2,-0x3
09e9 e5fe       |    |		Load	0x2,-0x2
09ea 0a01       |    |		Execute_Immediate	Plus,0x1
09eb c5fe       |    |		Store	0x2,-0x2
09ec e5fe       |    |		Load	0x2,-0x2
09ed 0c08       |    |		Execute_Immediate	Greater_Equal,0x8
09ee 6805       |h   |		Jump_Zero	0x9f4
09ef 4800       |H   |		Short_Literal	0x0
09f0 a5fe       |    |		Store_Unchecked	0x2,-0x2
09f1 4800       |H   |		Short_Literal	0x0
09f2 a5fd       |    |		Store_Unchecked	0x2,-0x3
09f3 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
09f4 e5fd       |    |		Load	0x2,-0x3
09f5 e5fe       |    |		Load	0x2,-0x2
09f6 e21b       |    |		Load	0x1,0x1b
09f7 01a7       |    |		Execute	Matrix,Field_Read
09f8 0227       | '  |		Execute	Access,All_Reference
09f9 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
09fa 7001       |p   |		Jump_Nonzero	0x9fc
09fb 7fe3       |    |		Jump	BODY_09d8
09fc e5fd       |    |		Load	0x2,-0x3
09fd e5fe       |    |		Load	0x2,-0x2
09fe 8237       | 7  |		Call	0x1,0x37
09ff 6801       |h   |		Jump_Zero	0xa01
0a00 7fde       |    |		Jump	BODY_09d8
0a01 e5ff       |    |		Load	0x2,-0x1
0a02 0f01       |    |		Execute_Immediate	Equal,0x1
0a03 6801       |h   |		Jump_Zero	0xa05
0a04 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0a05 e21d       |    |		Load	0x1,0x1d
0a06 0227       | '  |		Execute	Access,All_Reference
0a07 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0a08 0aff       |    |		Execute_Immediate	Plus,-0x1
0a09 00d8       |    |		Load_Top	At_Offset_0
0a0a e003       |    |		Load	0x0,0x3
0a0b 0260       | `  |		Execute	Discrete,In_Type
0a0c 7001       |p   |		Jump_Nonzero	0xa0e
0a0d 0801       |    |		Execute_Immediate	Raise,0x1
0a0e e21d       |    |		Load	0x1,0x1d
0a0f 0227       | '  |		Execute	Access,All_Reference
0a10 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0a11 01d7       |    |		Execute	Vector,Field_Read
0a12 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0a13 e5fd       |    |		Load	0x2,-0x3
0a14 e5fe       |    |		Load	0x2,-0x2
0a15 e21b       |    |		Load	0x1,0x1b
0a16 01a7       |    |		Execute	Matrix,Field_Read
0a17 0227       | '  |		Execute	Access,All_Reference
0a18 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0a19 0aff       |    |		Execute_Immediate	Plus,-0x1
0a1a 00d8       |    |		Load_Top	At_Offset_0
0a1b e003       |    |		Load	0x0,0x3
0a1c 0260       | `  |		Execute	Discrete,In_Type
0a1d 7001       |p   |		Jump_Nonzero	0xa1f
0a1e 0801       |    |		Execute_Immediate	Raise,0x1
0a1f e5fd       |    |		Load	0x2,-0x3
0a20 e5fe       |    |		Load	0x2,-0x2
0a21 e21b       |    |		Load	0x1,0x1b
0a22 01a7       |    |		Execute	Matrix,Field_Read
0a23 0227       | '  |		Execute	Access,All_Reference
0a24 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0a25 01d7       |    |		Execute	Vector,Field_Read
0a26 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0a27 00d9       |    |		Load_Top	At_Offset_1
0a28 0c09       |    |		Execute_Immediate	Greater_Equal,0x9
0a29 7003       |p   |		Jump_Nonzero	0xa2d
0a2a 00d8       |    |		Load_Top	At_Offset_0
0a2b 0c09       |    |		Execute_Immediate	Greater_Equal,0x9
0a2c 6804       |h   |		Jump_Zero	0xa31
0a2d 00d9       |    |		Load_Top	At_Offset_1
0a2e 00d9       |    |		Load_Top	At_Offset_1
0a2f 027e       | ~  |		Execute	Discrete,Not_Equal
0a30 77ae       |w   |		Jump_Nonzero	BODY_09d8
0a31 00d9       |    |		Load_Top	At_Offset_1
0a32 0d05       |    |		Execute_Immediate	Less,0x5
0a33 6803       |h   |		Jump_Zero	0xa37
0a34 00d8       |    |		Load_Top	At_Offset_0
0a35 0c05       |    |		Execute_Immediate	Greater_Equal,0x5
0a36 77a8       |w   |		Jump_Nonzero	BODY_09d8
0a37 00d9       |    |		Load_Top	At_Offset_1
0a38 0c05       |    |		Execute_Immediate	Greater_Equal,0x5
0a39 680a       |h   |		Jump_Zero	0xa44
0a3a 00d9       |    |		Load_Top	At_Offset_1
0a3b 0d09       |    |		Execute_Immediate	Less,0x9
0a3c 6807       |h   |		Jump_Zero	0xa44
0a3d 00d8       |    |		Load_Top	At_Offset_0
0a3e 0d05       |    |		Execute_Immediate	Less,0x5
0a3f 779f       |w   |		Jump_Nonzero	BODY_09d8
0a40 00d8       |    |		Load_Top	At_Offset_0
0a41 0c09       |    |		Execute_Immediate	Greater_Equal,0x9
0a42 6801       |h   |		Jump_Zero	0xa44
0a43 7f9b       |    |		Jump	BODY_09d8
0a44 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0a45 0000 0000  |    |		.XXX[0x3]
0a47 0000       |    |
0a48 ; --------------------------------------------------------------------------------------
0a48 ; SUBPROGRAM
0a48 ; --------------------------------------------------------------------------------------
0a48 0a53       | S  |		.CONST	0x0a53								; Address of begin
0a49 0004       |    |		.CONST	0x0004								; Address of exception handler
0a4a 0003       |    |		.CONST	0x0003								; Number of locals
0a4b			INIT_0a48:
0a4b e016       |    |		Load	0x0,0x16
0a4c 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0a4d e016       |    |		Load	0x0,0x16
0a4e 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0a4f e016       |    |		Load	0x0,0x16
0a50 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0a51 03f1       |    |		Declare_Variable	Discrete,With_Value
0a52 00e3       |    |		Load_Encached	Natural_Cache
0a53			BODY_0a48:
0a53 00d9       |    |		Load_Top	At_Offset_1
0a54 602f       |`/  |		Indirect_Literal	Discrete,0xa84,{0x00000000, 0x00320000}
0a55 0270       | p  |		Execute	Discrete,Divide
0a56 00d8       |    |		Load_Top	At_Offset_0
0a57 00e3       |    |		Load_Encached	Natural_Cache
0a58 0260       | `  |		Execute	Discrete,In_Type
0a59 7001       |p   |		Jump_Nonzero	0xa5b
0a5a 0801       |    |		Execute_Immediate	Raise,0x1
0a5b 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0a5c 00d9       |    |		Load_Top	At_Offset_1
0a5d 4ff1       |O   |		Short_Literal	-0xf
0a5e 00da       |    |		Load_Top	At_Offset_2
0a5f 090f       |    |		Execute_Immediate	Binary_Scale,0xf
0a60 6023       |`#  |		Indirect_Literal	Discrete,0xa84,{0x00000000, 0x00320000}
0a61 0141       | A  |		Execute	Discrete,Multiply_And_Scale
0a62 00d8       |    |		Load_Top	At_Offset_0
0a63 00e7       |    |		Load_Encached	Duration_Cache
0a64 0260       | `  |		Execute	Discrete,In_Type
0a65 7001       |p   |		Jump_Nonzero	0xa67
0a66 0801       |    |		Execute_Immediate	Raise,0x1
0a67 0272       | r  |		Execute	Discrete,Minus
0a68 00d8       |    |		Load_Top	At_Offset_0
0a69 e016       |    |		Load	0x0,0x16
0a6a 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0a6b 0260       | `  |		Execute	Discrete,In_Type
0a6c 7001       |p   |		Jump_Nonzero	0xa6e
0a6d 0801       |    |		Execute_Immediate	Raise,0x1
0a6e 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0a6f 00d9       |    |		Load_Top	At_Offset_1
0a70 0237       | 7  |		Execute	Float,Convert_From_Discrete
0a71 580e       |X   |		Indirect_Literal	Float,0xa80,3.0517578125e-05
0a72 023b       | ;  |		Execute	Float,Times
0a73 5808       |X   |		Indirect_Literal	Float,0xa7c,21262214.0
0a74 023b       | ;  |		Execute	Float,Times
0a75 0235       | 5  |		Execute	Float,Round_To_Discrete
0a76 e017       |    |		Load	0x0,0x17
0a77 025e       | ^  |		Execute	Discrete,Convert
0a78 8018       |    |		Call	0x0,0x18
0a79 a22d       | -  |		Store_Unchecked	0x1,0x2d
0a7a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0a7b 0000       |    |		.XXX[0x1]
0a7c 4174 46f8  |AtF |		.DBL	21262214.0
0a7e 6000 0000  |`   |
0a80 3f00 0000  |?   |		.DBL	3.0517578125e-05
0a82 0000 0000  |    |
0a84 0000 0000  |    |		.LITERAL	{0x00000000, 0x00320000}
0a88 ; --------------------------------------------------------------------------------------
0a88 ; SUBPROGRAM
0a88 ; --------------------------------------------------------------------------------------
0a88 0a90       |    |		.CONST	0x0a90								; Address of begin
0a89 0004       |    |		.CONST	0x0004								; Address of exception handler
0a8a 0002       |    |		.CONST	0x0002								; Number of locals
0a8b			INIT_0a88:
0a8b e408       |    |		Load	0x2,0x8
0a8c e405       |    |		Load	0x2,0x5
0a8d e21b       |    |		Load	0x1,0x1b
0a8e 01a5       |    |		Execute	Matrix,Field_Reference
0a8f 0007       |    |		Action	Break_Optional
0a90			BODY_0a88:
0a90 4803       |H   |		Short_Literal	0x3
0a91 00d9       |    |		Load_Top	At_Offset_1
0a92 0227       | '  |		Execute	Access,All_Reference
0a93 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0a94 01d7       |    |		Execute	Vector,Field_Read
0a95 6805       |h   |		Jump_Zero	0xa9b
0a96 4804       |H   |		Short_Literal	0x4
0a97 00d9       |    |		Load_Top	At_Offset_1
0a98 0227       | '  |		Execute	Access,All_Reference
0a99 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0a9a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0a9b 4802       |H   |		Short_Literal	0x2
0a9c 00d9       |    |		Load_Top	At_Offset_1
0a9d 0227       | '  |		Execute	Access,All_Reference
0a9e 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0a9f 01d7       |    |		Execute	Vector,Field_Read
0aa0 6805       |h   |		Jump_Zero	0xaa6
0aa1 4803       |H   |		Short_Literal	0x3
0aa2 00d9       |    |		Load_Top	At_Offset_1
0aa3 0227       | '  |		Execute	Access,All_Reference
0aa4 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0aa5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0aa6 4801       |H   |		Short_Literal	0x1
0aa7 00d9       |    |		Load_Top	At_Offset_1
0aa8 0227       | '  |		Execute	Access,All_Reference
0aa9 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0aaa 01d7       |    |		Execute	Vector,Field_Read
0aab 6805       |h   |		Jump_Zero	0xab1
0aac 4802       |H   |		Short_Literal	0x2
0aad 00d9       |    |		Load_Top	At_Offset_1
0aae 0227       | '  |		Execute	Access,All_Reference
0aaf 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0ab0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0ab1 4800       |H   |		Short_Literal	0x0
0ab2 00d9       |    |		Load_Top	At_Offset_1
0ab3 0227       | '  |		Execute	Access,All_Reference
0ab4 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0ab5 01d7       |    |		Execute	Vector,Field_Read
0ab6 6805       |h   |		Jump_Zero	0xabc
0ab7 4801       |H   |		Short_Literal	0x1
0ab8 00d9       |    |		Load_Top	At_Offset_1
0ab9 0227       | '  |		Execute	Access,All_Reference
0aba 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0abb 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0abc 4800       |H   |		Short_Literal	0x0
0abd 00d9       |    |		Load_Top	At_Offset_1
0abe 0227       | '  |		Execute	Access,All_Reference
0abf 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0ac0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0ac1 0000 0000  |    |		.BLANK	0000[0x7]
0ac8 ; --------------------------------------------------------------------------------------
0ac8 ; SUBPROGRAM
0ac8 ; --------------------------------------------------------------------------------------
0ac8 0ad0       |    |		.CONST	0x0ad0								; Address of begin
0ac9 0004       |    |		.CONST	0x0004								; Address of exception handler
0aca 0002       |    |		.CONST	0x0002								; Number of locals
0acb			INIT_0ac8:
0acb e408       |    |		Load	0x2,0x8
0acc e405       |    |		Load	0x2,0x5
0acd e21b       |    |		Load	0x1,0x1b
0ace 01a5       |    |		Execute	Matrix,Field_Reference
0acf 0007       |    |		Action	Break_Optional
0ad0			BODY_0ac8:
0ad0 00d8       |    |		Load_Top	At_Offset_0
0ad1 0227       | '  |		Execute	Access,All_Reference
0ad2 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0ad3 6812       |h   |		Jump_Zero	0xae6
0ad4 e210       |    |		Load	0x1,0x10
0ad5 e408       |    |		Load	0x2,0x8
0ad6 e212       |    |		Load	0x1,0x12
0ad7 0a01       |    |		Execute_Immediate	Plus,0x1
0ad8 0271       | q  |		Execute	Discrete,Times
0ad9 0273       | s  |		Execute	Discrete,Plus
0ada 00d9       |    |		Load_Top	At_Offset_1
0adb 0227       | '  |		Execute	Access,All_Reference
0adc 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0add e211       |    |		Load	0x1,0x11
0ade e405       |    |		Load	0x2,0x5
0adf e213       |    |		Load	0x1,0x13
0ae0 0a01       |    |		Execute_Immediate	Plus,0x1
0ae1 0271       | q  |		Execute	Discrete,Times
0ae2 0273       | s  |		Execute	Discrete,Plus
0ae3 00d9       |    |		Load_Top	At_Offset_1
0ae4 0227       | '  |		Execute	Access,All_Reference
0ae5 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0ae6 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0ae7 0000       |    |		.XXX[0x1]
0ae8 ; --------------------------------------------------------------------------------------
0ae8 ; SUBPROGRAM
0ae8 ; --------------------------------------------------------------------------------------
0ae8 0af0       |    |		.CONST	0x0af0								; Address of begin
0ae9 0004       |    |		.CONST	0x0004								; Address of exception handler
0aea 0002       |    |		.CONST	0x0002								; Number of locals
0aeb			INIT_0ae8:
0aeb e40a       |    |		Load	0x2,0xa
0aec e407       |    |		Load	0x2,0x7
0aed e21b       |    |		Load	0x1,0x1b
0aee 01a5       |    |		Execute	Matrix,Field_Reference
0aef 0007       |    |		Action	Break_Optional
0af0			BODY_0ae8:
0af0 4800       |H   |		Short_Literal	0x0
0af1 4800       |H   |		Short_Literal	0x0
0af2 00da       |    |		Load_Top	At_Offset_2
0af3 0227       | '  |		Execute	Access,All_Reference
0af4 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0af5 01d6       |    |		Execute	Vector,Field_Write
0af6 4800       |H   |		Short_Literal	0x0
0af7 4801       |H   |		Short_Literal	0x1
0af8 00da       |    |		Load_Top	At_Offset_2
0af9 0227       | '  |		Execute	Access,All_Reference
0afa 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0afb 01d6       |    |		Execute	Vector,Field_Write
0afc 4800       |H   |		Short_Literal	0x0
0afd 4802       |H   |		Short_Literal	0x2
0afe 00da       |    |		Load_Top	At_Offset_2
0aff 0227       | '  |		Execute	Access,All_Reference
0b00 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0b01 01d6       |    |		Execute	Vector,Field_Write
0b02 4800       |H   |		Short_Literal	0x0
0b03 4803       |H   |		Short_Literal	0x3
0b04 00da       |    |		Load_Top	At_Offset_2
0b05 0227       | '  |		Execute	Access,All_Reference
0b06 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0b07 01d6       |    |		Execute	Vector,Field_Write
0b08 4800       |H   |		Short_Literal	0x0
0b09 00d9       |    |		Load_Top	At_Offset_1
0b0a 0227       | '  |		Execute	Access,All_Reference
0b0b 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0b0c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0b0d 0000 0000  |    |		.XXX[0x3]
0b0f 0000       |    |
0b10 ; --------------------------------------------------------------------------------------
0b10 ; SUBPROGRAM
0b10 ; --------------------------------------------------------------------------------------
0b10 0b21       | !  |		.CONST	0x0b21								; Address of begin
0b11 0004       |    |		.CONST	0x0004								; Address of exception handler
0b12 0003       |    |		.CONST	0x0003								; Number of locals
0b13			INIT_0b10:
0b13 e216       |    |		Load	0x1,0x16
0b14 e5ff       |    |		Load	0x2,-0x1
0b15 0227       | '  |		Execute	Access,All_Reference
0b16 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0b17 0271       | q  |		Execute	Discrete,Times
0b18 e002       |    |		Load	0x0,0x2
0b19 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0b1a e217       |    |		Load	0x1,0x17
0b1b e5ff       |    |		Load	0x2,-0x1
0b1c 0227       | '  |		Execute	Access,All_Reference
0b1d 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0b1e 0271       | q  |		Execute	Discrete,Times
0b1f e002       |    |		Load	0x0,0x2
0b20 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0b21			BODY_0b10:
0b21 e010       |    |		Load	0x0,0x10
0b22 e011       |    |		Load	0x0,0x11
0b23 8012       |    |		Call	0x0,0x12
0b24 682d       |h-  |		Jump_Zero	0xb52
0b25 4800       |H   |		Short_Literal	0x0
0b26 e213       |    |		Load	0x1,0x13
0b27 0a02       |    |		Execute_Immediate	Plus,0x2
0b28 e215       |    |		Load	0x1,0x15
0b29 0273       | s  |		Execute	Discrete,Plus
0b2a 00d8       |    |		Load_Top	At_Offset_0
0b2b e013       |    |		Load	0x0,0x13
0b2c 0260       | `  |		Execute	Discrete,In_Type
0b2d 7001       |p   |		Jump_Nonzero	0xb2f
0b2e 0801       |    |		Execute_Immediate	Raise,0x1
0b2f e212       |    |		Load	0x1,0x12
0b30 0a02       |    |		Execute_Immediate	Plus,0x2
0b31 e214       |    |		Load	0x1,0x14
0b32 0273       | s  |		Execute	Discrete,Plus
0b33 00d8       |    |		Load_Top	At_Offset_0
0b34 e013       |    |		Load	0x0,0x13
0b35 0260       | `  |		Execute	Discrete,In_Type
0b36 7001       |p   |		Jump_Nonzero	0xb38
0b37 0801       |    |		Execute_Immediate	Raise,0x1
0b38 e5ff       |    |		Load	0x2,-0x1
0b39 0227       | '  |		Execute	Access,All_Reference
0b3a 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0b3b e603       |    |		Load	0x3,0x3
0b3c 0272       | r  |		Execute	Discrete,Minus
0b3d e215       |    |		Load	0x1,0x15
0b3e 0272       | r  |		Execute	Discrete,Minus
0b3f 00d8       |    |		Load_Top	At_Offset_0
0b40 e002       |    |		Load	0x0,0x2
0b41 0260       | `  |		Execute	Discrete,In_Type
0b42 7001       |p   |		Jump_Nonzero	0xb44
0b43 0801       |    |		Execute_Immediate	Raise,0x1
0b44 e5ff       |    |		Load	0x2,-0x1
0b45 0227       | '  |		Execute	Access,All_Reference
0b46 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0b47 e602       |    |		Load	0x3,0x2
0b48 0273       | s  |		Execute	Discrete,Plus
0b49 00d8       |    |		Load_Top	At_Offset_0
0b4a e002       |    |		Load	0x0,0x2
0b4b 0260       | `  |		Execute	Discrete,In_Type
0b4c 7001       |p   |		Jump_Nonzero	0xb4e
0b4d 0801       |    |		Execute_Immediate	Raise,0x1
0b4e e007       |    |		Load	0x0,0x7
0b4f e008       |    |		Load	0x0,0x8
0b50 8009       |    |		Call	0x0,0x9
0b51 7826       |x&  |		Jump	0xb78
0b52 4800       |H   |		Short_Literal	0x0
0b53 e213       |    |		Load	0x1,0x13
0b54 0a02       |    |		Execute_Immediate	Plus,0x2
0b55 00d8       |    |		Load_Top	At_Offset_0
0b56 e013       |    |		Load	0x0,0x13
0b57 0260       | `  |		Execute	Discrete,In_Type
0b58 7001       |p   |		Jump_Nonzero	0xb5a
0b59 0801       |    |		Execute_Immediate	Raise,0x1
0b5a e212       |    |		Load	0x1,0x12
0b5b 0a02       |    |		Execute_Immediate	Plus,0x2
0b5c 00d8       |    |		Load_Top	At_Offset_0
0b5d e013       |    |		Load	0x0,0x13
0b5e 0260       | `  |		Execute	Discrete,In_Type
0b5f 7001       |p   |		Jump_Nonzero	0xb61
0b60 0801       |    |		Execute_Immediate	Raise,0x1
0b61 e5ff       |    |		Load	0x2,-0x1
0b62 0227       | '  |		Execute	Access,All_Reference
0b63 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0b64 e603       |    |		Load	0x3,0x3
0b65 0272       | r  |		Execute	Discrete,Minus
0b66 00d8       |    |		Load_Top	At_Offset_0
0b67 e002       |    |		Load	0x0,0x2
0b68 0260       | `  |		Execute	Discrete,In_Type
0b69 7001       |p   |		Jump_Nonzero	0xb6b
0b6a 0801       |    |		Execute_Immediate	Raise,0x1
0b6b e5ff       |    |		Load	0x2,-0x1
0b6c 0227       | '  |		Execute	Access,All_Reference
0b6d 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0b6e e602       |    |		Load	0x3,0x2
0b6f 0273       | s  |		Execute	Discrete,Plus
0b70 00d8       |    |		Load_Top	At_Offset_0
0b71 e002       |    |		Load	0x0,0x2
0b72 0260       | `  |		Execute	Discrete,In_Type
0b73 7001       |p   |		Jump_Nonzero	0xb75
0b74 0801       |    |		Execute_Immediate	Raise,0x1
0b75 e007       |    |		Load	0x0,0x7
0b76 e008       |    |		Load	0x0,0x8
0b77 8009       |    |		Call	0x0,0x9
0b78 e5fd       |    |		Load	0x2,-0x3
0b79 e5fe       |    |		Load	0x2,-0x2
0b7a 8233       | 3  |		Call	0x1,0x33
0b7b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0b7c 0000 0000  |    |		.BLANK	0000[0x4]
0b80 ; --------------------------------------------------------------------------------------
0b80 ; SUBPROGRAM
0b80 ; --------------------------------------------------------------------------------------
0b80 0b85       |    |		.CONST	0x0b85								; Address of begin
0b81 0004       |    |		.CONST	0x0004								; Address of exception handler
0b82 0002       |    |		.CONST	0x0002								; Number of locals
0b83			INIT_0b80:
0b83 e002       |    |		Load	0x0,0x2
0b84 0007       |    |		Action	Break_Optional
0b85			BODY_0b80:
0b85 e21f       |    |		Load	0x1,0x1f
0b86 e21e       |    |		Load	0x1,0x1e
0b87 8006       |    |		Call	0x0,0x6
0b88 e220       |    |		Load	0x1,0x20
0b89 a21d       |    |		Store_Unchecked	0x1,0x1d
0b8a e21e       |    |		Load	0x1,0x1e
0b8b 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0b8c e221       | !  |		Load	0x1,0x21
0b8d a21e       |    |		Store_Unchecked	0x1,0x1e
0b8e 00d8       |    |		Load_Top	At_Offset_0
0b8f a221       | !  |		Store_Unchecked	0x1,0x21
0b90 e21f       |    |		Load	0x1,0x1f
0b91 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0b92 e222       | "  |		Load	0x1,0x22
0b93 a21f       |    |		Store_Unchecked	0x1,0x1f
0b94 00d8       |    |		Load_Top	At_Offset_0
0b95 a222       | "  |		Store_Unchecked	0x1,0x22
0b96 e219       |    |		Load	0x1,0x19
0b97 a220       |    |		Store_Unchecked	0x1,0x20
0b98 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0b99 ; --------------------------------------------------------------------------------------
0b99 ; STRING TABLE
0b99 ; --------------------------------------------------------------------------------------
0b99 0004       |    |		.STRTAB	0x0004->0x0b9b							; "NTILES gak!"
0b9a 000d       |    |		.STREND 0x000d->0x0ba0
0b9b 4e54 494c  |NTIL|		.STRTAB_STRINGS
0ba1 0000 0000  |    |		.BLANK	0000[0x7]
0ba8 ; --------------------------------------------------------------------------------------
0ba8 ; Debug Table
0ba8 ; --------------------------------------------------------------------------------------
0ba8 0004 0000  |    |		.DEBUG4	0x0004,0x0000,0x6819,0x0000,0x0001,0x001c
0bae 000b 0c1e  |    |		.DBG4T	0x000b,0x0c1e,0x8000,0x0000
0bb2 007d 0c4d  | } M|		.DBG4T	0x007d,0x0c4d,0x8000,0x0000
0bb6 00b3 0c65  |   e|		.DBG4T	0x00b3,0x0c65,0x0001,0x0000
0bba 014b 0c96  | K  |		.DBG4T	0x014b,0x0c96,0x0001,0x0000
0bbe 0173 0ca0  | s  |		.DBG4T	0x0173,0x0ca0,0x0001,0x0000
0bc2 01db 0cb1  |    |		.DBG4T	0x01db,0x0cb1,0x0001,0x0000
0bc6 0243 0cc2  | C  |		.DBG4T	0x0243,0x0cc2,0x0001,0x0000
0bca 02f3 0cd3  |    |		.DBG4T	0x02f3,0x0cd3,0x0001,0x0000
0bce 0423 0d06  | #  |		.DBG4T	0x0423,0x0d06,0x0001,0x4000
0bd2 054b 0d76  | K v|		.DBG4T	0x054b,0x0d76,0x0001,0x0000
0bd6 05c3 0d8f  |    |		.DBG4T	0x05c3,0x0d8f,0x0001,0x0000
0bda 05db 0d94  |    |		.DBG4T	0x05db,0x0d94,0x0001,0x4000
0bde 060b 0da8  |    |		.DBG4T	0x060b,0x0da8,0x0001,0x0000
0be2 0623 0dac  | #  |		.DBG4T	0x0623,0x0dac,0x0001,0x0000
0be6 0643 0db1  | C  |		.DBG4T	0x0643,0x0db1,0x0001,0x0000
0bea 0673 0db7  | s  |		.DBG4T	0x0673,0x0db7,0x0001,0x0000
0bee 06ab 0dbe  |    |		.DBG4T	0x06ab,0x0dbe,0x0001,0x0000
0bf2 074b 0dd1  | K  |		.DBG4T	0x074b,0x0dd1,0x0001,0x0000
0bf6 086b 0dfd  | k  |		.DBG4T	0x086b,0x0dfd,0x0001,0x0000
0bfa 08db 0e20  |    |		.DBG4T	0x08db,0x0e20,0x0002,0x0000
0bfe 094b 0e2b  | K +|		.DBG4T	0x094b,0x0e2b,0x0002,0x0000
0c02 09db 0e3c  |   <|		.DBG4T	0x09db,0x0e3c,0x0001,0x0000
0c06 0a4b 0e53  | K S|		.DBG4T	0x0a4b,0x0e53,0x0004,0x0000
0c0a 0a8b 0e5a  |   Z|		.DBG4T	0x0a8b,0x0e5a,0x0004,0x0000
0c0e 0acb 0e66  |   f|		.DBG4T	0x0acb,0x0e66,0x0004,0x0000
0c12 0aeb 0e6c  |   l|		.DBG4T	0x0aeb,0x0e6c,0x0004,0x0000
0c16 0b13 0e74  |   t|		.DBG4T	0x0b13,0x0e74,0x0004,0x0000
0c1a 0b83 0e7c  |   ||		.DBG4T	0x0b83,0x0e7c,0x0004,0x0000
0c1e ; --------------------------------------------------------------------------------------
0c1e ; Debug chain
0c1e ; --------------------------------------------------------------------------------------
0c1e 002d 0000  | -  |		.DBGLEN	0x002d,0x0000
0c20 000b 000c  |    |		.DBGLNO	0x000b,0x000c,0x000d,0x000e,0x000f,0x0010,0x0013,0x0016,0x0018,0x001a,0x001c,0x001e,0x0020,0x0022,0x0024,0x0026,0x0028,0x0033,0x0037,0x003f,0x0052,0x0053,0x0054,0x0055,0x0056,0x0057,0x0058,0x0059,0x005a,0x005c,0x005e,0x0060,0x0062,0x0064,0x0066,0x0068,0x006a,0x006c,0x006e,0x0070,0x0072,0x0074,0x0076,0x0078,0x007a
0c4d ; --------------------------------------------------------------------------------------
0c4d ; Debug chain
0c4d ; --------------------------------------------------------------------------------------
0c4d 0015 0001  |    |		.DBGLEN	0x0015,0x0001
0c4f 007d 007f  | }  |		.DBGLNO	0x007d,0x007f,0x0081,0x0083,0x0085,0x0087,0x0089,0x008b,0x008d,0x008f,0x0091,0x0093,0x0095,0x0097,0x0099,0x009b,0x009d,0x009f,0x00a1,0x00a3,0x00a5,0x00a9
0c65 ; --------------------------------------------------------------------------------------
0c65 ; Debug chain
0c65 ; --------------------------------------------------------------------------------------
0c65 0000 002f  |   /|		.DBGLEN	0x0000,0x002f
0c67 00b3 00b7  |    |		.DBGLNO	0x00b3,0x00b7,0x00b9,0x00bb,0x00be,0x00bf,0x00c5,0x00c7,0x00c9,0x00cc,0x00ce,0x00cf,0x00d7,0x00dc,0x00df,0x00e2,0x00e4,0x00e6,0x00e8,0x00ee,0x00f0,0x00f1,0x00f4,0x00f9,0x00fb,0x00fd,0x0100,0x0103,0x0106,0x0107,0x010d,0x010f,0x0117,0x011c,0x011f,0x0120,0x0123,0x0125,0x0127,0x0129,0x012a,0x0130,0x0132,0x0133,0x0136,0x013b,0x013d
0c96 ; --------------------------------------------------------------------------------------
0c96 ; Debug chain
0c96 ; --------------------------------------------------------------------------------------
0c96 0000 0008  |    |		.DBGLEN	0x0000,0x0008
0c98 014d 014f  | M O|		.DBGLNO	0x014d,0x014f,0x0151,0x0154,0x0157,0x015a,0x0161,0x0162
0ca0 ; --------------------------------------------------------------------------------------
0ca0 ; Debug chain
0ca0 ; --------------------------------------------------------------------------------------
0ca0 0001 000e  |    |		.DBGLEN	0x0001,0x000e
0ca2 0173 0175  | s u|		.DBGLNO	0x0173,0x0175,0x0177,0x0179,0x0180,0x0185,0x0189,0x018d,0x0193,0x0198,0x01a8,0x01ac,0x01b7,0x01c2,0x01cd
0cb1 ; --------------------------------------------------------------------------------------
0cb1 ; Debug chain
0cb1 ; --------------------------------------------------------------------------------------
0cb1 0001 000e  |    |		.DBGLEN	0x0001,0x000e
0cb3 01db 01dd  |    |		.DBGLNO	0x01db,0x01dd,0x01e4,0x01e9,0x01ed,0x01f1,0x01f7,0x01fc,0x0207,0x020e,0x0217,0x021b,0x0224,0x0228,0x0231
0cc2 ; --------------------------------------------------------------------------------------
0cc2 ; Debug chain
0cc2 ; --------------------------------------------------------------------------------------
0cc2 0000 000f  |    |		.DBGLEN	0x0000,0x000f
0cc4 0245 024d  | E M|		.DBGLNO	0x0245,0x024d,0x0260,0x0274,0x027c,0x0288,0x0298,0x02a0,0x02ac,0x02bc,0x02c4,0x02d0,0x02e1,0x02e4,0x02e7
0cd3 ; --------------------------------------------------------------------------------------
0cd3 ; Debug chain
0cd3 ; --------------------------------------------------------------------------------------
0cd3 0002 002f  |   /|		.DBGLEN	0x0002,0x002f
0cd5 02f3 02f8  |    |		.DBGLNO	0x02f3,0x02f8,0x02fc,0x02ff,0x0302,0x0309,0x030c,0x030f,0x0319,0x031c,0x0326,0x032a,0x032d,0x0339,0x0342,0x0345,0x0349,0x0350,0x0357,0x035e,0x0366,0x0369,0x0370,0x037a,0x037d,0x0384,0x038e,0x0391,0x0398,0x03a2,0x03a5,0x03ac,0x03b6,0x03b9,0x03c0,0x03ca,0x03cd,0x03d4,0x03de,0x03e1,0x03e8,0x03f2,0x03f5,0x03fc,0x0406,0x0409,0x040c,0x0419,0x041a
0d06 ; --------------------------------------------------------------------------------------
0d06 ; Debug chain
0d06 ; --------------------------------------------------------------------------------------
0d06 0004 0035  |   5|		.DBGLEN	0x0004,0x0035
0d08 0423 0425  | # %|		.DBGLNO	0x0423,0x0425,0x0427,0x0429,0x042b,0x0431,0x0434,0x0435,0x043a,0x043d,0x043e,0x0444,0x0447,0x0448,0x044d,0x0453,0x0454,0x0456,0x045d,0x0465,0x0466,0x0469,0x0470,0x0478,0x0479,0x0480,0x0488,0x0489,0x0490,0x0498,0x0499,0x049c,0x04a3,0x04ab,0x04ac,0x04b3,0x04bb,0x04bc,0x04c8,0x04cf,0x04d7,0x04d8,0x04de,0x04e7,0x04fd,0x04fe,0x0501,0x0509,0x0518,0x0519,0x051c,0x0524,0x0533,0x0534,0x053b,0x0543,0x0544
0d41 0001 0002  |    |		.XXX[0x35]
0d43 0003 0004  |    |
0d45 0005 0006  |    |
0d47 0007 0008  |    |
0d49 0009 000a  |    |
0d4b 000b 000c  |    |
0d4d 000d 000e  |    |
0d4f 000f 0010  |    |
0d51 0012 0013  |    |
0d53 0014 0015  |    |
0d55 0016 0017  |    |
0d57 0018 0019  |    |
0d59 001a 001b  |    |
0d5b 001d 001e  |    |
0d5d 001f 0020  |    |
0d5f 0021 0022  | ! "|
0d61 0023 0025  | # %|
0d63 0026 0027  | & '|
0d65 0028 0029  | ( )|
0d67 002a 002b  | * +|
0d69 002c 002d  | , -|
0d6b 002e 002f  | . /|
0d6d 0030 0031  | 0 1|
0d6f 0032 0033  | 2 3|
0d71 0034 0035  | 4 5|
0d73 0036 0037  | 6 7|
0d75 0038       | 8  |
0d76 ; --------------------------------------------------------------------------------------
0d76 ; Debug chain
0d76 ; --------------------------------------------------------------------------------------
0d76 0002 0015  |    |		.DBGLEN	0x0002,0x0015
0d78 054b 054d  | K M|		.DBGLNO	0x054b,0x054d,0x054f,0x0555,0x0563,0x0571,0x058d,0x0590,0x0594,0x0597,0x0599,0x059b,0x059d,0x059f,0x05a1,0x05a3,0x05a5,0x05ab,0x05ae,0x05b0,0x05b2,0x05b8,0x05bb
0d8f ; --------------------------------------------------------------------------------------
0d8f ; Debug chain
0d8f ; --------------------------------------------------------------------------------------
0d8f 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0d91 05c3 05c7  |    |		.DBGLNO	0x05c3,0x05c7,0x05cb
0d94 ; --------------------------------------------------------------------------------------
0d94 ; Debug chain
0d94 ; --------------------------------------------------------------------------------------
0d94 0002 0008  |    |		.DBGLEN	0x0002,0x0008
0d96 05db 05dd  |    |		.DBGLNO	0x05db,0x05dd,0x05df,0x05eb,0x05ee,0x05f1,0x05f4,0x05f9,0x05fd,0x0601
0da0 0001 0003  |    |		.XXX[0x8]
0da2 0004 0005  |    |
0da4 0002 0006  |    |
0da6 0007 0008  |    |
0da8 ; --------------------------------------------------------------------------------------
0da8 ; Debug chain
0da8 ; --------------------------------------------------------------------------------------
0da8 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0daa 060b 0616  |    |		.DBGLNO	0x060b,0x0616
0dac ; --------------------------------------------------------------------------------------
0dac ; Debug chain
0dac ; --------------------------------------------------------------------------------------
0dac 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0dae 0623 062e  | # .|		.DBGLNO	0x0623,0x062e,0x0639
0db1 ; --------------------------------------------------------------------------------------
0db1 ; Debug chain
0db1 ; --------------------------------------------------------------------------------------
0db1 0000 0004  |    |		.DBGLEN	0x0000,0x0004
0db3 0643 064e  | C N|		.DBGLNO	0x0643,0x064e,0x0659,0x0664
0db7 ; --------------------------------------------------------------------------------------
0db7 ; Debug chain
0db7 ; --------------------------------------------------------------------------------------
0db7 0000 0005  |    |		.DBGLEN	0x0000,0x0005
0db9 0673 067e  | s ~|		.DBGLNO	0x0673,0x067e,0x0689,0x0694,0x069f
0dbe ; --------------------------------------------------------------------------------------
0dbe ; Debug chain
0dbe ; --------------------------------------------------------------------------------------
0dbe 0001 0010  |    |		.DBGLEN	0x0001,0x0010
0dc0 06ab 06b0  |    |		.DBGLNO	0x06ab,0x06b0,0x06b8,0x06b9,0x06bd,0x06cc,0x06d5,0x06e4,0x06ed,0x06fd,0x070c,0x071f,0x072e,0x0734,0x073a,0x073e,0x0741
0dd1 ; --------------------------------------------------------------------------------------
0dd1 ; Debug chain
0dd1 ; --------------------------------------------------------------------------------------
0dd1 0000 002a  |   *|		.DBGLEN	0x0000,0x002a
0dd3 074d 0752  | M R|		.DBGLNO	0x074d,0x0752,0x0756,0x0780,0x07a4,0x07a5,0x07ac,0x07af,0x07b2,0x07b5,0x07b8,0x07bb,0x07be,0x07bf,0x07c2,0x07c5,0x07c8,0x07c9,0x07cc,0x07cf,0x07d2,0x07d5,0x07d6,0x07d9,0x07dc,0x07df,0x07e0,0x07e9,0x07ec,0x07f5,0x07f8,0x07fb,0x080a,0x0813,0x081e,0x082d,0x0836,0x0839,0x0842,0x0845,0x084e,0x0851
0dfd ; --------------------------------------------------------------------------------------
0dfd ; Debug chain
0dfd ; --------------------------------------------------------------------------------------
0dfd 0000 0021  |   !|		.DBGLEN	0x0000,0x0021
0dff 086d 086f  | m o|		.DBGLNO	0x086d,0x086f,0x0871,0x0873,0x0875,0x0878,0x0879,0x087d,0x088e,0x0890,0x0892,0x0894,0x0896,0x0898,0x089c,0x089f,0x08a0,0x08a4,0x08a7,0x08a8,0x08b3,0x08b5,0x08b9,0x08bb,0x08bf,0x08c1,0x08c4,0x08c5,0x08c6,0x08ca,0x08cc,0x08ce,0x08d1
0e20 ; --------------------------------------------------------------------------------------
0e20 ; Debug chain
0e20 ; --------------------------------------------------------------------------------------
0e20 0002 0007  |    |		.DBGLEN	0x0002,0x0007
0e22 08db 08e6  |    |		.DBGLNO	0x08db,0x08e6,0x08f1,0x08f5,0x08f7,0x0915,0x0917,0x093d,0x093f
0e2b ; --------------------------------------------------------------------------------------
0e2b ; Debug chain
0e2b ; --------------------------------------------------------------------------------------
0e2b 0000 000f  |    |		.DBGLEN	0x0000,0x000f
0e2d 094b 0951  | K Q|		.DBGLNO	0x094b,0x0951,0x095f,0x0961,0x0975,0x0977,0x098b,0x098d,0x09ab,0x09ad,0x09b0,0x09b3,0x09b5,0x09cd,0x09cf
0e3c ; --------------------------------------------------------------------------------------
0e3c ; Debug chain
0e3c ; --------------------------------------------------------------------------------------
0e3c 0002 0013  |    |		.DBGLEN	0x0002,0x0013
0e3e 09db 09dd  |    |		.DBGLNO	0x09db,0x09dd,0x09df,0x09e1,0x09e4,0x09e7,0x09e9,0x09ec,0x09ef,0x09f1,0x09f3,0x09f4,0x09fb,0x09fc,0x0a00,0x0a01,0x0a04,0x0a05,0x0a13,0x0a27,0x0a43
0e53 ; --------------------------------------------------------------------------------------
0e53 ; Debug chain
0e53 ; --------------------------------------------------------------------------------------
0e53 0002 0003  |    |		.DBGLEN	0x0002,0x0003
0e55 0a4b 0a52  | K R|		.DBGLNO	0x0a4b,0x0a52,0x0a53,0x0a5c,0x0a6f
0e5a ; --------------------------------------------------------------------------------------
0e5a ; Debug chain
0e5a ; --------------------------------------------------------------------------------------
0e5a 0001 0009  |    |		.DBGLEN	0x0001,0x0009
0e5c 0a8b 0a90  |    |		.DBGLNO	0x0a8b,0x0a90,0x0a96,0x0a9b,0x0aa1,0x0aa6,0x0aac,0x0ab1,0x0ab7,0x0abc
0e66 ; --------------------------------------------------------------------------------------
0e66 ; Debug chain
0e66 ; --------------------------------------------------------------------------------------
0e66 0001 0003  |    |		.DBGLEN	0x0001,0x0003
0e68 0acb 0ad0  |    |		.DBGLNO	0x0acb,0x0ad0,0x0ad4,0x0add
0e6c ; --------------------------------------------------------------------------------------
0e6c ; Debug chain
0e6c ; --------------------------------------------------------------------------------------
0e6c 0001 0005  |    |		.DBGLEN	0x0001,0x0005
0e6e 0aeb 0af0  |    |		.DBGLNO	0x0aeb,0x0af0,0x0af6,0x0afc,0x0b02,0x0b08
0e74 ; --------------------------------------------------------------------------------------
0e74 ; Debug chain
0e74 ; --------------------------------------------------------------------------------------
0e74 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0e76 0b13 0b1a  |    |		.DBGLNO	0x0b13,0x0b1a,0x0b21,0x0b25,0x0b52,0x0b78
0e7c ; --------------------------------------------------------------------------------------
0e7c ; Debug chain
0e7c ; --------------------------------------------------------------------------------------
0e7c 0001 0009  |    |		.DBGLEN	0x0001,0x0009
0e7e 0b83 0b85  |    |		.DBGLNO	0x0b83,0x0b85,0x0b88,0x0b8a,0x0b8c,0x0b8e,0x0b90,0x0b92,0x0b94,0x0b96
0e88 0000 0000  |    |		.BLANK	0000[0x178]