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

⟦da6b4a31f⟧

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

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5900       |Y   |		.CONST	0x5900								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0b70       | p  |		.CONST	0x0b70								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 0007       |    |		.CONST	0x0007								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0071       | q  |		.CONST	0x0071								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 002d       | -  |		.CONST	0x002d								; Number of locals
000b			INIT_0008:
000b 00c4       |    |		Action	Make_Default
000c 00c4       |    |		Action	Make_Default
000d 00c4       |    |		Action	Make_Default
000e 00c4       |    |		Action	Make_Default
000f 029a 007b  |   {|		Declare_Subprogram	INIT_0078,For_Outer_Call,Visible,Unelaborated
0011 c20f       |    |		Store	0x1,0xf
0012 029a 010b  |    |		Declare_Subprogram	INIT_0108,For_Outer_Call,Visible,Unelaborated
0014 c210       |    |		Store	0x1,0x10
0015 00bf       |    |		Action	Accept_Activation
0016 e001       |    |		Load	0x0,0x1
0017 e002       |    |		Load	0x0,0x2
0018 483c       |H<  |		Short_Literal	0x3c
0019 e003       |    |		Load	0x0,0x3
001a 0387       |    |		Declare_Variable	Package
001b 00d8       |    |		Load_Top	At_Offset_0
001c 020f       |    |		Execute	Module,Activate
001d 00e3       |    |		Load_Encached	Natural_Cache
001e 4800       |H   |		Short_Literal	0x0
001f 4805       |H   |		Short_Literal	0x5
0020 029f 0153  |   S|		Declare_Subprogram	INIT_0150,For_Call
0022 03fd       |    |		Declare_Type	Discrete,Defined
0023 00e4       |    |		Load_Encached	Positive_Cache
0024 e004       |    |		Load	0x0,0x4
0025 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0026 00da       |    |		Load_Top	At_Offset_2
0027 e005       |    |		Load	0x0,0x5
0028 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0029 00e1       |    |		Load_Encached	Boolean_Cache
002a e211       |    |		Load	0x1,0x11
002b 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
002c 029f 017b  |   {|		Declare_Subprogram	INIT_0178,For_Call
002e 4806       |H   |		Short_Literal	0x6
002f 032d       | -  |		Declare_Type	Record,Defined
0030 e006       |    |		Load	0x0,0x6
0031 e007       |    |		Load	0x0,0x7
0032 00da       |    |		Load_Top	At_Offset_2
0033 e008       |    |		Load	0x0,0x8
0034 0387       |    |		Declare_Variable	Package
0035 00d8       |    |		Load_Top	At_Offset_0
0036 020f       |    |		Execute	Module,Activate
0037 00d8       |    |		Load_Top	At_Offset_0
0038 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0039 029b 019b  |    |		Declare_Subprogram	INIT_0198,For_Outer_Call,Unelaborated
003b 029b 0283  |    |		Declare_Subprogram	INIT_0280,For_Outer_Call,Unelaborated
003d 029d 03cb  |    |		Declare_Subprogram	INIT_03c8,For_Outer_Call
003f 029d 03eb  |    |		Declare_Subprogram	INIT_03e8,For_Outer_Call
0041 029d 0403  |    |		Declare_Subprogram	INIT_0400,For_Outer_Call
0043 029d 041b  |    |		Declare_Subprogram	INIT_0418,For_Outer_Call
0045 029d 042b  |   +|		Declare_Subprogram	INIT_0428,For_Outer_Call
0047 029d 0443  |   C|		Declare_Subprogram	INIT_0440,For_Outer_Call
0049 029d 046b  |   k|		Declare_Subprogram	INIT_0468,For_Outer_Call
004b 029d 04bb  |    |		Declare_Subprogram	INIT_04b8,For_Outer_Call
004d 029d 05cb  |    |		Declare_Subprogram	INIT_05c8,For_Outer_Call
004f 029d 05f3  |    |		Declare_Subprogram	INIT_05f0,For_Outer_Call
0051 029d 0623  |   #|		Declare_Subprogram	INIT_0620,For_Outer_Call
0053 029d 067b  |   {|		Declare_Subprogram	INIT_0678,For_Outer_Call
0055 029d 069b  |    |		Declare_Subprogram	INIT_0698,For_Outer_Call
0057 029d 06bb  |    |		Declare_Subprogram	INIT_06b8,For_Outer_Call
0059 029d 070b  |    |		Declare_Subprogram	INIT_0708,For_Outer_Call
005b 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
005c 00c7       |    |		Action	Elaborate_Subprogram
005d 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
005e 00c7       |    |		Action	Elaborate_Subprogram
005f 029d 075b  |   [|		Declare_Subprogram	INIT_0758,For_Outer_Call
0061 029d 077b  |   {|		Declare_Subprogram	INIT_0778,For_Outer_Call
0063 029d 07b3  |    |		Declare_Subprogram	INIT_07b0,For_Outer_Call
0065 029d 07e3  |    |		Declare_Subprogram	INIT_07e0,For_Outer_Call
0067 029b 0813  |    |		Declare_Subprogram	INIT_0810,For_Outer_Call,Unelaborated
0069 1d2c       | ,  |		Execute_Immediate	Reference_Lex_1,0x2c
006a 00c7       |    |		Action	Elaborate_Subprogram
006b 029d 08bb  |    |		Declare_Subprogram	INIT_08b8,For_Outer_Call
006d 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
006e 00c7       |    |		Action	Elaborate_Subprogram
006f 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0070 00c7       |    |		Action	Elaborate_Subprogram
0071			BODY_0008:
0071 00bc       |    |		Action	Signal_Activated
0072 00bb       |    |		Action	Signal_Completion
0073 0000 0000  |    |		.BLANK	0000[0x5]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 00a1       |    |		.CONST	0x00a1								; Address of begin
0079 0004       |    |		.CONST	0x0004								; Address of exception handler
007a 000b       |    |		.CONST	0x000b								; Number of locals
007b			INIT_0078:
007b 00e1       |    |		Load_Encached	Boolean_Cache
007c e004       |    |		Load	0x0,0x4
007d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
007e 02c7       |    |		Declare_Variable	Any
007f e5ff       |    |		Load	0x2,-0x1
0080 e009       |    |		Load	0x0,0x9
0081 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0082 a403       |    |		Store_Unchecked	0x2,0x3
0083 e00a       |    |		Load	0x0,0xa
0084 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0085 02c7       |    |		Declare_Variable	Any
0086 00d8       |    |		Load_Top	At_Offset_0
0087 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0088 e00b       |    |		Load	0x0,0xb
0089 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
008a 02c7       |    |		Declare_Variable	Any
008b 00d8       |    |		Load_Top	At_Offset_0
008c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
008d e214       |    |		Load	0x1,0x14
008e 0322       | "  |		Declare_Variable	Record
008f 00d8       |    |		Load_Top	At_Offset_0
0090 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0091 e215       |    |		Load	0x1,0x15
0092 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0093 e005       |    |		Load	0x0,0x5
0094 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0095 00e1       |    |		Load_Encached	Boolean_Cache
0096 e00c       |    |		Load	0x0,0xc
0097 e00d       |    |		Load	0x0,0xd
0098 4802       |H   |		Short_Literal	0x2
0099 0092 0a58  |   X|		Action	Push_String_Extended,0xa58					; " "
009b e00e       |    |		Load	0x0,0xe
009c 0387       |    |		Declare_Variable	Package
009d 00d8       |    |		Load_Top	At_Offset_0
009e 020f       |    |		Execute	Module,Activate
009f 029f 08db  |    |		Declare_Subprogram	INIT_08d8,For_Call
00a1			BODY_0078:
00a1 4800       |H   |		Short_Literal	0x0
00a2 a212       |    |		Store_Unchecked	0x1,0x12
00a3 00da       |    |		Load_Top	At_Offset_2
00a4 e402       |    |		Load	0x2,0x2
00a5 e408       |    |		Load	0x2,0x8
00a6 e403       |    |		Load	0x2,0x3
00a7 8218       |    |		Call	0x1,0x18
00a8 c408       |    |		Store	0x2,0x8
00a9 c402       |    |		Store	0x2,0x2
00aa 005b       | [  |		Store_Top	Discrete,At_Offset_3
00ab 4800       |H   |		Short_Literal	0x0
00ac 4800       |H   |		Short_Literal	0x0
00ad 0092 0a59  |   Y|		Action	Push_String_Extended,0xa59					; "Size"
00af e40a       |    |		Load	0x2,0xa
00b0 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00b1 4800       |H   |		Short_Literal	0x0
00b2 4800       |H   |		Short_Literal	0x0
00b3 0092 0a5a  |   Z|		Action	Push_String_Extended,0xa5a					; "Items"
00b5 e40a       |    |		Load	0x2,0xa
00b6 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00b7 e215       |    |		Load	0x1,0x15
00b8 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
00b9 e216       |    |		Load	0x1,0x16
00ba e215       |    |		Load	0x1,0x15
00bb 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
00bc c407       |    |		Store	0x2,0x7
00bd 00cf       |    |		Action	Mark_Auxiliary
00be 7809       |x   |		Jump	0xc8
00bf e407       |    |		Load	0x2,0x7
00c0 e215       |    |		Load	0x1,0x15
00c1 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
00c2 840b       |    |		Call	0x2,0xb
00c3 e407       |    |		Load	0x2,0x7
00c4 e215       |    |		Load	0x1,0x15
00c5 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
00c6 c407       |    |		Store	0x2,0x7
00c7 00c9       |    |		Action	Pop_Auxiliary_Loop
00c8 e407       |    |		Load	0x2,0x7
00c9 e215       |    |		Load	0x1,0x15
00ca 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
00cb 6ff3       |o   |		Jump_Zero	0xbf
00cc 00ce       |    |		Action	Pop_Auxiliary
00cd e404       |    |		Load	0x2,0x4
00ce e405       |    |		Load	0x2,0x5
00cf 4801       |H   |		Short_Literal	0x1
00d0 4801       |H   |		Short_Literal	0x1
00d1 e5fd       |    |		Load	0x2,-0x3
00d2 e00b       |    |		Load	0x0,0xb
00d3 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
00d4 c405       |    |		Store	0x2,0x5
00d5 c404       |    |		Store	0x2,0x4
00d6 e00b       |    |		Load	0x0,0xb
00d7 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
00d8 e00b       |    |		Load	0x0,0xb
00d9 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
00da 0092 0a5b  |   [|		Action	Push_String_Extended,0xa5b					; "INFORMATION"
00dc e405       |    |		Load	0x2,0x5
00dd e00b       |    |		Load	0x0,0xb
00de 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
00df 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
00e0 e00b       |    |		Load	0x0,0xb
00e1 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
00e2 e00b       |    |		Load	0x0,0xb
00e3 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
00e4 4802       |H   |		Short_Literal	0x2
00e5 00ea       |    |		Load_Encached	Null_String_Cache
00e6 e405       |    |		Load	0x2,0x5
00e7 e00b       |    |		Load	0x0,0xb
00e8 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
00e9 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00ea e00b       |    |		Load	0x0,0xb
00eb 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
00ec e00b       |    |		Load	0x0,0xb
00ed 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
00ee 00ea       |    |		Load_Encached	Null_String_Cache
00ef 4801       |H   |		Short_Literal	0x1
00f0 e405       |    |		Load	0x2,0x5
00f1 e00b       |    |		Load	0x0,0xb
00f2 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
00f3 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
00f4 e405       |    |		Load	0x2,0x5
00f5 0092 0a5c  |   \|		Action	Push_String_Extended,0xa5c					; "EXPLODED TYPE DISPLAY"
00f7 00db       |    |		Load_Top	At_Offset_3
00f8 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00f9 c405       |    |		Store	0x2,0x5
00fa e405       |    |		Load	0x2,0x5
00fb e00b       |    |		Load	0x0,0xb
00fc 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
00fd c405       |    |		Store	0x2,0x5
00fe 4801       |H   |		Short_Literal	0x1
00ff 4800       |H   |		Short_Literal	0x0
0100 e5fd       |    |		Load	0x2,-0x3
0101 e00f       |    |		Load	0x0,0xf
0102 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0103 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0104 0000 0000  |    |		.BLANK	0000[0x4]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 0119       |    |		.CONST	0x0119								; Address of begin
0109 0004       |    |		.CONST	0x0004								; Address of exception handler
010a 0002       |    |		.CONST	0x0002								; Number of locals
010b			INIT_0108:
010b e004       |    |		Load	0x0,0x4
010c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
010d 02c7       |    |		Declare_Variable	Any
010e e010       |    |		Load	0x0,0x10
010f 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0110 4802       |H   |		Short_Literal	0x2
0111 e011       |    |		Load	0x0,0x11
0112 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0113 e004       |    |		Load	0x0,0x4
0114 1b58       | X  |		Execute	Package,Field_Read,Field_Number 0x58
0115 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0116 e009       |    |		Load	0x0,0x9
0117 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0118 a402       |    |		Store_Unchecked	0x2,0x2
0119			BODY_0108:
0119 0092 0a5d  |   ]|		Action	Push_String_Extended,0xa5d					; "_"
011b e5ff       |    |		Load	0x2,-0x1
011c 01cc       |    |		Execute	Vector,Catenate
011d e005       |    |		Load	0x0,0x5
011e 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
011f 00d8       |    |		Load_Top	At_Offset_0
0120 e009       |    |		Load	0x0,0x9
0121 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0122 00d8       |    |		Load_Top	At_Offset_0
0123 0c1c       |    |		Execute_Immediate	Greater_Equal,0x1c
0124 7023       |p#  |		Jump_Nonzero	0x148
0125 461b       |F   |		Jump_Case	0x1c
0126 7822       |x"  |		Jump	0x149								; case 0x0
0127 7821       |x!  |		Jump	0x149								; case 0x1
0128 7820       |x   |		Jump	0x149								; case 0x2
0129 781f       |x   |		Jump	0x149								; case 0x3
012a 781e       |x   |		Jump	0x149								; case 0x4
012b 7816       |x   |		Jump	0x142								; case 0x5
012c 781c       |x   |		Jump	0x149								; case 0x6
012d 7814       |x   |		Jump	0x142								; case 0x7
012e 781a       |x   |		Jump	0x149								; case 0x8
012f 7819       |x   |		Jump	0x149								; case 0x9
0130 7818       |x   |		Jump	0x149								; case 0xa
0131 7817       |x   |		Jump	0x149								; case 0xb
0132 7816       |x   |		Jump	0x149								; case 0xc
0133 7815       |x   |		Jump	0x149								; case 0xd
0134 7814       |x   |		Jump	0x149								; case 0xe
0135 7813       |x   |		Jump	0x149								; case 0xf
0136 7812       |x   |		Jump	0x149								; case 0x10
0137 7811       |x   |		Jump	0x149								; case 0x11
0138 7810       |x   |		Jump	0x149								; case 0x12
0139 780f       |x   |		Jump	0x149								; case 0x13
013a 780e       |x   |		Jump	0x149								; case 0x14
013b 780d       |x   |		Jump	0x149								; case 0x15
013c 780c       |x   |		Jump	0x149								; case 0x16
013d 780b       |x   |		Jump	0x149								; case 0x17
013e 780a       |x   |		Jump	0x149								; case 0x18
013f 7809       |x   |		Jump	0x149								; case 0x19
0140 7808       |x   |		Jump	0x149								; case 0x1a
0141 7800       |x   |		Jump	0x142								; case 0x1b
0142 0092 0a5e  |   ^|		Action	Push_String_Extended,0xa5e					; "type_display"
0144 e5fe       |    |		Load	0x2,-0x2
0145 00da       |    |		Load_Top	At_Offset_2
0146 820f       |    |		Call	0x1,0xf
0147 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0148 00d1       |    |		Pop_Control	Pop_Count_1
0149 e012       |    |		Load	0x0,0x12
014a 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
014b 0092 0a5f  |   _|		Action	Push_String_Extended,0xa5f					; "Image is not a type declaration"
014d e013       |    |		Load	0x0,0x13
014e 1865       | e  |		Execute	Package,Field_Execute,Field_Number 0x65
014f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0153       | S  |		.CONST	0x0153								; Address of begin
0151 0004       |    |		.CONST	0x0004								; Address of exception handler
0152 0001       |    |		.CONST	0x0001								; Number of locals
0153			BODY_0150:
0153			INIT_0150:
0153 4607       |F   |		Jump_Case	0x8
0154 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0155 7806       |x   |		Jump	0x15c								; case 0x1
0156 7809       |x   |		Jump	0x160								; case 0x2
0157 780d       |x   |		Jump	0x165								; case 0x3
0158 7810       |x   |		Jump	0x169								; case 0x4
0159 7811       |x   |		Jump	0x16b								; case 0x5
015a 7812       |x   |		Jump	0x16d								; case 0x6
015b 7815       |x   |		Jump	0x171								; case 0x7
015c 00da       |    |		Load_Top	At_Offset_2
015d 0091 0a52  |   R|		Action	Push_String_Extended_Indexed,0xa52				; "ARRAY_INDEX"
015f 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0160 00db       |    |		Load_Top	At_Offset_3
0161 00db       |    |		Load_Top	At_Offset_3
0162 00e0       |    |		Load_Encached	Standard_Cache
0163 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0164 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0165 00da       |    |		Load_Top	At_Offset_2
0166 00e0       |    |		Load_Encached	Standard_Cache
0167 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0168 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0169 00db       |    |		Load_Top	At_Offset_3
016a 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
016b 00db       |    |		Load_Top	At_Offset_3
016c 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
016d e213       |    |		Load	0x1,0x13
016e 00dc       |    |		Load_Top	At_Offset_4
016f 0267       | g  |		Execute	Discrete,Predecessor
0170 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0171 e213       |    |		Load	0x1,0x13
0172 00dc       |    |		Load_Top	At_Offset_4
0173 0268       | h  |		Execute	Discrete,Successor
0174 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0175 0000 0000  |    |		.XXX[0x3]
0177 0000       |    |
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017b       | {  |		.CONST	0x017b								; Address of begin
0179 0004       |    |		.CONST	0x0004								; Address of exception handler
017a 0001       |    |		.CONST	0x0001								; Number of locals
017b			BODY_0178:
017b			INIT_0178:
017b 4608       |F   |		Jump_Case	0x9
017c 7808       |x   |		Jump	0x185								; case 0x0
017d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
017e 7816       |x   |		Jump	0x195								; case 0x2
017f 7815       |x   |		Jump	0x195								; case 0x3
0180 7814       |x   |		Jump	0x195								; case 0x4
0181 7813       |x   |		Jump	0x195								; case 0x5
0182 7812       |x   |		Jump	0x195								; case 0x6
0183 7811       |x   |		Jump	0x195								; case 0x7
0184 7810       |x   |		Jump	0x195								; case 0x8
0185 00da       |    |		Load_Top	At_Offset_2
0186 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0187 0125       | %  |		Execute	Any,Set_Constraint
0188 00da       |    |		Load_Top	At_Offset_2
0189 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
018a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
018b 4805       |H   |		Short_Literal	0x5
018c 00db       |    |		Load_Top	At_Offset_3
018d 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
018e 4800       |H   |		Short_Literal	0x0
018f 00db       |    |		Load_Top	At_Offset_3
0190 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0191 4800       |H   |		Short_Literal	0x0
0192 00db       |    |		Load_Top	At_Offset_3
0193 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0194 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0195 0869       | i  |		Execute_Immediate	Raise,0x69
0196 0000 0000  |    |		.XXX[0x2]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 01b7       |    |		.CONST	0x01b7								; Address of begin
0199 0004       |    |		.CONST	0x0004								; Address of exception handler
019a 000b       |    |		.CONST	0x000b								; Number of locals
019b			INIT_0198:
019b e014       |    |		Load	0x0,0x14
019c 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
019d 02c7       |    |		Declare_Variable	Any
019e e5fe       |    |		Load	0x2,-0x2
019f e014       |    |		Load	0x0,0x14
01a0 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
01a1 a402       |    |		Store_Unchecked	0x2,0x2
01a2 e014       |    |		Load	0x0,0x14
01a3 1b2b       | +  |		Execute	Package,Field_Read,Field_Number 0x2b
01a4 02c7       |    |		Declare_Variable	Any
01a5 00d8       |    |		Load_Top	At_Offset_0
01a6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01a7 e014       |    |		Load	0x0,0x14
01a8 1b2b       | +  |		Execute	Package,Field_Read,Field_Number 0x2b
01a9 02c7       |    |		Declare_Variable	Any
01aa 00d8       |    |		Load_Top	At_Offset_0
01ab 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01ac 00e5       |    |		Load_Encached	Long_Integer_Cache
01ad 03e9       |    |		Declare_Variable	Discrete,Duplicate
01ae 00e6       |    |		Load_Encached	Float_Cache
01af 03d8       |    |		Declare_Variable	Float,Duplicate
01b0 e005       |    |		Load	0x0,0x5
01b1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01b2 00e1       |    |		Load_Encached	Boolean_Cache
01b3 e214       |    |		Load	0x1,0x14
01b4 0322       | "  |		Declare_Variable	Record
01b5 00d8       |    |		Load_Top	At_Offset_0
01b6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01b7			BODY_0198:
01b7 4800       |H   |		Short_Literal	0x0
01b8 a5fc       |    |		Store_Unchecked	0x2,-0x4
01b9 4800       |H   |		Short_Literal	0x0
01ba a5fb       |    |		Store_Unchecked	0x2,-0x5
01bb e402       |    |		Load	0x2,0x2
01bc e014       |    |		Load	0x0,0x14
01bd 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
01be 460c       |F   |		Jump_Case	0xd
01bf 780c       |x   |		Jump	0x1cc								; case 0x0
01c0 7810       |x   |		Jump	0x1d1								; case 0x1
01c1 7824       |x$  |		Jump	0x1e6								; case 0x2
01c2 7862       |xb  |		Jump	0x225								; case 0x3
01c3 7837       |x7  |		Jump	0x1fb								; case 0x4
01c4 787b       |x{  |		Jump	0x240								; case 0x5
01c5 7896       |x   |		Jump	0x25c								; case 0x6
01c6 7805       |x   |		Jump	0x1cc								; case 0x7
01c7 7804       |x   |		Jump	0x1cc								; case 0x8
01c8 7803       |x   |		Jump	0x1cc								; case 0x9
01c9 7802       |x   |		Jump	0x1cc								; case 0xa
01ca 7801       |x   |		Jump	0x1cc								; case 0xb
01cb 7800       |x   |		Jump	0x1cc								; case 0xc
01cc 4800       |H   |		Short_Literal	0x0
01cd a5fc       |    |		Store_Unchecked	0x2,-0x4
01ce 4800       |H   |		Short_Literal	0x0
01cf a5fa       |    |		Store_Unchecked	0x2,-0x6
01d0 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01d1 00e1       |    |		Load_Encached	Boolean_Cache
01d2 e406       |    |		Load	0x2,0x6
01d3 e405       |    |		Load	0x2,0x5
01d4 e5fd       |    |		Load	0x2,-0x3
01d5 e015       |    |		Load	0x0,0x15
01d6 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
01d7 c405       |    |		Store	0x2,0x5
01d8 c406       |    |		Store	0x2,0x6
01d9 c5fa       |    |		Store	0x2,-0x6
01da e5fa       |    |		Load	0x2,-0x6
01db 6807       |h   |		Jump_Zero	0x1e3
01dc 00d9       |    |		Load_Top	At_Offset_1
01dd e406       |    |		Load	0x2,0x6
01de e405       |    |		Load	0x2,0x5
01df e005       |    |		Load	0x0,0x5
01e0 1834       | 4  |		Execute	Package,Field_Execute,Field_Number 0x34
01e1 a5fc       |    |		Store_Unchecked	0x2,-0x4
01e2 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01e3 4800       |H   |		Short_Literal	0x0
01e4 a5fc       |    |		Store_Unchecked	0x2,-0x4
01e5 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01e6 00e1       |    |		Load_Encached	Boolean_Cache
01e7 e406       |    |		Load	0x2,0x6
01e8 e405       |    |		Load	0x2,0x5
01e9 e5fd       |    |		Load	0x2,-0x3
01ea e015       |    |		Load	0x0,0x15
01eb 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
01ec c405       |    |		Store	0x2,0x5
01ed c406       |    |		Store	0x2,0x6
01ee c5fa       |    |		Store	0x2,-0x6
01ef e5fa       |    |		Load	0x2,-0x6
01f0 6807       |h   |		Jump_Zero	0x1f8
01f1 00d9       |    |		Load_Top	At_Offset_1
01f2 e406       |    |		Load	0x2,0x6
01f3 e405       |    |		Load	0x2,0x5
01f4 e005       |    |		Load	0x0,0x5
01f5 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
01f6 a5fc       |    |		Store_Unchecked	0x2,-0x4
01f7 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01f8 4800       |H   |		Short_Literal	0x0
01f9 a5fc       |    |		Store_Unchecked	0x2,-0x4
01fa 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01fb e404       |    |		Load	0x2,0x4
01fc 0120       |    |		Execute	Any,Is_Value
01fd 6803       |h   |		Jump_Zero	0x201
01fe e014       |    |		Load	0x0,0x14
01ff 1b2b       | +  |		Execute	Package,Field_Read,Field_Number 0x2b
0200 7801       |x   |		Jump	0x202
0201 e404       |    |		Load	0x2,0x4
0202 e403       |    |		Load	0x2,0x3
0203 0120       |    |		Execute	Any,Is_Value
0204 6803       |h   |		Jump_Zero	0x208
0205 e014       |    |		Load	0x0,0x14
0206 1b2b       | +  |		Execute	Package,Field_Read,Field_Number 0x2b
0207 7801       |x   |		Jump	0x209
0208 e403       |    |		Load	0x2,0x3
0209 e5fd       |    |		Load	0x2,-0x3
020a 00d8       |    |		Load_Top	At_Offset_0
020b e5ff       |    |		Load	0x2,-0x1
020c 8227       | '  |		Call	0x1,0x27
020d c403       |    |		Store	0x2,0x3
020e c404       |    |		Store	0x2,0x4
020f 00e1       |    |		Load_Encached	Boolean_Cache
0210 e406       |    |		Load	0x2,0x6
0211 e405       |    |		Load	0x2,0x5
0212 e403       |    |		Load	0x2,0x3
0213 e404       |    |		Load	0x2,0x4
0214 e015       |    |		Load	0x0,0x15
0215 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0216 c405       |    |		Store	0x2,0x5
0217 c406       |    |		Store	0x2,0x6
0218 c5fa       |    |		Store	0x2,-0x6
0219 e5fa       |    |		Load	0x2,-0x6
021a 6807       |h   |		Jump_Zero	0x222
021b 00d9       |    |		Load_Top	At_Offset_1
021c e406       |    |		Load	0x2,0x6
021d e405       |    |		Load	0x2,0x5
021e e005       |    |		Load	0x0,0x5
021f 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0220 a5fc       |    |		Store_Unchecked	0x2,-0x4
0221 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0222 4800       |H   |		Short_Literal	0x0
0223 a5fc       |    |		Store_Unchecked	0x2,-0x4
0224 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0225 00e1       |    |		Load_Encached	Boolean_Cache
0226 e408       |    |		Load	0x2,0x8
0227 e407       |    |		Load	0x2,0x7
0228 e5fd       |    |		Load	0x2,-0x3
0229 e015       |    |		Load	0x0,0x15
022a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
022b c407       |    |		Store	0x2,0x7
022c c408       |    |		Store	0x2,0x8
022d c5fa       |    |		Store	0x2,-0x6
022e 00e1       |    |		Load_Encached	Boolean_Cache
022f e005       |    |		Load	0x0,0x5
0230 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0231 e402       |    |		Load	0x2,0x2
0232 e014       |    |		Load	0x0,0x14
0233 1841       | A  |		Execute	Package,Field_Execute,Field_Number 0x41
0234 821b       |    |		Call	0x1,0x1b
0235 c409       |    |		Store	0x2,0x9
0236 c5fa       |    |		Store	0x2,-0x6
0237 e5fa       |    |		Load	0x2,-0x6
0238 683e       |h>  |		Jump_Zero	0x277
0239 00da       |    |		Load_Top	At_Offset_2
023a e408       |    |		Load	0x2,0x8
023b e407       |    |		Load	0x2,0x7
023c e005       |    |		Load	0x0,0x5
023d 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
023e a5fc       |    |		Store_Unchecked	0x2,-0x4
023f 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0240 e5fa       |    |		Load	0x2,-0x6
0241 e005       |    |		Load	0x0,0x5
0242 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0243 e5fd       |    |		Load	0x2,-0x3
0244 e014       |    |		Load	0x0,0x14
0245 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
0246 e402       |    |		Load	0x2,0x2
0247 8226       | &  |		Call	0x1,0x26
0248 c5fc       |    |		Store	0x2,-0x4
0249 c5fa       |    |		Store	0x2,-0x6
024a e212       |    |		Load	0x1,0x12
024b 00d9       |    |		Load_Top	At_Offset_1
024c 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
024d e5fd       |    |		Load	0x2,-0x3
024e 00d9       |    |		Load_Top	At_Offset_1
024f 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0250 6027       |`'  |		Indirect_Literal	Discrete,0x278,{0x7fffffff, 0xffffffff}
0251 00d9       |    |		Load_Top	At_Offset_1
0252 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0253 4801       |H   |		Short_Literal	0x1
0254 00d9       |    |		Load_Top	At_Offset_1
0255 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0256 e216       |    |		Load	0x1,0x16
0257 00d9       |    |		Load_Top	At_Offset_1
0258 e215       |    |		Load	0x1,0x15
0259 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
025a a216       |    |		Store_Unchecked	0x1,0x16
025b 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
025c e5fa       |    |		Load	0x2,-0x6
025d e5fb       |    |		Load	0x2,-0x5
025e e005       |    |		Load	0x0,0x5
025f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0260 e5fd       |    |		Load	0x2,-0x3
0261 e402       |    |		Load	0x2,0x2
0262 8222       | "  |		Call	0x1,0x22
0263 c5fc       |    |		Store	0x2,-0x4
0264 c5fb       |    |		Store	0x2,-0x5
0265 c5fa       |    |		Store	0x2,-0x6
0266 e212       |    |		Load	0x1,0x12
0267 00d9       |    |		Load_Top	At_Offset_1
0268 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0269 e5fd       |    |		Load	0x2,-0x3
026a 00d9       |    |		Load_Top	At_Offset_1
026b 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
026c 600b       |`   |		Indirect_Literal	Discrete,0x278,{0x7fffffff, 0xffffffff}
026d 00d9       |    |		Load_Top	At_Offset_1
026e 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
026f 4803       |H   |		Short_Literal	0x3
0270 00d9       |    |		Load_Top	At_Offset_1
0271 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0272 e216       |    |		Load	0x1,0x16
0273 00d9       |    |		Load_Top	At_Offset_1
0274 e215       |    |		Load	0x1,0x15
0275 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0276 a216       |    |		Store_Unchecked	0x1,0x16
0277 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0278 7fff ffff  |    |		.LITERAL	{0x7fffffff, 0xffffffff}
027c 0000 0000  |    |		.BLANK	0000[0x4]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 02a8       |    |		.CONST	0x02a8								; Address of begin
0281 0004       |    |		.CONST	0x0004								; Address of exception handler
0282 000e       |    |		.CONST	0x000e								; Number of locals
0283			INIT_0280:
0283 e004       |    |		Load	0x0,0x4
0284 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0285 02c7       |    |		Declare_Variable	Any
0286 00db       |    |		Load_Top	At_Offset_3
0287 e014       |    |		Load	0x0,0x14
0288 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0289 a402       |    |		Store_Unchecked	0x2,0x2
028a 00e5       |    |		Load_Encached	Long_Integer_Cache
028b 03e9       |    |		Declare_Variable	Discrete,Duplicate
028c 00e6       |    |		Load_Encached	Float_Cache
028d 03d8       |    |		Declare_Variable	Float,Duplicate
028e e005       |    |		Load	0x0,0x5
028f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0290 e014       |    |		Load	0x0,0x14
0291 1b2b       | +  |		Execute	Package,Field_Read,Field_Number 0x2b
0292 02c7       |    |		Declare_Variable	Any
0293 00d8       |    |		Load_Top	At_Offset_0
0294 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0295 e014       |    |		Load	0x0,0x14
0296 1b2b       | +  |		Execute	Package,Field_Read,Field_Number 0x2b
0297 02c7       |    |		Declare_Variable	Any
0298 00d8       |    |		Load_Top	At_Offset_0
0299 1c00       |    |		Execute_Immediate	Run_Utility,0x0
029a e014       |    |		Load	0x0,0x14
029b 1b2b       | +  |		Execute	Package,Field_Read,Field_Number 0x2b
029c 02c7       |    |		Declare_Variable	Any
029d 00d8       |    |		Load_Top	At_Offset_0
029e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
029f 00e1       |    |		Load_Encached	Boolean_Cache
02a0 e214       |    |		Load	0x1,0x14
02a1 0322       | "  |		Declare_Variable	Record
02a2 00d8       |    |		Load_Top	At_Offset_0
02a3 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02a4 029f 09a3  |    |		Declare_Subprogram	INIT_09a0,For_Call
02a6 029f 09c3  |    |		Declare_Subprogram	INIT_09c0,For_Call
02a8			BODY_0280:
02a8 e212       |    |		Load	0x1,0x12
02a9 0a01       |    |		Execute_Immediate	Plus,0x1
02aa c212       |    |		Store	0x1,0x12
02ab e212       |    |		Load	0x1,0x12
02ac 00db       |    |		Load_Top	At_Offset_3
02ad 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
02ae e5ff       |    |		Load	0x2,-0x1
02af 00db       |    |		Load_Top	At_Offset_3
02b0 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
02b1 4800       |H   |		Short_Literal	0x0
02b2 a5fe       |    |		Store_Unchecked	0x2,-0x2
02b3 4800       |H   |		Short_Literal	0x0
02b4 a5fd       |    |		Store_Unchecked	0x2,-0x3
02b5 00cf       |    |		Action	Mark_Auxiliary
02b6 e402       |    |		Load	0x2,0x2
02b7 e004       |    |		Load	0x0,0x4
02b8 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
02b9 6803       |h   |		Jump_Zero	0x2bd
02ba 4800       |H   |		Short_Literal	0x0
02bb a5fc       |    |		Store_Unchecked	0x2,-0x4
02bc 78f6       |x   |		Jump	0x3b3
02bd e402       |    |		Load	0x2,0x2
02be e014       |    |		Load	0x0,0x14
02bf 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02c0 460c       |F   |		Jump_Case	0xd
02c1 7811       |x   |		Jump	0x2d3								; case 0x0
02c2 7828       |x(  |		Jump	0x2eb								; case 0x1
02c3 784b       |xK  |		Jump	0x30f								; case 0x2
02c4 785e       |x^  |		Jump	0x323								; case 0x3
02c5 7882       |x   |		Jump	0x348								; case 0x4
02c6 78a9       |x   |		Jump	0x370								; case 0x5
02c7 78c5       |x   |		Jump	0x38d								; case 0x6
02c8 78ba       |x   |		Jump	0x383								; case 0x7
02c9 78d7       |x   |		Jump	0x3a1								; case 0x8
02ca 7875       |xu  |		Jump	0x340								; case 0x9
02cb 78dc       |x   |		Jump	0x3a8								; case 0xa
02cc 78db       |x   |		Jump	0x3a8								; case 0xb
02cd 7800       |x   |		Jump	0x2ce								; case 0xc
02ce 4800       |H   |		Short_Literal	0x0
02cf a5fe       |    |		Store_Unchecked	0x2,-0x2
02d0 4800       |H   |		Short_Literal	0x0
02d1 a5fc       |    |		Store_Unchecked	0x2,-0x4
02d2 78e0       |x   |		Jump	0x3b3
02d3 e402       |    |		Load	0x2,0x2
02d4 e014       |    |		Load	0x0,0x14
02d5 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
02d6 c408       |    |		Store	0x2,0x8
02d7 e408       |    |		Load	0x2,0x8
02d8 e004       |    |		Load	0x0,0x4
02d9 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
02da 6803       |h   |		Jump_Zero	0x2de
02db 4800       |H   |		Short_Literal	0x0
02dc a5fc       |    |		Store_Unchecked	0x2,-0x4
02dd 78d5       |x   |		Jump	0x3b3
02de e5fc       |    |		Load	0x2,-0x4
02df e5fd       |    |		Load	0x2,-0x3
02e0 e5fe       |    |		Load	0x2,-0x2
02e1 e408       |    |		Load	0x2,0x8
02e2 e402       |    |		Load	0x2,0x2
02e3 00d8       |    |		Load_Top	At_Offset_0
02e4 e014       |    |		Load	0x0,0x14
02e5 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
02e6 8217       |    |		Call	0x1,0x17
02e7 c5fe       |    |		Store	0x2,-0x2
02e8 c5fd       |    |		Store	0x2,-0x3
02e9 c5fc       |    |		Store	0x2,-0x4
02ea 78c8       |x   |		Jump	0x3b3
02eb e402       |    |		Load	0x2,0x2
02ec 8224       | $  |		Call	0x1,0x24
02ed 6806       |h   |		Jump_Zero	0x2f4
02ee e005       |    |		Load	0x0,0x5
02ef 1b2b       | +  |		Execute	Package,Field_Read,Field_Number 0x2b
02f0 a5fe       |    |		Store_Unchecked	0x2,-0x2
02f1 4801       |H   |		Short_Literal	0x1
02f2 a5fc       |    |		Store_Unchecked	0x2,-0x4
02f3 78bf       |x   |		Jump	0x3b3
02f4 e402       |    |		Load	0x2,0x2
02f5 8225       | %  |		Call	0x1,0x25
02f6 6806       |h   |		Jump_Zero	0x2fd
02f7 e005       |    |		Load	0x0,0x5
02f8 1b2a       | *  |		Execute	Package,Field_Read,Field_Number 0x2a
02f9 a5fe       |    |		Store_Unchecked	0x2,-0x2
02fa 4801       |H   |		Short_Literal	0x1
02fb a5fc       |    |		Store_Unchecked	0x2,-0x4
02fc 78b6       |x   |		Jump	0x3b3
02fd e403       |    |		Load	0x2,0x3
02fe e404       |    |		Load	0x2,0x4
02ff e402       |    |		Load	0x2,0x2
0300 e015       |    |		Load	0x0,0x15
0301 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0302 c404       |    |		Store	0x2,0x4
0303 c403       |    |		Store	0x2,0x3
0304 e40b       |    |		Load	0x2,0xb
0305 e403       |    |		Load	0x2,0x3
0306 e404       |    |		Load	0x2,0x4
0307 e005       |    |		Load	0x0,0x5
0308 1834       | 4  |		Execute	Package,Field_Execute,Field_Number 0x34
0309 a5fe       |    |		Store_Unchecked	0x2,-0x2
030a e403       |    |		Load	0x2,0x3
030b e404       |    |		Load	0x2,0x4
030c 027b       | {  |		Execute	Discrete,Greater_Equal
030d a5fc       |    |		Store_Unchecked	0x2,-0x4
030e 78a4       |x   |		Jump	0x3b3
030f 00e1       |    |		Load_Encached	Boolean_Cache
0310 e403       |    |		Load	0x2,0x3
0311 e404       |    |		Load	0x2,0x4
0312 e402       |    |		Load	0x2,0x2
0313 e014       |    |		Load	0x0,0x14
0314 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
0315 e015       |    |		Load	0x0,0x15
0316 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0317 c404       |    |		Store	0x2,0x4
0318 c403       |    |		Store	0x2,0x3
0319 c5fc       |    |		Store	0x2,-0x4
031a e5fc       |    |		Load	0x2,-0x4
031b 6897       |h   |		Jump_Zero	0x3b3
031c 4800       |H   |		Short_Literal	0x0
031d e403       |    |		Load	0x2,0x3
031e e404       |    |		Load	0x2,0x4
031f e005       |    |		Load	0x0,0x5
0320 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0321 a5fe       |    |		Store_Unchecked	0x2,-0x2
0322 7890       |x   |		Jump	0x3b3
0323 00e1       |    |		Load_Encached	Boolean_Cache
0324 e405       |    |		Load	0x2,0x5
0325 e406       |    |		Load	0x2,0x6
0326 e402       |    |		Load	0x2,0x2
0327 e014       |    |		Load	0x0,0x14
0328 1842       | B  |		Execute	Package,Field_Execute,Field_Number 0x42
0329 e015       |    |		Load	0x0,0x15
032a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
032b c406       |    |		Store	0x2,0x6
032c c405       |    |		Store	0x2,0x5
032d c5fc       |    |		Store	0x2,-0x4
032e 00e1       |    |		Load_Encached	Boolean_Cache
032f e005       |    |		Load	0x0,0x5
0330 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0331 e402       |    |		Load	0x2,0x2
0332 e014       |    |		Load	0x0,0x14
0333 1841       | A  |		Execute	Package,Field_Execute,Field_Number 0x41
0334 821b       |    |		Call	0x1,0x1b
0335 c407       |    |		Store	0x2,0x7
0336 c5fc       |    |		Store	0x2,-0x4
0337 e5fc       |    |		Load	0x2,-0x4
0338 687a       |hz  |		Jump_Zero	0x3b3
0339 e407       |    |		Load	0x2,0x7
033a e405       |    |		Load	0x2,0x5
033b e406       |    |		Load	0x2,0x6
033c e005       |    |		Load	0x0,0x5
033d 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
033e a5fe       |    |		Store_Unchecked	0x2,-0x2
033f 7873       |xs  |		Jump	0x3b3
0340 e005       |    |		Load	0x0,0x5
0341 1b2d       | -  |		Execute	Package,Field_Read,Field_Number 0x2d
0342 a5fe       |    |		Store_Unchecked	0x2,-0x2
0343 4801       |H   |		Short_Literal	0x1
0344 a5fc       |    |		Store_Unchecked	0x2,-0x4
0345 4801       |H   |		Short_Literal	0x1
0346 a5fd       |    |		Store_Unchecked	0x2,-0x3
0347 786b       |xk  |		Jump	0x3b3
0348 e40a       |    |		Load	0x2,0xa
0349 0120       |    |		Execute	Any,Is_Value
034a 6803       |h   |		Jump_Zero	0x34e
034b e014       |    |		Load	0x0,0x14
034c 1b2b       | +  |		Execute	Package,Field_Read,Field_Number 0x2b
034d 7801       |x   |		Jump	0x34f
034e e40a       |    |		Load	0x2,0xa
034f e409       |    |		Load	0x2,0x9
0350 0120       |    |		Execute	Any,Is_Value
0351 6803       |h   |		Jump_Zero	0x355
0352 e014       |    |		Load	0x0,0x14
0353 1b2b       | +  |		Execute	Package,Field_Read,Field_Number 0x2b
0354 7801       |x   |		Jump	0x356
0355 e409       |    |		Load	0x2,0x9
0356 e402       |    |		Load	0x2,0x2
0357 00d8       |    |		Load_Top	At_Offset_0
0358 e004       |    |		Load	0x0,0x4
0359 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
035a 8227       | '  |		Call	0x1,0x27
035b c409       |    |		Store	0x2,0x9
035c c40a       |    |		Store	0x2,0xa
035d 00e1       |    |		Load_Encached	Boolean_Cache
035e e403       |    |		Load	0x2,0x3
035f e404       |    |		Load	0x2,0x4
0360 e409       |    |		Load	0x2,0x9
0361 e40a       |    |		Load	0x2,0xa
0362 e015       |    |		Load	0x0,0x15
0363 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0364 c404       |    |		Store	0x2,0x4
0365 c403       |    |		Store	0x2,0x3
0366 c5fc       |    |		Store	0x2,-0x4
0367 e5fc       |    |		Load	0x2,-0x4
0368 6848       |hH  |		Jump_Zero	0x3b1
0369 e40b       |    |		Load	0x2,0xb
036a e403       |    |		Load	0x2,0x3
036b e404       |    |		Load	0x2,0x4
036c e005       |    |		Load	0x0,0x5
036d 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
036e a5fe       |    |		Store_Unchecked	0x2,-0x2
036f 7843       |xC  |		Jump	0x3b3
0370 e402       |    |		Load	0x2,0x2
0371 e014       |    |		Load	0x0,0x14
0372 1845       | E  |		Execute	Package,Field_Execute,Field_Number 0x45
0373 680c       |h   |		Jump_Zero	0x380
0374 e5fc       |    |		Load	0x2,-0x4
0375 e005       |    |		Load	0x0,0x5
0376 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0377 e402       |    |		Load	0x2,0x2
0378 e014       |    |		Load	0x0,0x14
0379 1846       | F  |		Execute	Package,Field_Execute,Field_Number 0x46
037a e402       |    |		Load	0x2,0x2
037b 8226       | &  |		Call	0x1,0x26
037c c5fe       |    |		Store	0x2,-0x2
037d c5fc       |    |		Store	0x2,-0x4
037e 840d       |    |		Call	0x2,0xd
037f 7833       |x3  |		Jump	0x3b3
0380 4800       |H   |		Short_Literal	0x0
0381 a5fc       |    |		Store_Unchecked	0x2,-0x4
0382 7830       |x0  |		Jump	0x3b3
0383 e5fc       |    |		Load	0x2,-0x4
0384 e005       |    |		Load	0x0,0x5
0385 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0386 e402       |    |		Load	0x2,0x2
0387 821c       |    |		Call	0x1,0x1c
0388 c5fe       |    |		Store	0x2,-0x2
0389 c5fc       |    |		Store	0x2,-0x4
038a 4801       |H   |		Short_Literal	0x1
038b a5fd       |    |		Store_Unchecked	0x2,-0x3
038c 7826       |x&  |		Jump	0x3b3
038d e5fc       |    |		Load	0x2,-0x4
038e e5fd       |    |		Load	0x2,-0x3
038f e005       |    |		Load	0x0,0x5
0390 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0391 e004       |    |		Load	0x0,0x4
0392 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0393 e402       |    |		Load	0x2,0x2
0394 8222       | "  |		Call	0x1,0x22
0395 c5fe       |    |		Store	0x2,-0x2
0396 c5fd       |    |		Store	0x2,-0x3
0397 c5fc       |    |		Store	0x2,-0x4
0398 e402       |    |		Load	0x2,0x2
0399 e40c       |    |		Load	0x2,0xc
039a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
039b e402       |    |		Load	0x2,0x2
039c e014       |    |		Load	0x0,0x14
039d 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
039e 6814       |h   |		Jump_Zero	0x3b3
039f 840e       |    |		Call	0x2,0xe
03a0 7812       |x   |		Jump	0x3b3
03a1 e402       |    |		Load	0x2,0x2
03a2 e014       |    |		Load	0x0,0x14
03a3 1859       | Y  |		Execute	Package,Field_Execute,Field_Number 0x59
03a4 e014       |    |		Load	0x0,0x14
03a5 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
03a6 c402       |    |		Store	0x2,0x2
03a7 7809       |x   |		Jump	0x3b1
03a8 e402       |    |		Load	0x2,0x2
03a9 e009       |    |		Load	0x0,0x9
03aa 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
03ab c402       |    |		Store	0x2,0x2
03ac 4801       |H   |		Short_Literal	0x1
03ad e402       |    |		Load	0x2,0x2
03ae e004       |    |		Load	0x0,0x4
03af 1850       | P  |		Execute	Package,Field_Execute,Field_Number 0x50
03b0 c402       |    |		Store	0x2,0x2
03b1 00c9       |    |		Action	Pop_Auxiliary_Loop
03b2 7f03       |    |		Jump	0x2b6
03b3 00ce       |    |		Action	Pop_Auxiliary
03b4 e5fe       |    |		Load	0x2,-0x2
03b5 00db       |    |		Load_Top	At_Offset_3
03b6 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
03b7 e5fc       |    |		Load	0x2,-0x4
03b8 00db       |    |		Load_Top	At_Offset_3
03b9 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
03ba e216       |    |		Load	0x1,0x16
03bb 00db       |    |		Load_Top	At_Offset_3
03bc e215       |    |		Load	0x1,0x15
03bd 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03be a216       |    |		Store_Unchecked	0x1,0x16
03bf e212       |    |		Load	0x1,0x12
03c0 0aff       |    |		Execute_Immediate	Plus,-0x1
03c1 c212       |    |		Store	0x1,0x12
03c2 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03c3 0000 0000  |    |		.BLANK	0000[0x5]
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03d5       |    |		.CONST	0x03d5								; Address of begin
03c9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ca 0003       |    |		.CONST	0x0003								; Number of locals
03cb			INIT_03c8:
03cb e004       |    |		Load	0x0,0x4
03cc 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
03cd 02c7       |    |		Declare_Variable	Any
03ce 00db       |    |		Load_Top	At_Offset_3
03cf e009       |    |		Load	0x0,0x9
03d0 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
03d1 a402       |    |		Store_Unchecked	0x2,0x2
03d2 e005       |    |		Load	0x0,0x5
03d3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03d4 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
03d5			BODY_03c8:
03d5 00cf       |    |		Action	Mark_Auxiliary
03d6 7808       |x   |		Jump	0x3df
03d7 00d9       |    |		Load_Top	At_Offset_1
03d8 0a01       |    |		Execute_Immediate	Plus,0x1
03d9 005a       | Z  |		Store_Top	Discrete,At_Offset_2
03da 00da       |    |		Load_Top	At_Offset_2
03db e004       |    |		Load	0x0,0x4
03dc 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
03dd c402       |    |		Store	0x2,0x2
03de 00c9       |    |		Action	Pop_Auxiliary_Loop
03df 00da       |    |		Load_Top	At_Offset_2
03e0 e004       |    |		Load	0x0,0x4
03e1 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
03e2 6ff4       |o   |		Jump_Zero	0x3d7
03e3 00ce       |    |		Action	Pop_Auxiliary
03e4 00d8       |    |		Load_Top	At_Offset_0
03e5 a5fe       |    |		Store_Unchecked	0x2,-0x2
03e6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03e7 0000       |    |		.XXX[0x1]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03eb       |    |		.CONST	0x03eb								; Address of begin
03e9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ea 0001       |    |		.CONST	0x0001								; Number of locals
03eb			BODY_03e8:
03eb			INIT_03e8:
03eb 00da       |    |		Load_Top	At_Offset_2
03ec e5fe       |    |		Load	0x2,-0x2
03ed 026e       | n  |		Execute	Discrete,Modulo
03ee 7002       |p   |		Jump_Nonzero	0x3f1
03ef 00da       |    |		Load_Top	At_Offset_2
03f0 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
03f1 00da       |    |		Load_Top	At_Offset_2
03f2 e5fe       |    |		Load	0x2,-0x2
03f3 0270       | p  |		Execute	Discrete,Divide
03f4 0a01       |    |		Execute_Immediate	Plus,0x1
03f5 e5fe       |    |		Load	0x2,-0x2
03f6 0271       | q  |		Execute	Discrete,Times
03f7 e005       |    |		Load	0x0,0x5
03f8 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03f9 00d9       |    |		Load_Top	At_Offset_1
03fa 00d0       |    |		Action	Swap_Control
03fb 0260       | `  |		Execute	Discrete,In_Type
03fc 7001       |p   |		Jump_Nonzero	0x3fe
03fd 0801       |    |		Execute_Immediate	Raise,0x1
03fe 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
03ff 0000       |    |		.XXX[0x1]
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 0403       |    |		.CONST	0x0403								; Address of begin
0401 0004       |    |		.CONST	0x0004								; Address of exception handler
0402 0001       |    |		.CONST	0x0001								; Number of locals
0403			BODY_0400:
0403			INIT_0400:
0403 00da       |    |		Load_Top	At_Offset_2
0404 e016       |    |		Load	0x0,0x16
0405 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0406 6807       |h   |		Jump_Zero	0x40e
0407 00da       |    |		Load_Top	At_Offset_2
0408 e016       |    |		Load	0x0,0x16
0409 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
040a c5fe       |    |		Store	0x2,-0x2
040b 4801       |H   |		Short_Literal	0x1
040c a5fd       |    |		Store_Unchecked	0x2,-0x3
040d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
040e 4800       |H   |		Short_Literal	0x0
040f a5fe       |    |		Store_Unchecked	0x2,-0x2
0410 4800       |H   |		Short_Literal	0x0
0411 a5fd       |    |		Store_Unchecked	0x2,-0x3
0412 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0413 0000 0000  |    |		.BLANK	0000[0x5]
0418 ; --------------------------------------------------------------------------------------
0418 ; SUBPROGRAM
0418 ; --------------------------------------------------------------------------------------
0418 041b       |    |		.CONST	0x041b								; Address of begin
0419 0004       |    |		.CONST	0x0004								; Address of exception handler
041a 0001       |    |		.CONST	0x0001								; Number of locals
041b			BODY_0418:
041b			INIT_0418:
041b e005       |    |		Load	0x0,0x5
041c 1b2c       | ,  |		Execute	Package,Field_Read,Field_Number 0x2c
041d a5fe       |    |		Store_Unchecked	0x2,-0x2
041e 4801       |H   |		Short_Literal	0x1
041f a5fd       |    |		Store_Unchecked	0x2,-0x3
0420 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0421 0000 0000  |    |		.BLANK	0000[0x7]
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; --------------------------------------------------------------------------------------
0428 042d       | -  |		.CONST	0x042d								; Address of begin
0429 0434       | 4  |		.CONST	0x0434								; Address of exception handler
042a 0002       |    |		.CONST	0x0002								; Number of locals
042b			INIT_0428:
042b e005       |    |		Load	0x0,0x5
042c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
042d			BODY_0428:
042d e5fe       |    |		Load	0x2,-0x2
042e e5ff       |    |		Load	0x2,-0x1
042f 0272       | r  |		Execute	Discrete,Minus
0430 0a01       |    |		Execute_Immediate	Plus,0x1
0431 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0432 00d8       |    |		Load_Top	At_Offset_0
0433 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0434			TRAP_0428:
0434 010e       |    |		Execute	Exception,Is_Constraint_Error
0435 6802       |h   |		Jump_Zero	0x438
0436 4800       |H   |		Short_Literal	0x0
0437 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0438 010d       |    |		Execute	Exception,Is_Numeric_Error
0439 6802       |h   |		Jump_Zero	0x43c
043a 4800       |H   |		Short_Literal	0x0
043b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
043c 0100       |    |		Execute	Exception,Raise
043d 0000 0000  |    |		.XXX[0x3]
043f 0000       |    |
0440 ; --------------------------------------------------------------------------------------
0440 ; SUBPROGRAM
0440 ; --------------------------------------------------------------------------------------
0440 044f       | O  |		.CONST	0x044f								; Address of begin
0441 0004       |    |		.CONST	0x0004								; Address of exception handler
0442 0003       |    |		.CONST	0x0003								; Number of locals
0443			INIT_0440:
0443 e004       |    |		Load	0x0,0x4
0444 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0445 02c7       |    |		Declare_Variable	Any
0446 00db       |    |		Load_Top	At_Offset_3
0447 e014       |    |		Load	0x0,0x14
0448 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0449 a402       |    |		Store_Unchecked	0x2,0x2
044a e004       |    |		Load	0x0,0x4
044b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
044c 02c7       |    |		Declare_Variable	Any
044d 00d8       |    |		Load_Top	At_Offset_0
044e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
044f			BODY_0440:
044f 00cf       |    |		Action	Mark_Auxiliary
0450 7811       |x   |		Jump	0x462
0451 00da       |    |		Load_Top	At_Offset_2
0452 e004       |    |		Load	0x0,0x4
0453 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0454 c403       |    |		Store	0x2,0x3
0455 00d9       |    |		Load_Top	At_Offset_1
0456 e016       |    |		Load	0x0,0x16
0457 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0458 0f09       |    |		Execute_Immediate	Equal,0x9
0459 7003       |p   |		Jump_Nonzero	0x45d
045a e004       |    |		Load	0x0,0x4
045b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
045c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
045d 4801       |H   |		Short_Literal	0x1
045e 00da       |    |		Load_Top	At_Offset_2
045f e004       |    |		Load	0x0,0x4
0460 1850       | P  |		Execute	Package,Field_Execute,Field_Number 0x50
0461 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0462 00da       |    |		Load_Top	At_Offset_2
0463 e004       |    |		Load	0x0,0x4
0464 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0465 6feb       |o   |		Jump_Zero	0x451
0466 00ce       |    |		Action	Pop_Auxiliary
0467 0831       | 1  |		Execute_Immediate	Raise,0x31
0468 ; --------------------------------------------------------------------------------------
0468 ; SUBPROGRAM
0468 ; --------------------------------------------------------------------------------------
0468 047c       | |  |		.CONST	0x047c								; Address of begin
0469 0004       |    |		.CONST	0x0004								; Address of exception handler
046a 0005       |    |		.CONST	0x0005								; Number of locals
046b			INIT_0468:
046b e004       |    |		Load	0x0,0x4
046c 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
046d 02c7       |    |		Declare_Variable	Any
046e 00db       |    |		Load_Top	At_Offset_3
046f a402       |    |		Store_Unchecked	0x2,0x2
0470 e004       |    |		Load	0x0,0x4
0471 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0472 02c7       |    |		Declare_Variable	Any
0473 00d8       |    |		Load_Top	At_Offset_0
0474 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0475 e004       |    |		Load	0x0,0x4
0476 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0477 02c7       |    |		Declare_Variable	Any
0478 00d8       |    |		Load_Top	At_Offset_0
0479 1c00       |    |		Execute_Immediate	Run_Utility,0x0
047a 029f 09e3  |    |		Declare_Subprogram	INIT_09e0,For_Call
047c			BODY_0468:
047c e5fe       |    |		Load	0x2,-0x2
047d e004       |    |		Load	0x0,0x4
047e 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
047f 6802       |h   |		Jump_Zero	0x482
0480 4800       |H   |		Short_Literal	0x0
0481 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0482 e5fe       |    |		Load	0x2,-0x2
0483 821e       |    |		Call	0x1,0x1e
0484 c404       |    |		Store	0x2,0x4
0485 00cf       |    |		Action	Mark_Auxiliary
0486 7823       |x#  |		Jump	0x4aa
0487 e402       |    |		Load	0x2,0x2
0488 e004       |    |		Load	0x0,0x4
0489 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
048a c403       |    |		Store	0x2,0x3
048b 00db       |    |		Load_Top	At_Offset_3
048c e014       |    |		Load	0x0,0x14
048d 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
048e 4604       |F   |		Jump_Case	0x5
048f 7806       |x   |		Jump	0x496								; case 0x0
0490 7807       |x   |		Jump	0x498								; case 0x1
0491 7808       |x   |		Jump	0x49a								; case 0x2
0492 7809       |x   |		Jump	0x49c								; case 0x3
0493 7800       |x   |		Jump	0x494								; case 0x4
0494 4800       |H   |		Short_Literal	0x0
0495 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0496 4800       |H   |		Short_Literal	0x0
0497 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0498 8405       |    |		Call	0x2,0x5
0499 780b       |x   |		Jump	0x4a5
049a 4800       |H   |		Short_Literal	0x0
049b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
049c 4801       |H   |		Short_Literal	0x1
049d e403       |    |		Load	0x2,0x3
049e e014       |    |		Load	0x0,0x14
049f 183c       | <  |		Execute	Package,Field_Execute,Field_Number 0x3c
04a0 e004       |    |		Load	0x0,0x4
04a1 1850       | P  |		Execute	Package,Field_Execute,Field_Number 0x50
04a2 00db       |    |		Load_Top	At_Offset_3
04a3 012f       | /  |		Execute	Any,Equal
04a4 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
04a5 e402       |    |		Load	0x2,0x2
04a6 e004       |    |		Load	0x0,0x4
04a7 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
04a8 c402       |    |		Store	0x2,0x2
04a9 00c9       |    |		Action	Pop_Auxiliary_Loop
04aa e402       |    |		Load	0x2,0x2
04ab e004       |    |		Load	0x0,0x4
04ac 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
04ad 6fd9       |o   |		Jump_Zero	0x487
04ae 00ce       |    |		Action	Pop_Auxiliary
04af 4800       |H   |		Short_Literal	0x0
04b0 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
04b1 0000 0000  |    |		.BLANK	0000[0x7]
04b8 ; --------------------------------------------------------------------------------------
04b8 ; SUBPROGRAM
04b8 ; --------------------------------------------------------------------------------------
04b8 04ef       |    |		.CONST	0x04ef								; Address of begin
04b9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ba 0011       |    |		.CONST	0x0011								; Number of locals
04bb			INIT_04b8:
04bb e004       |    |		Load	0x0,0x4
04bc 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
04bd 02c7       |    |		Declare_Variable	Any
04be 00d8       |    |		Load_Top	At_Offset_0
04bf 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04c0 e004       |    |		Load	0x0,0x4
04c1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04c2 02c7       |    |		Declare_Variable	Any
04c3 00d8       |    |		Load_Top	At_Offset_0
04c4 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04c5 e004       |    |		Load	0x0,0x4
04c6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04c7 02c7       |    |		Declare_Variable	Any
04c8 00d8       |    |		Load_Top	At_Offset_0
04c9 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04ca e005       |    |		Load	0x0,0x5
04cb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04cc 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
04cd 03e9       |    |		Declare_Variable	Discrete,Duplicate
04ce 03e9       |    |		Declare_Variable	Discrete,Duplicate
04cf e004       |    |		Load	0x0,0x4
04d0 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
04d1 02c7       |    |		Declare_Variable	Any
04d2 00d8       |    |		Load_Top	At_Offset_0
04d3 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04d4 e004       |    |		Load	0x0,0x4
04d5 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
04d6 02c7       |    |		Declare_Variable	Any
04d7 00d8       |    |		Load_Top	At_Offset_0
04d8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04d9 00e1       |    |		Load_Encached	Boolean_Cache
04da 00e1       |    |		Load_Encached	Boolean_Cache
04db e004       |    |		Load	0x0,0x4
04dc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04dd 02c7       |    |		Declare_Variable	Any
04de 00d8       |    |		Load_Top	At_Offset_0
04df 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04e0 e004       |    |		Load	0x0,0x4
04e1 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
04e2 02c7       |    |		Declare_Variable	Any
04e3 00d8       |    |		Load_Top	At_Offset_0
04e4 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04e5 e005       |    |		Load	0x0,0x5
04e6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04e7 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
04e8 00e1       |    |		Load_Encached	Boolean_Cache
04e9 e214       |    |		Load	0x1,0x14
04ea 0322       | "  |		Declare_Variable	Record
04eb 00d8       |    |		Load_Top	At_Offset_0
04ec 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04ed 00e1       |    |		Load_Encached	Boolean_Cache
04ee 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
04ef			BODY_04b8:
04ef e402       |    |		Load	0x2,0x2
04f0 0120       |    |		Execute	Any,Is_Value
04f1 6803       |h   |		Jump_Zero	0x4f5
04f2 e004       |    |		Load	0x0,0x4
04f3 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
04f4 7801       |x   |		Jump	0x4f6
04f5 e402       |    |		Load	0x2,0x2
04f6 e5fd       |    |		Load	0x2,-0x3
04f7 e004       |    |		Load	0x0,0x4
04f8 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
04f9 c402       |    |		Store	0x2,0x2
04fa e402       |    |		Load	0x2,0x2
04fb e004       |    |		Load	0x0,0x4
04fc 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
04fd c402       |    |		Store	0x2,0x2
04fe 4800       |H   |		Short_Literal	0x0
04ff a5fc       |    |		Store_Unchecked	0x2,-0x4
0500 4801       |H   |		Short_Literal	0x1
0501 a5fa       |    |		Store_Unchecked	0x2,-0x6
0502 4800       |H   |		Short_Literal	0x0
0503 a5fb       |    |		Store_Unchecked	0x2,-0x5
0504 00cf       |    |		Action	Mark_Auxiliary
0505 78ad       |x   |		Jump	0x5b3
0506 e402       |    |		Load	0x2,0x2
0507 e004       |    |		Load	0x0,0x4
0508 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0509 c403       |    |		Store	0x2,0x3
050a 4800       |H   |		Short_Literal	0x0
050b a405       |    |		Store_Unchecked	0x2,0x5
050c e403       |    |		Load	0x2,0x3
050d e014       |    |		Load	0x0,0x14
050e 1853       | S  |		Execute	Package,Field_Execute,Field_Number 0x53
050f 4603       |F   |		Jump_Case	0x4
0510 787e       |x~  |		Jump	0x58f								; case 0x0
0511 7807       |x   |		Jump	0x519								; case 0x1
0512 7818       |x   |		Jump	0x52b								; case 0x2
0513 7800       |x   |		Jump	0x514								; case 0x3
0514 4800       |H   |		Short_Literal	0x0
0515 a5fc       |    |		Store_Unchecked	0x2,-0x4
0516 4800       |H   |		Short_Literal	0x0
0517 a40f       |    |		Store_Unchecked	0x2,0xf
0518 787a       |xz  |		Jump	0x593
0519 e005       |    |		Load	0x0,0x5
051a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
051b e403       |    |		Load	0x2,0x3
051c 8219       |    |		Call	0x1,0x19
051d c40e       |    |		Store	0x2,0xe
051e e403       |    |		Load	0x2,0x3
051f e009       |    |		Load	0x0,0x9
0520 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0521 c404       |    |		Store	0x2,0x4
0522 00db       |    |		Load_Top	At_Offset_3
0523 e40a       |    |		Load	0x2,0xa
0524 e405       |    |		Load	0x2,0x5
0525 e404       |    |		Load	0x2,0x4
0526 8218       |    |		Call	0x1,0x18
0527 c405       |    |		Store	0x2,0x5
0528 c40a       |    |		Store	0x2,0xa
0529 c40f       |    |		Store	0x2,0xf
052a 7868       |xh  |		Jump	0x593
052b e409       |    |		Load	0x2,0x9
052c 0120       |    |		Execute	Any,Is_Value
052d 6803       |h   |		Jump_Zero	0x531
052e e004       |    |		Load	0x0,0x4
052f 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0530 7801       |x   |		Jump	0x532
0531 e409       |    |		Load	0x2,0x9
0532 e403       |    |		Load	0x2,0x3
0533 e014       |    |		Load	0x0,0x14
0534 1855       | U  |		Execute	Package,Field_Execute,Field_Number 0x55
0535 e004       |    |		Load	0x0,0x4
0536 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0537 c409       |    |		Store	0x2,0x9
0538 e409       |    |		Load	0x2,0x9
0539 e004       |    |		Load	0x0,0x4
053a 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
053b c409       |    |		Store	0x2,0x9
053c 00cf       |    |		Action	Mark_Auxiliary
053d 784b       |xK  |		Jump	0x589
053e e409       |    |		Load	0x2,0x9
053f e004       |    |		Load	0x0,0x4
0540 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0541 c40c       |    |		Store	0x2,0xc
0542 e40c       |    |		Load	0x2,0xc
0543 e014       |    |		Load	0x0,0x14
0544 1856       | V  |		Execute	Package,Field_Execute,Field_Number 0x56
0545 c40d       |    |		Store	0x2,0xd
0546 e40c       |    |		Load	0x2,0xc
0547 e014       |    |		Load	0x0,0x14
0548 1857       | W  |		Execute	Package,Field_Execute,Field_Number 0x57
0549 c408       |    |		Store	0x2,0x8
054a e40f       |    |		Load	0x2,0xf
054b e40b       |    |		Load	0x2,0xb
054c e005       |    |		Load	0x0,0x5
054d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
054e e408       |    |		Load	0x2,0x8
054f e5fe       |    |		Load	0x2,-0x2
0550 e5ff       |    |		Load	0x2,-0x1
0551 8220       |    |		Call	0x1,0x20
0552 c408       |    |		Store	0x2,0x8
0553 c406       |    |		Store	0x2,0x6
0554 c40b       |    |		Store	0x2,0xb
0555 c40f       |    |		Store	0x2,0xf
0556 e212       |    |		Load	0x1,0x12
0557 0a01       |    |		Execute_Immediate	Plus,0x1
0558 e410       |    |		Load	0x2,0x10
0559 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
055a e40c       |    |		Load	0x2,0xc
055b e410       |    |		Load	0x2,0x10
055c 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
055d 6062       |`b  |		Indirect_Literal	Discrete,0x5c0,{0x7fffffff, 0xffffffff}
055e e410       |    |		Load	0x2,0x10
055f 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0560 4804       |H   |		Short_Literal	0x4
0561 e410       |    |		Load	0x2,0x10
0562 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0563 e216       |    |		Load	0x1,0x16
0564 e410       |    |		Load	0x2,0x10
0565 e215       |    |		Load	0x1,0x15
0566 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0567 a216       |    |		Store_Unchecked	0x1,0x16
0568 e40f       |    |		Load	0x2,0xf
0569 6818       |h   |		Jump_Zero	0x582
056a e5fe       |    |		Load	0x2,-0x2
056b 700d       |p   |		Jump_Nonzero	0x579
056c 00da       |    |		Load_Top	At_Offset_2
056d 700b       |p   |		Jump_Nonzero	0x579
056e e5ff       |    |		Load	0x2,-0x1
056f e40d       |    |		Load	0x2,0xd
0570 821f       |    |		Call	0x1,0x1f
0571 6807       |h   |		Jump_Zero	0x579
0572 4801       |H   |		Short_Literal	0x1
0573 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0574 e406       |    |		Load	0x2,0x6
0575 a405       |    |		Store_Unchecked	0x2,0x5
0576 e40b       |    |		Load	0x2,0xb
0577 a40a       |    |		Store_Unchecked	0x2,0xa
0578 7814       |x   |		Jump	0x58d
0579 e406       |    |		Load	0x2,0x6
057a e405       |    |		Load	0x2,0x5
057b 027d       | }  |		Execute	Discrete,Greater
057c 6807       |h   |		Jump_Zero	0x584
057d e406       |    |		Load	0x2,0x6
057e a405       |    |		Store_Unchecked	0x2,0x5
057f e40b       |    |		Load	0x2,0xb
0580 a40a       |    |		Store_Unchecked	0x2,0xa
0581 7802       |x   |		Jump	0x584
0582 4800       |H   |		Short_Literal	0x0
0583 a5fc       |    |		Store_Unchecked	0x2,-0x4
0584 e409       |    |		Load	0x2,0x9
0585 e004       |    |		Load	0x0,0x4
0586 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0587 c409       |    |		Store	0x2,0x9
0588 00c9       |    |		Action	Pop_Auxiliary_Loop
0589 e409       |    |		Load	0x2,0x9
058a e004       |    |		Load	0x0,0x4
058b 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
058c 6fb1       |o   |		Jump_Zero	0x53e
058d 00ce       |    |		Action	Pop_Auxiliary
058e 7804       |x   |		Jump	0x593
058f 4800       |H   |		Short_Literal	0x0
0590 a405       |    |		Store_Unchecked	0x2,0x5
0591 4801       |H   |		Short_Literal	0x1
0592 a40f       |    |		Store_Unchecked	0x2,0xf
0593 00db       |    |		Load_Top	At_Offset_3
0594 6815       |h   |		Jump_Zero	0x5aa
0595 e40a       |    |		Load	0x2,0xa
0596 680c       |h   |		Jump_Zero	0x5a3
0597 4801       |H   |		Short_Literal	0x1
0598 a5fb       |    |		Store_Unchecked	0x2,-0x5
0599 e405       |    |		Load	0x2,0x5
059a e40e       |    |		Load	0x2,0xe
059b e005       |    |		Load	0x0,0x5
059c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
059d e407       |    |		Load	0x2,0x7
059e 821a       |    |		Call	0x1,0x1a
059f 0271       | q  |		Execute	Discrete,Times
05a0 0273       | s  |		Execute	Discrete,Plus
05a1 c407       |    |		Store	0x2,0x7
05a2 780b       |x   |		Jump	0x5ae
05a3 e407       |    |		Load	0x2,0x7
05a4 e40e       |    |		Load	0x2,0xe
05a5 e405       |    |		Load	0x2,0x5
05a6 0271       | q  |		Execute	Discrete,Times
05a7 0273       | s  |		Execute	Discrete,Plus
05a8 c407       |    |		Store	0x2,0x7
05a9 7804       |x   |		Jump	0x5ae
05aa e5fa       |    |		Load	0x2,-0x6
05ab e40f       |    |		Load	0x2,0xf
05ac 0279       | y  |		Execute	Discrete,And
05ad a5fa       |    |		Store_Unchecked	0x2,-0x6
05ae e402       |    |		Load	0x2,0x2
05af e004       |    |		Load	0x0,0x4
05b0 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
05b1 c402       |    |		Store	0x2,0x2
05b2 00c9       |    |		Action	Pop_Auxiliary_Loop
05b3 e402       |    |		Load	0x2,0x2
05b4 e004       |    |		Load	0x0,0x4
05b5 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
05b6 6f4f       |oO  |		Jump_Zero	0x506
05b7 00ce       |    |		Action	Pop_Auxiliary
05b8 e5fa       |    |		Load	0x2,-0x6
05b9 6803       |h   |		Jump_Zero	0x5bd
05ba e407       |    |		Load	0x2,0x7
05bb a5fc       |    |		Store_Unchecked	0x2,-0x4
05bc 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05bd 4800       |H   |		Short_Literal	0x0
05be a5fc       |    |		Store_Unchecked	0x2,-0x4
05bf 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05c0 7fff ffff  |    |		.LITERAL	{0x7fffffff, 0xffffffff}
05c4 0000 0000  |    |		.BLANK	0000[0x4]
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05d5       |    |		.CONST	0x05d5								; Address of begin
05c9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ca 0003       |    |		.CONST	0x0003								; Number of locals
05cb			INIT_05c8:
05cb e004       |    |		Load	0x0,0x4
05cc 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
05cd 02c7       |    |		Declare_Variable	Any
05ce 00db       |    |		Load_Top	At_Offset_3
05cf a402       |    |		Store_Unchecked	0x2,0x2
05d0 e004       |    |		Load	0x0,0x4
05d1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05d2 02c7       |    |		Declare_Variable	Any
05d3 00d8       |    |		Load_Top	At_Offset_0
05d4 1c00       |    |		Execute_Immediate	Run_Utility,0x0
05d5			BODY_05c8:
05d5 00cf       |    |		Action	Mark_Auxiliary
05d6 780f       |x   |		Jump	0x5e6
05d7 00da       |    |		Load_Top	At_Offset_2
05d8 e004       |    |		Load	0x0,0x4
05d9 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
05da c403       |    |		Store	0x2,0x3
05db 00d9       |    |		Load_Top	At_Offset_1
05dc e017       |    |		Load	0x0,0x17
05dd 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05de 6802       |h   |		Jump_Zero	0x5e1
05df 4801       |H   |		Short_Literal	0x1
05e0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05e1 00da       |    |		Load_Top	At_Offset_2
05e2 e004       |    |		Load	0x0,0x4
05e3 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
05e4 c402       |    |		Store	0x2,0x2
05e5 00c9       |    |		Action	Pop_Auxiliary_Loop
05e6 00da       |    |		Load_Top	At_Offset_2
05e7 e004       |    |		Load	0x0,0x4
05e8 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
05e9 6fed       |o   |		Jump_Zero	0x5d7
05ea 00ce       |    |		Action	Pop_Auxiliary
05eb 4800       |H   |		Short_Literal	0x0
05ec 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05ed 0000 0000  |    |		.XXX[0x3]
05ef 0000       |    |
05f0 ; --------------------------------------------------------------------------------------
05f0 ; SUBPROGRAM
05f0 ; --------------------------------------------------------------------------------------
05f0 05f8       |    |		.CONST	0x05f8								; Address of begin
05f1 0004       |    |		.CONST	0x0004								; Address of exception handler
05f2 0002       |    |		.CONST	0x0002								; Number of locals
05f3			INIT_05f0:
05f3 e004       |    |		Load	0x0,0x4
05f4 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
05f5 02c7       |    |		Declare_Variable	Any
05f6 00d8       |    |		Load_Top	At_Offset_0
05f7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
05f8			BODY_05f0:
05f8 00db       |    |		Load_Top	At_Offset_3
05f9 e014       |    |		Load	0x0,0x14
05fa 1851       | Q  |		Execute	Package,Field_Execute,Field_Number 0x51
05fb c402       |    |		Store	0x2,0x2
05fc 00db       |    |		Load_Top	At_Offset_3
05fd e014       |    |		Load	0x0,0x14
05fe 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
05ff 6813       |h   |		Jump_Zero	0x613
0600 00db       |    |		Load_Top	At_Offset_3
0601 e014       |    |		Load	0x0,0x14
0602 184c       | L  |		Execute	Package,Field_Execute,Field_Number 0x4c
0603 8221       | !  |		Call	0x1,0x21
0604 680e       |h   |		Jump_Zero	0x613
0605 e5fb       |    |		Load	0x2,-0x5
0606 e5fc       |    |		Load	0x2,-0x4
0607 e005       |    |		Load	0x0,0x5
0608 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0609 00db       |    |		Load_Top	At_Offset_3
060a 4801       |H   |		Short_Literal	0x1
060b e004       |    |		Load	0x0,0x4
060c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
060d 8220       |    |		Call	0x1,0x20
060e c402       |    |		Store	0x2,0x2
060f c5fd       |    |		Store	0x2,-0x3
0610 c5fc       |    |		Store	0x2,-0x4
0611 c5fb       |    |		Store	0x2,-0x5
0612 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0613 e5fb       |    |		Load	0x2,-0x5
0614 e5fc       |    |		Load	0x2,-0x4
0615 e005       |    |		Load	0x0,0x5
0616 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0617 00db       |    |		Load_Top	At_Offset_3
0618 4800       |H   |		Short_Literal	0x0
0619 e5fe       |    |		Load	0x2,-0x2
061a 8220       |    |		Call	0x1,0x20
061b c402       |    |		Store	0x2,0x2
061c c5fd       |    |		Store	0x2,-0x3
061d c5fc       |    |		Store	0x2,-0x4
061e c5fb       |    |		Store	0x2,-0x5
061f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0620 ; --------------------------------------------------------------------------------------
0620 ; SUBPROGRAM
0620 ; --------------------------------------------------------------------------------------
0620 063c       | <  |		.CONST	0x063c								; Address of begin
0621 0004       |    |		.CONST	0x0004								; Address of exception handler
0622 0008       |    |		.CONST	0x0008								; Number of locals
0623			INIT_0620:
0623 e004       |    |		Load	0x0,0x4
0624 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0625 02c7       |    |		Declare_Variable	Any
0626 00db       |    |		Load_Top	At_Offset_3
0627 a402       |    |		Store_Unchecked	0x2,0x2
0628 e014       |    |		Load	0x0,0x14
0629 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
062a 02c7       |    |		Declare_Variable	Any
062b 00d8       |    |		Load_Top	At_Offset_0
062c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
062d e014       |    |		Load	0x0,0x14
062e 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
062f 02c7       |    |		Declare_Variable	Any
0630 00d8       |    |		Load_Top	At_Offset_0
0631 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0632 e014       |    |		Load	0x0,0x14
0633 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0634 02c7       |    |		Declare_Variable	Any
0635 00d8       |    |		Load_Top	At_Offset_0
0636 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0637 00e5       |    |		Load_Encached	Long_Integer_Cache
0638 03e9       |    |		Declare_Variable	Discrete,Duplicate
0639 e005       |    |		Load	0x0,0x5
063a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
063b 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
063c			BODY_0620:
063c 4801       |H   |		Short_Literal	0x1
063d a5fd       |    |		Store_Unchecked	0x2,-0x3
063e 00cf       |    |		Action	Mark_Auxiliary
063f 782a       |x*  |		Jump	0x66a
0640 e402       |    |		Load	0x2,0x2
0641 e004       |    |		Load	0x0,0x4
0642 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0643 c403       |    |		Store	0x2,0x3
0644 e405       |    |		Load	0x2,0x5
0645 0120       |    |		Execute	Any,Is_Value
0646 6803       |h   |		Jump_Zero	0x64a
0647 e016       |    |		Load	0x0,0x16
0648 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0649 7801       |x   |		Jump	0x64b
064a e405       |    |		Load	0x2,0x5
064b e404       |    |		Load	0x2,0x4
064c 0120       |    |		Execute	Any,Is_Value
064d 6803       |h   |		Jump_Zero	0x651
064e e016       |    |		Load	0x0,0x16
064f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0650 7801       |x   |		Jump	0x652
0651 e404       |    |		Load	0x2,0x4
0652 00e1       |    |		Load_Encached	Boolean_Cache
0653 e407       |    |		Load	0x2,0x7
0654 e406       |    |		Load	0x2,0x6
0655 e403       |    |		Load	0x2,0x3
0656 e015       |    |		Load	0x0,0x15
0657 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0658 c406       |    |		Store	0x2,0x6
0659 c407       |    |		Store	0x2,0x7
065a c5fd       |    |		Store	0x2,-0x3
065b c404       |    |		Store	0x2,0x4
065c c405       |    |		Store	0x2,0x5
065d e5fd       |    |		Load	0x2,-0x3
065e 680f       |h   |		Jump_Zero	0x66e
065f 00d9       |    |		Load_Top	At_Offset_1
0660 00db       |    |		Load_Top	At_Offset_3
0661 e406       |    |		Load	0x2,0x6
0662 821d       |    |		Call	0x1,0x1d
0663 0271       | q  |		Execute	Discrete,Times
0664 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0665 e402       |    |		Load	0x2,0x2
0666 e004       |    |		Load	0x0,0x4
0667 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0668 c402       |    |		Store	0x2,0x2
0669 00c9       |    |		Action	Pop_Auxiliary_Loop
066a e402       |    |		Load	0x2,0x2
066b e004       |    |		Load	0x0,0x4
066c 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
066d 6fd2       |o   |		Jump_Zero	0x640
066e 00ce       |    |		Action	Pop_Auxiliary
066f 00d8       |    |		Load_Top	At_Offset_0
0670 a5fe       |    |		Store_Unchecked	0x2,-0x2
0671 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0672 0000 0000  |    |		.BLANK	0000[0x6]
0678 ; --------------------------------------------------------------------------------------
0678 ; SUBPROGRAM
0678 ; --------------------------------------------------------------------------------------
0678 0682       |    |		.CONST	0x0682								; Address of begin
0679 0004       |    |		.CONST	0x0004								; Address of exception handler
067a 0002       |    |		.CONST	0x0002								; Number of locals
067b			INIT_0678:
067b e004       |    |		Load	0x0,0x4
067c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
067d 02c7       |    |		Declare_Variable	Any
067e 00db       |    |		Load_Top	At_Offset_3
067f e014       |    |		Load	0x0,0x14
0680 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0681 a402       |    |		Store_Unchecked	0x2,0x2
0682			BODY_0678:
0682 4801       |H   |		Short_Literal	0x1
0683 0092 0a60  |   `|		Action	Push_String_Extended,0xa60					; "CHARACTER"
0685 00da       |    |		Load_Top	At_Offset_2
0686 e004       |    |		Load	0x0,0x4
0687 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0688 e018       |    |		Load	0x0,0x18
0689 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
068a 700b       |p   |		Jump_Nonzero	0x696
068b 4801       |H   |		Short_Literal	0x1
068c 0092 0a60  |   `|		Action	Push_String_Extended,0xa60					; "CHARACTER"
068e 00da       |    |		Load_Top	At_Offset_2
068f e004       |    |		Load	0x0,0x4
0690 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0691 e009       |    |		Load	0x0,0x9
0692 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0693 e018       |    |		Load	0x0,0x18
0694 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0695 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0696 4801       |H   |		Short_Literal	0x1
0697 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0698 ; --------------------------------------------------------------------------------------
0698 ; SUBPROGRAM
0698 ; --------------------------------------------------------------------------------------
0698 06a2       |    |		.CONST	0x06a2								; Address of begin
0699 0004       |    |		.CONST	0x0004								; Address of exception handler
069a 0002       |    |		.CONST	0x0002								; Number of locals
069b			INIT_0698:
069b e004       |    |		Load	0x0,0x4
069c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
069d 02c7       |    |		Declare_Variable	Any
069e 00db       |    |		Load_Top	At_Offset_3
069f e014       |    |		Load	0x0,0x14
06a0 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
06a1 a402       |    |		Store_Unchecked	0x2,0x2
06a2			BODY_0698:
06a2 4801       |H   |		Short_Literal	0x1
06a3 0092 0a61  |   a|		Action	Push_String_Extended,0xa61					; "BOOLEAN"
06a5 00da       |    |		Load_Top	At_Offset_2
06a6 e004       |    |		Load	0x0,0x4
06a7 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
06a8 e018       |    |		Load	0x0,0x18
06a9 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
06aa 700b       |p   |		Jump_Nonzero	0x6b6
06ab 4801       |H   |		Short_Literal	0x1
06ac 0092 0a61  |   a|		Action	Push_String_Extended,0xa61					; "BOOLEAN"
06ae 00da       |    |		Load_Top	At_Offset_2
06af e004       |    |		Load	0x0,0x4
06b0 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
06b1 e009       |    |		Load	0x0,0x9
06b2 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
06b3 e018       |    |		Load	0x0,0x18
06b4 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
06b5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06b6 4801       |H   |		Short_Literal	0x1
06b7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06b8 ; --------------------------------------------------------------------------------------
06b8 ; SUBPROGRAM
06b8 ; --------------------------------------------------------------------------------------
06b8 06c6       |    |		.CONST	0x06c6								; Address of begin
06b9 0004       |    |		.CONST	0x0004								; Address of exception handler
06ba 0005       |    |		.CONST	0x0005								; Number of locals
06bb			INIT_06b8:
06bb e005       |    |		Load	0x0,0x5
06bc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
06bd e014       |    |		Load	0x0,0x14
06be 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
06bf 02c7       |    |		Declare_Variable	Any
06c0 00d8       |    |		Load_Top	At_Offset_0
06c1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06c2 e005       |    |		Load	0x0,0x5
06c3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
06c4 00e1       |    |		Load_Encached	Boolean_Cache
06c5 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
06c6			BODY_06b8:
06c6 4800       |H   |		Short_Literal	0x0
06c7 a5fd       |    |		Store_Unchecked	0x2,-0x3
06c8 e5ff       |    |		Load	0x2,-0x1
06c9 e014       |    |		Load	0x0,0x14
06ca 1848       | H  |		Execute	Package,Field_Execute,Field_Number 0x48
06cb c403       |    |		Store	0x2,0x3
06cc 00da       |    |		Load_Top	At_Offset_2
06cd 8224       | $  |		Call	0x1,0x24
06ce 6804       |h   |		Jump_Zero	0x6d3
06cf e005       |    |		Load	0x0,0x5
06d0 1b2b       | +  |		Execute	Package,Field_Read,Field_Number 0x2b
06d1 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
06d2 7819       |x   |		Jump	0x6ec
06d3 00da       |    |		Load_Top	At_Offset_2
06d4 8225       | %  |		Call	0x1,0x25
06d5 6804       |h   |		Jump_Zero	0x6da
06d6 e005       |    |		Load	0x0,0x5
06d7 1b2a       | *  |		Execute	Package,Field_Read,Field_Number 0x2a
06d8 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
06d9 7812       |x   |		Jump	0x6ec
06da e5fc       |    |		Load	0x2,-0x4
06db 00d9       |    |		Load_Top	At_Offset_1
06dc 00db       |    |		Load_Top	At_Offset_3
06dd 4801       |H   |		Short_Literal	0x1
06de e403       |    |		Load	0x2,0x3
06df e004       |    |		Load	0x0,0x4
06e0 1850       | P  |		Execute	Package,Field_Execute,Field_Number 0x50
06e1 e009       |    |		Load	0x0,0x9
06e2 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
06e3 8218       |    |		Call	0x1,0x18
06e4 c404       |    |		Store	0x2,0x4
06e5 005a       | Z  |		Store_Top	Discrete,At_Offset_2
06e6 c5fc       |    |		Store	0x2,-0x4
06e7 e005       |    |		Load	0x0,0x5
06e8 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
06e9 00da       |    |		Load_Top	At_Offset_2
06ea 821a       |    |		Call	0x1,0x1a
06eb 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
06ec e5fc       |    |		Load	0x2,-0x4
06ed 6817       |h   |		Jump_Zero	0x705
06ee e5fc       |    |		Load	0x2,-0x4
06ef e005       |    |		Load	0x0,0x5
06f0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
06f1 e5fe       |    |		Load	0x2,-0x2
06f2 8223       | #  |		Call	0x1,0x23
06f3 c402       |    |		Store	0x2,0x2
06f4 c5fc       |    |		Store	0x2,-0x4
06f5 e5fc       |    |		Load	0x2,-0x4
06f6 680e       |h   |		Jump_Zero	0x705
06f7 00d8       |    |		Load_Top	At_Offset_0
06f8 6808       |h   |		Jump_Zero	0x701
06f9 00db       |    |		Load_Top	At_Offset_3
06fa e005       |    |		Load	0x0,0x5
06fb 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
06fc 00db       |    |		Load_Top	At_Offset_3
06fd 821a       |    |		Call	0x1,0x1a
06fe 0271       | q  |		Execute	Discrete,Times
06ff c5fd       |    |		Store	0x2,-0x3
0700 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0701 00db       |    |		Load_Top	At_Offset_3
0702 00da       |    |		Load_Top	At_Offset_2
0703 0271       | q  |		Execute	Discrete,Times
0704 c5fd       |    |		Store	0x2,-0x3
0705 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0706 0000 0000  |    |		.XXX[0x2]
0708 ; --------------------------------------------------------------------------------------
0708 ; SUBPROGRAM
0708 ; --------------------------------------------------------------------------------------
0708 0715       |    |		.CONST	0x0715								; Address of begin
0709 0004       |    |		.CONST	0x0004								; Address of exception handler
070a 0005       |    |		.CONST	0x0005								; Number of locals
070b			INIT_0708:
070b 00e1       |    |		Load_Encached	Boolean_Cache
070c 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
070d 03e9       |    |		Declare_Variable	Discrete,Duplicate
070e e004       |    |		Load	0x0,0x4
070f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0710 02c7       |    |		Declare_Variable	Any
0711 00d8       |    |		Load_Top	At_Offset_0
0712 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0713 029f 0a2b  |   +|		Declare_Subprogram	INIT_0a28,For_Call
0715			BODY_0708:
0715 e004       |    |		Load	0x0,0x4
0716 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0717 c5fc       |    |		Store	0x2,-0x4
0718 e004       |    |		Load	0x0,0x4
0719 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
071a c5fb       |    |		Store	0x2,-0x5
071b e5ff       |    |		Load	0x2,-0x1
071c c404       |    |		Store	0x2,0x4
071d e5fd       |    |		Load	0x2,-0x3
071e 8405       |    |		Call	0x2,0x5
071f 00cf       |    |		Action	Mark_Auxiliary
0720 7831       |x1  |		Jump	0x752
0721 00da       |    |		Load_Top	At_Offset_2
0722 e004       |    |		Load	0x0,0x4
0723 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0724 6805       |h   |		Jump_Zero	0x72a
0725 e5fe       |    |		Load	0x2,-0x2
0726 e014       |    |		Load	0x0,0x14
0727 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0728 8405       |    |		Call	0x2,0x5
0729 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
072a 4801       |H   |		Short_Literal	0x1
072b 00db       |    |		Load_Top	At_Offset_3
072c e004       |    |		Load	0x0,0x4
072d 1850       | P  |		Execute	Package,Field_Execute,Field_Number 0x50
072e c404       |    |		Store	0x2,0x4
072f 00da       |    |		Load_Top	At_Offset_2
0730 e004       |    |		Load	0x0,0x4
0731 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0732 7023       |p#  |		Jump_Nonzero	0x756
0733 00da       |    |		Load_Top	At_Offset_2
0734 e009       |    |		Load	0x0,0x9
0735 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0736 e014       |    |		Load	0x0,0x14
0737 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0738 c404       |    |		Store	0x2,0x4
0739 00da       |    |		Load_Top	At_Offset_2
073a e014       |    |		Load	0x0,0x14
073b 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
073c 460c       |F   |		Jump_Case	0xd
073d 780c       |x   |		Jump	0x74a								; case 0x0
073e 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; case 0x1
073f 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; case 0x2
0740 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; case 0x3
0741 780d       |x   |		Jump	0x74f								; case 0x4
0742 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; case 0x5
0743 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; case 0x6
0744 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; case 0x7
0745 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; case 0x8
0746 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; case 0x9
0747 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; case 0xa
0748 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; case 0xb
0749 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; case 0xc
074a 00da       |    |		Load_Top	At_Offset_2
074b e014       |    |		Load	0x0,0x14
074c 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
074d 8405       |    |		Call	0x2,0x5
074e 7802       |x   |		Jump	0x751
074f 00da       |    |		Load_Top	At_Offset_2
0750 8405       |    |		Call	0x2,0x5
0751 00c9       |    |		Action	Pop_Auxiliary_Loop
0752 e402       |    |		Load	0x2,0x2
0753 6fcd       |o   |		Jump_Zero	0x721
0754 00db       |    |		Load_Top	At_Offset_3
0755 6fcb       |o   |		Jump_Zero	0x721
0756 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0757 0000       |    |		.XXX[0x1]
0758 ; --------------------------------------------------------------------------------------
0758 ; SUBPROGRAM
0758 ; --------------------------------------------------------------------------------------
0758 076e       | n  |		.CONST	0x076e								; Address of begin
0759 0004       |    |		.CONST	0x0004								; Address of exception handler
075a 0002       |    |		.CONST	0x0002								; Number of locals
075b			INIT_0758:
075b 4801       |H   |		Short_Literal	0x1
075c 00db       |    |		Load_Top	At_Offset_3
075d 00e9       |    |		Load_Encached	String_Cache
075e 035b       | [  |		Declare_Type	Array,Constrained
075f 0337       | 7  |		Declare_Variable	Array
0760 00d8       |    |		Load_Top	At_Offset_0
0761 0335       | 5  |		Declare_Variable	Array,Duplicate
0762 00cd       |    |		Action	Spare6_Action
0763 00d9       |    |		Load_Top	At_Offset_1
0764 01d9       |    |		Execute	Vector,Reverse_Bounds
0765 0263       | c  |		Execute	Discrete,Above_Bound
0766 7005       |p   |		Jump_Nonzero	0x76c
0767 e5fd       |    |		Load	0x2,-0x3
0768 00d9       |    |		Load_Top	At_Offset_1
0769 e403       |    |		Load	0x2,0x3
076a 01d6       |    |		Execute	Vector,Field_Write
076b 3ffb       |?   |		Loop_Increasing	0x767
076c 00d9       |    |		Load_Top	At_Offset_1
076d 01d4       |    |		Execute	Vector,Structure_Write
076e			BODY_0758:
076e 00d8       |    |		Load_Top	At_Offset_0
076f 4820       |H   |		Short_Literal	0x20
0770 e5fe       |    |		Load	0x2,-0x2
0771 e018       |    |		Load	0x0,0x18
0772 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0773 01cc       |    |		Execute	Vector,Catenate
0774 00e9       |    |		Load_Encached	String_Cache
0775 01c6       |    |		Execute	Vector,Convert_To_Formal
0776 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0777 0000       |    |		.XXX[0x1]
0778 ; --------------------------------------------------------------------------------------
0778 ; SUBPROGRAM
0778 ; --------------------------------------------------------------------------------------
0778 0784       |    |		.CONST	0x0784								; Address of begin
0779 0004       |    |		.CONST	0x0004								; Address of exception handler
077a 0003       |    |		.CONST	0x0003								; Number of locals
077b			INIT_0778:
077b e211       |    |		Load	0x1,0x11
077c 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
077d e004       |    |		Load	0x0,0x4
077e 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
077f 02c7       |    |		Declare_Variable	Any
0780 e5ff       |    |		Load	0x2,-0x1
0781 e014       |    |		Load	0x0,0x14
0782 1856       | V  |		Execute	Package,Field_Execute,Field_Number 0x56
0783 a403       |    |		Store_Unchecked	0x2,0x3
0784			BODY_0778:
0784 00d9       |    |		Load_Top	At_Offset_1
0785 0092 0a62  |   b|		Action	Push_String_Extended,0xa62					; "when "
0787 e211       |    |		Load	0x1,0x11
0788 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0789 003a       | :  |		Store_Top	Access,At_Offset_2
078a 00cf       |    |		Action	Mark_Auxiliary
078b 7818       |x   |		Jump	0x7a4
078c 00da       |    |		Load_Top	At_Offset_2
078d 00da       |    |		Load_Top	At_Offset_2
078e e004       |    |		Load	0x0,0x4
078f 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0790 e004       |    |		Load	0x0,0x4
0791 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0792 e211       |    |		Load	0x1,0x11
0793 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0794 003b       | ;  |		Store_Top	Access,At_Offset_3
0795 00d9       |    |		Load_Top	At_Offset_1
0796 e004       |    |		Load	0x0,0x4
0797 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0798 c403       |    |		Store	0x2,0x3
0799 00d9       |    |		Load_Top	At_Offset_1
079a e004       |    |		Load	0x0,0x4
079b 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
079c 7006       |p   |		Jump_Nonzero	0x7a3
079d 00da       |    |		Load_Top	At_Offset_2
079e 0092 0a63  |   c|		Action	Push_String_Extended,0xa63					; " | "
07a0 e211       |    |		Load	0x1,0x11
07a1 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
07a2 003b       | ;  |		Store_Top	Access,At_Offset_3
07a3 00c9       |    |		Action	Pop_Auxiliary_Loop
07a4 00d9       |    |		Load_Top	At_Offset_1
07a5 e004       |    |		Load	0x0,0x4
07a6 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
07a7 6fe4       |o   |		Jump_Zero	0x78c
07a8 00ce       |    |		Action	Pop_Auxiliary
07a9 00d9       |    |		Load_Top	At_Offset_1
07aa e211       |    |		Load	0x1,0x11
07ab 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
07ac 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07ad 0000 0000  |    |		.XXX[0x3]
07af 0000       |    |
07b0 ; --------------------------------------------------------------------------------------
07b0 ; SUBPROGRAM
07b0 ; --------------------------------------------------------------------------------------
07b0 07bc       |    |		.CONST	0x07bc								; Address of begin
07b1 0004       |    |		.CONST	0x0004								; Address of exception handler
07b2 0003       |    |		.CONST	0x0003								; Number of locals
07b3			INIT_07b0:
07b3 e211       |    |		Load	0x1,0x11
07b4 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
07b5 e004       |    |		Load	0x0,0x4
07b6 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
07b7 02c7       |    |		Declare_Variable	Any
07b8 e5ff       |    |		Load	0x2,-0x1
07b9 e014       |    |		Load	0x0,0x14
07ba 184c       | L  |		Execute	Package,Field_Execute,Field_Number 0x4c
07bb a403       |    |		Store_Unchecked	0x2,0x3
07bc			BODY_07b0:
07bc 00cf       |    |		Action	Mark_Auxiliary
07bd 7818       |x   |		Jump	0x7d6
07be 00da       |    |		Load_Top	At_Offset_2
07bf 00da       |    |		Load_Top	At_Offset_2
07c0 e004       |    |		Load	0x0,0x4
07c1 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
07c2 e004       |    |		Load	0x0,0x4
07c3 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
07c4 e211       |    |		Load	0x1,0x11
07c5 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
07c6 003b       | ;  |		Store_Top	Access,At_Offset_3
07c7 00d9       |    |		Load_Top	At_Offset_1
07c8 e004       |    |		Load	0x0,0x4
07c9 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
07ca c403       |    |		Store	0x2,0x3
07cb 00d9       |    |		Load_Top	At_Offset_1
07cc e004       |    |		Load	0x0,0x4
07cd 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
07ce 7006       |p   |		Jump_Nonzero	0x7d5
07cf 00da       |    |		Load_Top	At_Offset_2
07d0 0092 0a64  |   d|		Action	Push_String_Extended,0xa64					; "; "
07d2 e211       |    |		Load	0x1,0x11
07d3 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
07d4 003b       | ;  |		Store_Top	Access,At_Offset_3
07d5 00c9       |    |		Action	Pop_Auxiliary_Loop
07d6 00d9       |    |		Load_Top	At_Offset_1
07d7 e004       |    |		Load	0x0,0x4
07d8 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
07d9 6fe4       |o   |		Jump_Zero	0x7be
07da 00ce       |    |		Action	Pop_Auxiliary
07db 00d9       |    |		Load_Top	At_Offset_1
07dc e211       |    |		Load	0x1,0x11
07dd 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
07de 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07df 0000       |    |		.XXX[0x1]
07e0 ; --------------------------------------------------------------------------------------
07e0 ; SUBPROGRAM
07e0 ; --------------------------------------------------------------------------------------
07e0 07ec       |    |		.CONST	0x07ec								; Address of begin
07e1 0004       |    |		.CONST	0x0004								; Address of exception handler
07e2 0003       |    |		.CONST	0x0003								; Number of locals
07e3			INIT_07e0:
07e3 e211       |    |		Load	0x1,0x11
07e4 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
07e5 e004       |    |		Load	0x0,0x4
07e6 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
07e7 02c7       |    |		Declare_Variable	Any
07e8 e5ff       |    |		Load	0x2,-0x1
07e9 e014       |    |		Load	0x0,0x14
07ea 1846       | F  |		Execute	Package,Field_Execute,Field_Number 0x46
07eb a403       |    |		Store_Unchecked	0x2,0x3
07ec			BODY_07e0:
07ec 00cf       |    |		Action	Mark_Auxiliary
07ed 7818       |x   |		Jump	0x806
07ee 00da       |    |		Load_Top	At_Offset_2
07ef 00da       |    |		Load_Top	At_Offset_2
07f0 e004       |    |		Load	0x0,0x4
07f1 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
07f2 e004       |    |		Load	0x0,0x4
07f3 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
07f4 e211       |    |		Load	0x1,0x11
07f5 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
07f6 003b       | ;  |		Store_Top	Access,At_Offset_3
07f7 00d9       |    |		Load_Top	At_Offset_1
07f8 e004       |    |		Load	0x0,0x4
07f9 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
07fa c403       |    |		Store	0x2,0x3
07fb 00d9       |    |		Load_Top	At_Offset_1
07fc e004       |    |		Load	0x0,0x4
07fd 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
07fe 7006       |p   |		Jump_Nonzero	0x805
07ff 00da       |    |		Load_Top	At_Offset_2
0800 0092 0a65  |   e|		Action	Push_String_Extended,0xa65					; ", "
0802 e211       |    |		Load	0x1,0x11
0803 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0804 003b       | ;  |		Store_Top	Access,At_Offset_3
0805 00c9       |    |		Action	Pop_Auxiliary_Loop
0806 00d9       |    |		Load_Top	At_Offset_1
0807 e004       |    |		Load	0x0,0x4
0808 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0809 6fe4       |o   |		Jump_Zero	0x7ee
080a 00ce       |    |		Action	Pop_Auxiliary
080b 00d9       |    |		Load_Top	At_Offset_1
080c e211       |    |		Load	0x1,0x11
080d 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
080e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
080f 0000       |    |		.XXX[0x1]
0810 ; --------------------------------------------------------------------------------------
0810 ; SUBPROGRAM
0810 ; --------------------------------------------------------------------------------------
0810 081d       |    |		.CONST	0x081d								; Address of begin
0811 08b0       |    |		.CONST	0x08b0								; Address of exception handler
0812 0002       |    |		.CONST	0x0002								; Number of locals
0813			INIT_0810:
0813 e004       |    |		Load	0x0,0x4
0814 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0815 02c7       |    |		Declare_Variable	Any
0816 4801       |H   |		Short_Literal	0x1
0817 e5ff       |    |		Load	0x2,-0x1
0818 e004       |    |		Load	0x0,0x4
0819 1850       | P  |		Execute	Package,Field_Execute,Field_Number 0x50
081a e009       |    |		Load	0x0,0x9
081b 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
081c a402       |    |		Store_Unchecked	0x2,0x2
081d			BODY_0810:
081d e5fd       |    |		Load	0x2,-0x3
081e 4605       |F   |		Jump_Case	0x6
081f 7882       |x   |		Jump	0x8a2								; case 0x0
0820 7884       |x   |		Jump	0x8a5								; case 0x1
0821 7887       |x   |		Jump	0x8a9								; case 0x2
0822 7889       |x   |		Jump	0x8ac								; case 0x3
0823 787b       |x{  |		Jump	0x89f								; case 0x4
0824 7800       |x   |		Jump	0x825								; case 0x5
0825 00d8       |    |		Load_Top	At_Offset_0
0826 e004       |    |		Load	0x0,0x4
0827 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0828 6804       |h   |		Jump_Zero	0x82d
0829 00db       |    |		Load_Top	At_Offset_3
082a e009       |    |		Load	0x0,0x9
082b 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
082c c402       |    |		Store	0x2,0x2
082d 00db       |    |		Load_Top	At_Offset_3
082e e009       |    |		Load	0x0,0x9
082f 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0830 e009       |    |		Load	0x0,0x9
0831 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0832 6803       |h   |		Jump_Zero	0x836
0833 0092 0a66  |   f|		Action	Push_String_Extended,0xa66					; "GEN FORMAL"
0835 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0836 00d8       |    |		Load_Top	At_Offset_0
0837 e009       |    |		Load	0x0,0x9
0838 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0839 680b       |h   |		Jump_Zero	0x845
083a 0092 0a67  |   g|		Action	Push_String_Extended,0xa67					; "P("
083c e5fd       |    |		Load	0x2,-0x3
083d e5fe       |    |		Load	0x2,-0x2
083e 00d8       |    |		Load_Top	At_Offset_0
083f 822c       | ,  |		Call	0x1,0x2c
0840 01cc       |    |		Execute	Vector,Catenate
0841 0092 0a68  |   h|		Action	Push_String_Extended,0xa68					; ")"
0843 01cc       |    |		Execute	Vector,Catenate
0844 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0845 00d8       |    |		Load_Top	At_Offset_0
0846 e009       |    |		Load	0x0,0x9
0847 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0848 680b       |h   |		Jump_Zero	0x854
0849 0092 0a69  |   i|		Action	Push_String_Extended,0xa69					; "LP("
084b e5fd       |    |		Load	0x2,-0x3
084c e5fe       |    |		Load	0x2,-0x2
084d 00d8       |    |		Load_Top	At_Offset_0
084e 822c       | ,  |		Call	0x1,0x2c
084f 01cc       |    |		Execute	Vector,Catenate
0850 0092 0a68  |   h|		Action	Push_String_Extended,0xa68					; ")"
0852 01cc       |    |		Execute	Vector,Catenate
0853 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0854 e5fe       |    |		Load	0x2,-0x2
0855 e014       |    |		Load	0x0,0x14
0856 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0857 460c       |F   |		Jump_Case	0xd
0858 780f       |x   |		Jump	0x868								; case 0x0
0859 7811       |x   |		Jump	0x86b								; case 0x1
085a 7820       |x   |		Jump	0x87b								; case 0x2
085b 7822       |x"  |		Jump	0x87e								; case 0x3
085c 7824       |x$  |		Jump	0x881								; case 0x4
085d 7826       |x&  |		Jump	0x884								; case 0x5
085e 7830       |x0  |		Jump	0x88f								; case 0x6
085f 7832       |x2  |		Jump	0x892								; case 0x7
0860 7834       |x4  |		Jump	0x895								; case 0x8
0861 7836       |x6  |		Jump	0x898								; case 0x9
0862 7838       |x8  |		Jump	0x89b								; case 0xa
0863 7839       |x9  |		Jump	0x89d								; case 0xb
0864 7800       |x   |		Jump	0x865								; case 0xc
0865 0092 0a6a  |   j|		Action	Push_String_Extended,0xa6a					; "UNKNOWN"
0867 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0868 0092 0a6b  |   k|		Action	Push_String_Extended,0xa6b					; "SUBTYPE"
086a 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
086b e5fe       |    |		Load	0x2,-0x2
086c e014       |    |		Load	0x0,0x14
086d 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
086e 6809       |h   |		Jump_Zero	0x878
086f e5fe       |    |		Load	0x2,-0x2
0870 8225       | %  |		Call	0x1,0x25
0871 6803       |h   |		Jump_Zero	0x875
0872 0092 0a61  |   a|		Action	Push_String_Extended,0xa61					; "BOOLEAN"
0874 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0875 0092 0a60  |   `|		Action	Push_String_Extended,0xa60					; "CHARACTER"
0877 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0878 0092 0a6c  |   l|		Action	Push_String_Extended,0xa6c					; "ENUM"
087a 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
087b 0092 0a6d  |   m|		Action	Push_String_Extended,0xa6d					; "INTEGER"
087d 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
087e 0092 0a6e  |   n|		Action	Push_String_Extended,0xa6e					; "FLOAT"
0880 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0881 0092 0a6f  |   o|		Action	Push_String_Extended,0xa6f					; "FIXED"
0883 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0884 e5fe       |    |		Load	0x2,-0x2
0885 e014       |    |		Load	0x0,0x14
0886 1848       | H  |		Execute	Package,Field_Execute,Field_Number 0x48
0887 8224       | $  |		Call	0x1,0x24
0888 6803       |h   |		Jump_Zero	0x88c
0889 0092 0a70  |   p|		Action	Push_String_Extended,0xa70					; "STRING"
088b 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
088c 0092 0a71  |   q|		Action	Push_String_Extended,0xa71					; "ARRAY"
088e 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
088f 0092 0a72  |   r|		Action	Push_String_Extended,0xa72					; "RECORD"
0891 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0892 0092 0a73  |   s|		Action	Push_String_Extended,0xa73					; "ACCESS"
0894 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0895 0092 0a74  |   t|		Action	Push_String_Extended,0xa74					; "DERIVED"
0897 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0898 0092 0a75  |   u|		Action	Push_String_Extended,0xa75					; "TASK"
089a 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
089b 00ea       |    |		Load_Encached	Null_String_Cache
089c 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
089d 00ea       |    |		Load_Encached	Null_String_Cache
089e 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
089f 00db       |    |		Load_Top	At_Offset_3
08a0 8229       | )  |		Call	0x1,0x29
08a1 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
08a2 00db       |    |		Load_Top	At_Offset_3
08a3 822b       | +  |		Call	0x1,0x2b
08a4 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
08a5 00db       |    |		Load_Top	At_Offset_3
08a6 e004       |    |		Load	0x0,0x4
08a7 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
08a8 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
08a9 00db       |    |		Load_Top	At_Offset_3
08aa 822a       | *  |		Call	0x1,0x2a
08ab 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
08ac 00db       |    |		Load_Top	At_Offset_3
08ad e004       |    |		Load	0x0,0x4
08ae 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
08af 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
08b0			TRAP_0810:
08b0 0007       |    |		Action	Break_Optional
08b1 e5ff       |    |		Load	0x2,-0x1
08b2 e004       |    |		Load	0x0,0x4
08b3 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
08b4 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
08b5 0000 0000  |    |		.XXX[0x3]
08b7 0000       |    |
08b8 ; --------------------------------------------------------------------------------------
08b8 ; SUBPROGRAM
08b8 ; --------------------------------------------------------------------------------------
08b8 08bb       |    |		.CONST	0x08bb								; Address of begin
08b9 0004       |    |		.CONST	0x0004								; Address of exception handler
08ba 0001       |    |		.CONST	0x0001								; Number of locals
08bb			BODY_08b8:
08bb			INIT_08b8:
08bb 00da       |    |		Load_Top	At_Offset_2
08bc 4605       |F   |		Jump_Case	0x6
08bd 7807       |x   |		Jump	0x8c5								; case 0x0
08be 7809       |x   |		Jump	0x8c8								; case 0x1
08bf 780b       |x   |		Jump	0x8cb								; case 0x2
08c0 780d       |x   |		Jump	0x8ce								; case 0x3
08c1 780f       |x   |		Jump	0x8d1								; case 0x4
08c2 7800       |x   |		Jump	0x8c3								; case 0x5
08c3 00ea       |    |		Load_Encached	Null_String_Cache
08c4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08c5 0092 0a76  |   v|		Action	Push_String_Extended,0xa76					; "^INDEX"
08c7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08c8 0092 0a77  |   w|		Action	Push_String_Extended,0xa77					; "^CONSTRAINT"
08ca 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08cb 0092 0a78  |   x|		Action	Push_String_Extended,0xa78					; "^DISCRIMS"
08cd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08ce 0092 0a77  |   w|		Action	Push_String_Extended,0xa77					; "^CONSTRAINT"
08d0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08d1 0092 0a79  |   y|		Action	Push_String_Extended,0xa79					; ">>CHOICE"
08d3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08d4 0000 0000  |    |		.BLANK	0000[0x4]
08d8 ; --------------------------------------------------------------------------------------
08d8 ; SUBPROGRAM
08d8 ; --------------------------------------------------------------------------------------
08d8 08df       |    |		.CONST	0x08df								; Address of begin
08d9 0004       |    |		.CONST	0x0004								; Address of exception handler
08da 0002       |    |		.CONST	0x0002								; Number of locals
08db			INIT_08d8:
08db 00da       |    |		Load_Top	At_Offset_2
08dc 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
08dd e211       |    |		Load	0x1,0x11
08de 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
08df			BODY_08d8:
08df 00db       |    |		Load_Top	At_Offset_3
08e0 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
08e1 60b6       |`   |		Indirect_Literal	Discrete,0x998,{0x7fffffff, 0xffffffff}
08e2 027f       |    |		Execute	Discrete,Equal
08e3 680f       |h   |		Jump_Zero	0x8f3
08e4 00ea       |    |		Load_Encached	Null_String_Cache
08e5 e019       |    |		Load	0x0,0x19
08e6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
08e7 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
08e8 e019       |    |		Load	0x0,0x19
08e9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
08ea 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
08eb e004       |    |		Load	0x0,0x4
08ec 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
08ed e004       |    |		Load	0x0,0x4
08ee 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
08ef 00ea       |    |		Load_Encached	Null_String_Cache
08f0 e40a       |    |		Load	0x2,0xa
08f1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
08f2 7849       |xI  |		Jump	0x93c
08f3 00db       |    |		Load_Top	At_Offset_3
08f4 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
08f5 702f       |p/  |		Jump_Nonzero	0x925
08f6 00d8       |    |		Load_Top	At_Offset_0
08f7 01db       |    |		Execute	Vector,Length
08f8 7015       |p   |		Jump_Nonzero	0x90e
08f9 0092 0a7a  |   z|		Action	Push_String_Extended,0xa7a					; "Size cannot be statically computed, expression unknown"
08fb e019       |    |		Load	0x0,0x19
08fc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
08fd 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
08fe e019       |    |		Load	0x0,0x19
08ff 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0900 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0901 e004       |    |		Load	0x0,0x4
0902 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0903 e004       |    |		Load	0x0,0x4
0904 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0905 482e       |H.  |		Short_Literal	0x2e
0906 0092 0a7b  |   {|		Action	Push_String_Extended,0xa7b					; "NS"
0908 e7ff       |    |		Load	0x3,-0x1
0909 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
090a 8228       | (  |		Call	0x1,0x28
090b e40a       |    |		Load	0x2,0xa
090c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
090d 782e       |x.  |		Jump	0x93c
090e 0092 0a7c  |   ||		Action	Push_String_Extended,0xa7c					; "Size cannot be statically computed, expression: "
0910 00d9       |    |		Load_Top	At_Offset_1
0911 01cc       |    |		Execute	Vector,Catenate
0912 e019       |    |		Load	0x0,0x19
0913 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0914 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0915 e019       |    |		Load	0x0,0x19
0916 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0917 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0918 e004       |    |		Load	0x0,0x4
0919 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
091a e004       |    |		Load	0x0,0x4
091b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
091c 482e       |H.  |		Short_Literal	0x2e
091d 0092 0a7b  |   {|		Action	Push_String_Extended,0xa7b					; "NS"
091f e7ff       |    |		Load	0x3,-0x1
0920 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0921 8228       | (  |		Call	0x1,0x28
0922 e40a       |    |		Load	0x2,0xa
0923 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0924 7817       |x   |		Jump	0x93c
0925 0092 0a7d  |   }|		Action	Push_String_Extended,0xa7d					; "Size in bytes"
0927 e019       |    |		Load	0x0,0x19
0928 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0929 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
092a e019       |    |		Load	0x0,0x19
092b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
092c 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
092d e004       |    |		Load	0x0,0x4
092e 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
092f e004       |    |		Load	0x0,0x4
0930 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0931 482e       |H.  |		Short_Literal	0x2e
0932 e7ff       |    |		Load	0x3,-0x1
0933 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0934 09fd       |    |		Execute_Immediate	Binary_Scale,-0x3
0935 00e0       |    |		Load_Encached	Standard_Cache
0936 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0937 e7ff       |    |		Load	0x3,-0x1
0938 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0939 8228       | (  |		Call	0x1,0x28
093a e40a       |    |		Load	0x2,0xa
093b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
093c 00db       |    |		Load_Top	At_Offset_3
093d 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
093e 0f05       |    |		Execute_Immediate	Equal,0x5
093f 682d       |h-  |		Jump_Zero	0x96d
0940 0092 0a7e  |   ~|		Action	Push_String_Extended,0xa7e					; "Name and kind of the component"
0942 e019       |    |		Load	0x0,0x19
0943 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0944 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0945 e019       |    |		Load	0x0,0x19
0946 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0947 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0948 e004       |    |		Load	0x0,0x4
0949 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
094a e7ff       |    |		Load	0x3,-0x1
094b 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
094c 4820       |H   |		Short_Literal	0x20
094d e7ff       |    |		Load	0x3,-0x1
094e 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
094f e009       |    |		Load	0x0,0x9
0950 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0951 e009       |    |		Load	0x0,0x9
0952 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0953 0092 0a7f  |    |		Action	Push_String_Extended,0xa7f					; " : "
0955 01cc       |    |		Execute	Vector,Catenate
0956 e7ff       |    |		Load	0x3,-0x1
0957 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0958 e7ff       |    |		Load	0x3,-0x1
0959 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
095a e014       |    |		Load	0x0,0x14
095b 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
095c e7ff       |    |		Load	0x3,-0x1
095d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
095e 822c       | ,  |		Call	0x1,0x2c
095f 01cc       |    |		Execute	Vector,Catenate
0960 e7ff       |    |		Load	0x3,-0x1
0961 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0962 0aff       |    |		Execute_Immediate	Plus,-0x1
0963 0902       |    |		Execute_Immediate	Binary_Scale,0x2
0964 00d8       |    |		Load_Top	At_Offset_0
0965 00e3       |    |		Load_Encached	Natural_Cache
0966 0260       | `  |		Execute	Discrete,In_Type
0967 7001       |p   |		Jump_Nonzero	0x969
0968 0801       |    |		Execute_Immediate	Raise,0x1
0969 8228       | (  |		Call	0x1,0x28
096a e40a       |    |		Load	0x2,0xa
096b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
096c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
096d 0092 0a7e  |   ~|		Action	Push_String_Extended,0xa7e					; "Name and kind of the component"
096f e019       |    |		Load	0x0,0x19
0970 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0971 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0972 e019       |    |		Load	0x0,0x19
0973 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0974 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0975 e004       |    |		Load	0x0,0x4
0976 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0977 e7ff       |    |		Load	0x3,-0x1
0978 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0979 4820       |H   |		Short_Literal	0x20
097a e7ff       |    |		Load	0x3,-0x1
097b 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
097c 822d       | -  |		Call	0x1,0x2d
097d e7ff       |    |		Load	0x3,-0x1
097e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
097f 0aff       |    |		Execute_Immediate	Plus,-0x1
0980 0902       |    |		Execute_Immediate	Binary_Scale,0x2
0981 00d8       |    |		Load_Top	At_Offset_0
0982 00e3       |    |		Load_Encached	Natural_Cache
0983 0260       | `  |		Execute	Discrete,In_Type
0984 7001       |p   |		Jump_Nonzero	0x986
0985 0801       |    |		Execute_Immediate	Raise,0x1
0986 8228       | (  |		Call	0x1,0x28
0987 0092 0a80  |    |		Action	Push_String_Extended,0xa80					; " - "
0989 01cc       |    |		Execute	Vector,Catenate
098a e7ff       |    |		Load	0x3,-0x1
098b 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
098c e7ff       |    |		Load	0x3,-0x1
098d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
098e e7ff       |    |		Load	0x3,-0x1
098f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0990 822c       | ,  |		Call	0x1,0x2c
0991 01cc       |    |		Execute	Vector,Catenate
0992 e40a       |    |		Load	0x2,0xa
0993 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0994 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0995 0000 0000  |    |		.XXX[0x3]
0997 0000       |    |
0998 7fff ffff  |    |		.LITERAL	{0x7fffffff, 0xffffffff}
099c 0000 0000  |    |		.BLANK	0000[0x4]
09a0 ; --------------------------------------------------------------------------------------
09a0 ; SUBPROGRAM
09a0 ; --------------------------------------------------------------------------------------
09a0 09a7       |    |		.CONST	0x09a7								; Address of begin
09a1 0004       |    |		.CONST	0x0004								; Address of exception handler
09a2 0002       |    |		.CONST	0x0002								; Number of locals
09a3			INIT_09a0:
09a3 e214       |    |		Load	0x1,0x14
09a4 0322       | "  |		Declare_Variable	Record
09a5 00d8       |    |		Load_Top	At_Offset_0
09a6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
09a7			BODY_09a0:
09a7 e212       |    |		Load	0x1,0x12
09a8 00d9       |    |		Load_Top	At_Offset_1
09a9 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
09aa e402       |    |		Load	0x2,0x2
09ab 00d9       |    |		Load_Top	At_Offset_1
09ac 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
09ad 67ea       |g   |		Indirect_Literal	Discrete,0x998,{0x7fffffff, 0xffffffff}
09ae 00d9       |    |		Load_Top	At_Offset_1
09af 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
09b0 4800       |H   |		Short_Literal	0x0
09b1 00d9       |    |		Load_Top	At_Offset_1
09b2 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
09b3 e216       |    |		Load	0x1,0x16
09b4 00d9       |    |		Load_Top	At_Offset_1
09b5 e215       |    |		Load	0x1,0x15
09b6 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
09b7 a216       |    |		Store_Unchecked	0x1,0x16
09b8 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
09b9 0000 0000  |    |		.BLANK	0000[0x7]
09c0 ; --------------------------------------------------------------------------------------
09c0 ; SUBPROGRAM
09c0 ; --------------------------------------------------------------------------------------
09c0 09c7       |    |		.CONST	0x09c7								; Address of begin
09c1 0004       |    |		.CONST	0x0004								; Address of exception handler
09c2 0002       |    |		.CONST	0x0002								; Number of locals
09c3			INIT_09c0:
09c3 e214       |    |		Load	0x1,0x14
09c4 0322       | "  |		Declare_Variable	Record
09c5 00d8       |    |		Load_Top	At_Offset_0
09c6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
09c7			BODY_09c0:
09c7 e212       |    |		Load	0x1,0x12
09c8 00d9       |    |		Load_Top	At_Offset_1
09c9 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
09ca e402       |    |		Load	0x2,0x2
09cb 00d9       |    |		Load_Top	At_Offset_1
09cc 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
09cd 600e       |`   |		Indirect_Literal	Discrete,0x9dc,{0x7fffffff, 0xffffffff}
09ce 00d9       |    |		Load_Top	At_Offset_1
09cf 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
09d0 4802       |H   |		Short_Literal	0x2
09d1 00d9       |    |		Load_Top	At_Offset_1
09d2 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
09d3 e216       |    |		Load	0x1,0x16
09d4 00d9       |    |		Load_Top	At_Offset_1
09d5 e215       |    |		Load	0x1,0x15
09d6 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
09d7 a216       |    |		Store_Unchecked	0x1,0x16
09d8 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
09d9 0000 0000  |    |		.XXX[0x3]
09db 0000       |    |
09dc 7fff ffff  |    |		.LITERAL	{0x7fffffff, 0xffffffff}
09e0 ; --------------------------------------------------------------------------------------
09e0 ; SUBPROGRAM
09e0 ; --------------------------------------------------------------------------------------
09e0 09f1       |    |		.CONST	0x09f1								; Address of begin
09e1 0a1b       |    |		.CONST	0x0a1b								; Address of exception handler
09e2 0006       |    |		.CONST	0x0006								; Number of locals
09e3			INIT_09e0:
09e3 e004       |    |		Load	0x0,0x4
09e4 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
09e5 02c7       |    |		Declare_Variable	Any
09e6 00d8       |    |		Load_Top	At_Offset_0
09e7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
09e8 e004       |    |		Load	0x0,0x4
09e9 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
09ea 02c7       |    |		Declare_Variable	Any
09eb 00d8       |    |		Load_Top	At_Offset_0
09ec 1c00       |    |		Execute_Immediate	Run_Utility,0x0
09ed e005       |    |		Load	0x0,0x5
09ee 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
09ef 03e9       |    |		Declare_Variable	Discrete,Duplicate
09f0 03e9       |    |		Declare_Variable	Discrete,Duplicate
09f1			BODY_09e0:
09f1 e602       |    |		Load	0x3,0x2
09f2 0120       |    |		Execute	Any,Is_Value
09f3 6803       |h   |		Jump_Zero	0x9f7
09f4 e014       |    |		Load	0x0,0x14
09f5 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
09f6 7801       |x   |		Jump	0x9f8
09f7 e602       |    |		Load	0x3,0x2
09f8 e603       |    |		Load	0x3,0x3
09f9 0120       |    |		Execute	Any,Is_Value
09fa 6803       |h   |		Jump_Zero	0x9fe
09fb e014       |    |		Load	0x0,0x14
09fc 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
09fd 7801       |x   |		Jump	0x9ff
09fe e603       |    |		Load	0x3,0x3
09ff e403       |    |		Load	0x2,0x3
0a00 e014       |    |		Load	0x0,0x14
0a01 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
0a02 e014       |    |		Load	0x0,0x14
0a03 1836       | 6  |		Execute	Package,Field_Execute,Field_Number 0x36
0a04 c603       |    |		Store	0x3,0x3
0a05 c602       |    |		Store	0x3,0x2
0a06 00db       |    |		Load_Top	At_Offset_3
0a07 e017       |    |		Load	0x0,0x17
0a08 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0a09 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0a0a e602       |    |		Load	0x3,0x2
0a0b e017       |    |		Load	0x0,0x17
0a0c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0a0d 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0a0e e404       |    |		Load	0x2,0x4
0a0f e017       |    |		Load	0x0,0x17
0a10 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0a11 005b       | [  |		Store_Top	Discrete,At_Offset_3
0a12 00da       |    |		Load_Top	At_Offset_2
0a13 00da       |    |		Load_Top	At_Offset_2
0a14 027a       | z  |		Execute	Discrete,Less_Equal
0a15 00db       |    |		Load_Top	At_Offset_3
0a16 00da       |    |		Load_Top	At_Offset_2
0a17 027b       | {  |		Execute	Discrete,Greater_Equal
0a18 0279       | y  |		Execute	Discrete,And
0a19 00cb       |    |		Action	Pop_Block_With_Result
0a1a 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0a1b			TRAP_09e0:
0a1b e017       |    |		Load	0x0,0x17
0a1c 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0a1d 010f       |    |		Execute	Exception,Equal
0a1e 6803       |h   |		Jump_Zero	0xa22
0a1f 4800       |H   |		Short_Literal	0x0
0a20 00cb       |    |		Action	Pop_Block_With_Result
0a21 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0a22 0100       |    |		Execute	Exception,Raise
0a23 0000 0000  |    |		.BLANK	0000[0x5]
0a28 ; --------------------------------------------------------------------------------------
0a28 ; SUBPROGRAM
0a28 ; --------------------------------------------------------------------------------------
0a28 0a2b       | +  |		.CONST	0x0a2b								; Address of begin
0a29 0004       |    |		.CONST	0x0004								; Address of exception handler
0a2a 0001       |    |		.CONST	0x0001								; Number of locals
0a2b			BODY_0a28:
0a2b			INIT_0a28:
0a2b 00da       |    |		Load_Top	At_Offset_2
0a2c e014       |    |		Load	0x0,0x14
0a2d 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0a2e 4606       |F   |		Jump_Case	0x7
0a2f 781b       |x   |		Jump	0xa4b								; case 0x0
0a30 781a       |x   |		Jump	0xa4b								; case 0x1
0a31 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x2
0a32 7803       |x   |		Jump	0xa36								; case 0x3
0a33 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x4
0a34 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x5
0a35 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x6
0a36 e403       |    |		Load	0x2,0x3
0a37 7004       |p   |		Jump_Nonzero	0xa3c
0a38 00da       |    |		Load_Top	At_Offset_2
0a39 c5fb       |    |		Store	0x2,-0x5
0a3a 4801       |H   |		Short_Literal	0x1
0a3b a403       |    |		Store_Unchecked	0x2,0x3
0a3c e402       |    |		Load	0x2,0x2
0a3d 700c       |p   |		Jump_Nonzero	0xa4a
0a3e 00da       |    |		Load_Top	At_Offset_2
0a3f e014       |    |		Load	0x0,0x14
0a40 1844       | D  |		Execute	Package,Field_Execute,Field_Number 0x44
0a41 e004       |    |		Load	0x0,0x4
0a42 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0a43 7006       |p   |		Jump_Nonzero	0xa4a
0a44 00da       |    |		Load_Top	At_Offset_2
0a45 e014       |    |		Load	0x0,0x14
0a46 1844       | D  |		Execute	Package,Field_Execute,Field_Number 0x44
0a47 c5fc       |    |		Store	0x2,-0x4
0a48 4801       |H   |		Short_Literal	0x1
0a49 a402       |    |		Store_Unchecked	0x2,0x2
0a4a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0a4b e402       |    |		Load	0x2,0x2
0a4c 7004       |p   |		Jump_Nonzero	0xa51
0a4d 00da       |    |		Load_Top	At_Offset_2
0a4e c5fc       |    |		Store	0x2,-0x4
0a4f 4801       |H   |		Short_Literal	0x1
0a50 a402       |    |		Store_Unchecked	0x2,0x2
0a51 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0a52 ; --------------------------------------------------------------------------------------
0a52 ; STRING TABLE
0a52 ; --------------------------------------------------------------------------------------
0a52 0060       | `  |		.STRTAB	0x0060->0x0a82							; "ARRAY_INDEX"
0a53 0069       | i  |		.STRTAB	0x0069->0x0a87							; "INDEX_CONSTRAINT"
0a54 0077       | w  |		.STRTAB	0x0077->0x0a8f							; "DISCRIMINANT"
0a55 0081       |    |		.STRTAB	0x0081->0x0a95							; "DISCRIMINANT_CONSTRAINT"
0a56 0096       |    |		.STRTAB	0x0096->0x0aa1							; "CHOICE"
0a57 009a       |    |		.STRTAB	0x009a->0x0aa4							; "NOT_SPECIAL"
0a58 00a3       |    |		.STRTAB	0x00a3->0x0aa9							; " "
0a59 00a2       |    |		.STRTAB	0x00a2->0x0aaa							; "Size"
0a5a 00a4       |    |		.STRTAB	0x00a4->0x0aac							; "Items"
0a5b 00a7       |    |		.STRTAB	0x00a7->0x0aae							; "INFORMATION"
0a5c 00b0       |    |		.STRTAB	0x00b0->0x0ab4							; "EXPLODED TYPE DISPLAY"
0a5d 00c3       |    |		.STRTAB	0x00c3->0x0abe							; "_"
0a5e 00c2       |    |		.STRTAB	0x00c2->0x0abf							; "type_display"
0a5f 00cc       |    |		.STRTAB	0x00cc->0x0ac5							; "Image is not a type declaration"
0a60 00e9       |    |		.STRTAB	0x00e9->0x0ad4							; "CHARACTER"
0a61 00f0       |    |		.STRTAB	0x00f0->0x0ad9							; "BOOLEAN"
0a62 00f5       |    |		.STRTAB	0x00f5->0x0adc							; "when "
0a63 00f8       |    |		.STRTAB	0x00f8->0x0adf							; " | "
0a64 00f9       |    |		.STRTAB	0x00f9->0x0ae0							; "; "
0a65 00f9       |    |		.STRTAB	0x00f9->0x0ae1							; ", "
0a66 00f9       |    |		.STRTAB	0x00f9->0x0ae2							; "GEN FORMAL"
0a67 0101       |    |		.STRTAB	0x0101->0x0ae7							; "P("
0a68 0101       |    |		.STRTAB	0x0101->0x0ae8							; ")"
0a69 0100       |    |		.STRTAB	0x0100->0x0ae9							; "LP("
0a6a 0101       |    |		.STRTAB	0x0101->0x0aea							; "UNKNOWN"
0a6b 0106       |    |		.STRTAB	0x0106->0x0aee							; "SUBTYPE"
0a6c 010b       |    |		.STRTAB	0x010b->0x0af1							; "ENUM"
0a6d 010d       |    |		.STRTAB	0x010d->0x0af3							; "INTEGER"
0a6e 0112       |    |		.STRTAB	0x0112->0x0af7							; "FLOAT"
0a6f 0115       |    |		.STRTAB	0x0115->0x0af9							; "FIXED"
0a70 0118       |    |		.STRTAB	0x0118->0x0afc							; "STRING"
0a71 011c       |    |		.STRTAB	0x011c->0x0aff							; "ARRAY"
0a72 011f       |    |		.STRTAB	0x011f->0x0b01							; "RECORD"
0a73 0123       | #  |		.STRTAB	0x0123->0x0b04							; "ACCESS"
0a74 0127       | '  |		.STRTAB	0x0127->0x0b07							; "DERIVED"
0a75 012c       | ,  |		.STRTAB	0x012c->0x0b0b							; "TASK"
0a76 012e       | .  |		.STRTAB	0x012e->0x0b0d							; "^INDEX"
0a77 0132       | 2  |		.STRTAB	0x0132->0x0b10							; "^CONSTRAINT"
0a78 013b       | ;  |		.STRTAB	0x013b->0x0b15							; "^DISCRIMS"
0a79 0142       | B  |		.STRTAB	0x0142->0x0b1a							; ">>CHOICE"
0a7a 0148       | H  |		.STRTAB	0x0148->0x0b1e							; "Size cannot be statically computed, expression unknown"
0a7b 017c       | |  |		.STRTAB	0x017c->0x0b39							; "NS"
0a7c 017c       | |  |		.STRTAB	0x017c->0x0b3a							; "Size cannot be statically computed, expression: "
0a7d 01aa       |    |		.STRTAB	0x01aa->0x0b52							; "Size in bytes"
0a7e 01b5       |    |		.STRTAB	0x01b5->0x0b58							; "Name and kind of the component"
0a7f 01d1       |    |		.STRTAB	0x01d1->0x0b67							; " : "
0a80 01d2       |    |		.STRTAB	0x01d2->0x0b69							; " - "
0a81 01d3       |    |		.STREND 0x01d3->0x0b6a
0a82 4152 5241  |ARRA|		.STRTAB_STRINGS
0b6b 0000 0000  |    |		.BLANK	0000[0x5]
0b70 ; --------------------------------------------------------------------------------------
0b70 ; Debug Table
0b70 ; --------------------------------------------------------------------------------------
0b70 0004 0004  |    |		.DEBUG4	0x0004,0x0004,0x2f9a,0x0000,0x0001,0x0022
0b76 000b 0bfe  |    |		.DBG4T	0x000b,0x0bfe,0x8000,0x0000
0b7a 0016 0c02  |    |		.DBG4T	0x0016,0x0c02,0x8000,0x8000
0b7e 007b 0c48  | { H|		.DBG4T	0x007b,0x0c48,0x0001,0x4000
0b82 010b 0c72  |   r|		.DBG4T	0x010b,0x0c72,0x0001,0x0000
0b86 0153 0000  | S  |		.DBG4T	0x0153,0x0000,0x0005,0x0000
0b8a 017b 0000  | {  |		.DBG4T	0x017b,0x0000,0x0005,0x0000
0b8e 019b 0c7a  |   z|		.DBG4T	0x019b,0x0c7a,0x0001,0x4000
0b92 0283 0cc7  |    |		.DBG4T	0x0283,0x0cc7,0x0001,0x4000
0b96 03cb 0d54  |   T|		.DBG4T	0x03cb,0x0d54,0x0001,0x4000
0b9a 03eb 0d60  |   `|		.DBG4T	0x03eb,0x0d60,0x0002,0x0000
0b9e 0403 0d65  |   e|		.DBG4T	0x0403,0x0d65,0x0001,0x0000
0ba2 041b 0d6c  |   l|		.DBG4T	0x041b,0x0d6c,0x0001,0x0000
0ba6 042b 0d70  | + p|		.DBG4T	0x042b,0x0d70,0x0002,0x0000
0baa 0443 0d77  | C w|		.DBG4T	0x0443,0x0d77,0x0002,0x4000
0bae 046b 0d85  | k  |		.DBG4T	0x046b,0x0d85,0x0002,0x4000
0bb2 04bb 0da4  |    |		.DBG4T	0x04bb,0x0da4,0x0001,0x4000
0bb6 05cb 0e15  |    |		.DBG4T	0x05cb,0x0e15,0x0002,0x4000
0bba 05f3 0e25  |   %|		.DBG4T	0x05f3,0x0e25,0x0001,0x0000
0bbe 0623 0e2c  | # ,|		.DBG4T	0x0623,0x0e2c,0x0001,0x4000
0bc2 067b 0e43  | { C|		.DBG4T	0x067b,0x0e43,0x0002,0x0000
0bc6 069b 0e47  |   G|		.DBG4T	0x069b,0x0e47,0x0002,0x0000
0bca 06bb 0e4b  |   K|		.DBG4T	0x06bb,0x0e4b,0x0001,0x0000
0bce 070b 0e5f  |   _|		.DBG4T	0x070b,0x0e5f,0x0001,0x4000
0bd2 075b 0e80  | [  |		.DBG4T	0x075b,0x0e80,0x0002,0x0000
0bd6 077b 0e84  | {  |		.DBG4T	0x077b,0x0e84,0x0002,0x4000
0bda 07b3 0e96  |    |		.DBG4T	0x07b3,0x0e96,0x0002,0x4000
0bde 07e3 0ea6  |    |		.DBG4T	0x07e3,0x0ea6,0x0002,0x4000
0be2 0813 0eb6  |    |		.DBG4T	0x0813,0x0eb6,0x0002,0x4000
0be6 08bb 0eff  |    |		.DBG4T	0x08bb,0x0eff,0x0002,0x4000
0bea 08db 0f0f  |    |		.DBG4T	0x08db,0x0f0f,0x0001,0x0000
0bee 09a3 0f1c  |    |		.DBG4T	0x09a3,0x0f1c,0x0004,0x0000
0bf2 09c3 0f24  |   $|		.DBG4T	0x09c3,0x0f24,0x0004,0x0000
0bf6 09e3 0f2c  |   ,|		.DBG4T	0x09e3,0x0f2c,0x0004,0x0000
0bfa 0a2b 0f36  | + 6|		.DBG4T	0x0a2b,0x0f36,0x0001,0x4000
0bfe ; --------------------------------------------------------------------------------------
0bfe ; Debug chain
0bfe ; --------------------------------------------------------------------------------------
0bfe 0002 0000  |    |		.DBGLEN	0x0002,0x0000
0c00 000f 0012  |    |		.DBGLNO	0x000f,0x0012
0c02 ; --------------------------------------------------------------------------------------
0c02 ; Debug chain
0c02 ; --------------------------------------------------------------------------------------
0c02 0022 0000  | "  |		.DBGLEN	0x0022,0x0000
0c04 0016 001d  |    |		.DBGLNO	0x0016,0x001d,0x001e,0x0023,0x0030,0x0037,0x0039,0x003b,0x003d,0x003f,0x0041,0x0043,0x0045,0x0047,0x0049,0x004b,0x004d,0x004f,0x0051,0x0053,0x0055,0x0057,0x0059,0x005b,0x005d,0x005f,0x0061,0x0063,0x0065,0x0067,0x0069,0x006b,0x006d,0x006f
0c26 0003 0004  |    |		.XXX[0x22]
0c28 0005 0006  |    |
0c2a 0007 0008  |    |
0c2c 000f 0010  |    |
0c2e 0011 0012  |    |
0c30 0013 0014  |    |
0c32 0015 0016  |    |
0c34 0017 0018  |    |
0c36 0019 001a  |    |
0c38 001b 001c  |    |
0c3a 001d 001e  |    |
0c3c 001f 0020  |    |
0c3e 0021 0022  | ! "|
0c40 0023 0024  | # $|
0c42 0025 0026  | % &|
0c44 0027 0028  | ' (|
0c46 0029 002a  | ) *|
0c48 ; --------------------------------------------------------------------------------------
0c48 ; Debug chain
0c48 ; --------------------------------------------------------------------------------------
0c48 000a 000f  |    |		.DBGLEN	0x000a,0x000f
0c4a 007b 007c  | { ||		.DBGLNO	0x007b,0x007c,0x0083,0x0088,0x008d,0x0091,0x0093,0x0095,0x0096,0x009f,0x00a1,0x00a3,0x00ab,0x00b1,0x00b7,0x00bf,0x00c3,0x00c8,0x00cd,0x00d6,0x00e0,0x00ea,0x00f4,0x00fa,0x00fe
0c63 0001 0002  |    |		.XXX[0xf]
0c65 0003 0004  |    |
0c67 0005 0007  |    |
0c69 0008 0006  |    |
0c6b 0009 000a  |    |
0c6d 000b 000c  |    |
0c6f 000d 000e  |    |
0c71 000f       |    |
0c72 ; --------------------------------------------------------------------------------------
0c72 ; Debug chain
0c72 ; --------------------------------------------------------------------------------------
0c72 0001 0005  |    |		.DBGLEN	0x0001,0x0005
0c74 010b 0119  |    |		.DBGLNO	0x010b,0x0119,0x011f,0x0142,0x0149,0x014b
0c7a ; --------------------------------------------------------------------------------------
0c7a ; Debug chain
0c7a ; --------------------------------------------------------------------------------------
0c7a 0007 0022  |   "|		.DBGLEN	0x0007,0x0022
0c7c 019b 01a2  |    |		.DBGLNO	0x019b,0x01a2,0x01ac,0x01ae,0x01b0,0x01b2,0x01b3,0x01b7,0x01b9,0x01bb,0x01cc,0x01ce,0x01d1,0x01da,0x01dc,0x01e3,0x01e6,0x01ef,0x01f1,0x01f8,0x01fb,0x020f,0x0219,0x021b,0x0222,0x0225,0x022e,0x0237,0x0239,0x0240,0x024a,0x024d,0x0250,0x0253,0x0256,0x025c,0x0266,0x0269,0x026c,0x026f,0x0272
0ca5 0001 0002  |    |		.XXX[0x22]
0ca7 0003 0021  |   !|
0ca9 0022 0004  | "  |
0cab 0005 0006  |    |
0cad 0007 0008  |    |
0caf 0009 000a  |    |
0cb1 000b 000c  |    |
0cb3 000d 000e  |    |
0cb5 000f 0010  |    |
0cb7 0011 0012  |    |
0cb9 0013 0014  |    |
0cbb 0015 0016  |    |
0cbd 0017 0018  |    |
0cbf 0019 001a  |    |
0cc1 001b 001c  |    |
0cc3 001d 001e  |    |
0cc5 001f 0020  |    |
0cc7 ; --------------------------------------------------------------------------------------
0cc7 ; Debug chain
0cc7 ; --------------------------------------------------------------------------------------
0cc7 0007 0042  |   B|		.DBGLEN	0x0007,0x0042
0cc9 0283 028a  |    |		.DBGLNO	0x0283,0x028a,0x028c,0x028e,0x0290,0x029f,0x02a0,0x02a8,0x02ab,0x02ae,0x02b1,0x02b3,0x02b6,0x02ba,0x02bc,0x02bd,0x02ce,0x02d0,0x02d2,0x02d3,0x02d7,0x02db,0x02dd,0x02de,0x02ea,0x02eb,0x02ee,0x02f1,0x02f4,0x02f7,0x02fa,0x02fd,0x0304,0x030a,0x030e,0x030f,0x031a,0x031c,0x0322,0x0323,0x032e,0x0337,0x0339,0x033f,0x0340,0x0343,0x0345,0x0347,0x0348,0x035d,0x0367,0x0369,0x036f,0x0370,0x0374,0x037e,0x0380,0x0382,0x0383,0x038a,0x038c,0x038d,0x0398,0x039b,0x039f,0x03a0,0x03a1,0x03a8,0x03ac,0x03b4,0x03b7,0x03ba,0x03bf
0d12 0001 0002  |    |		.XXX[0x42]
0d14 0003 0004  |    |
0d16 0005 0007  |    |
0d18 0008 0009  |    |
0d1a 000a 003d  |   =|
0d1c 003e 003f  | > ?|
0d1e 000b 000c  |    |
0d20 000d 000e  |    |
0d22 000f 0010  |    |
0d24 0011 0012  |    |
0d26 0013 0014  |    |
0d28 0015 0016  |    |
0d2a 0017 0018  |    |
0d2c 0019 001a  |    |
0d2e 001b 001c  |    |
0d30 001d 001e  |    |
0d32 001f 0020  |    |
0d34 0021 0022  | ! "|
0d36 0023 0024  | # $|
0d38 0025 0026  | % &|
0d3a 0027 0028  | ' (|
0d3c 0029 002a  | ) *|
0d3e 002b 002c  | + ,|
0d40 002d 002e  | - .|
0d42 002f 0030  | / 0|
0d44 0031 0032  | 1 2|
0d46 0033 0034  | 3 4|
0d48 0035 0036  | 5 6|
0d4a 0037 0038  | 7 8|
0d4c 0039 003a  | 9 :|
0d4e 003b 003c  | ; <|
0d50 0040 0041  | @ A|
0d52 0042 0043  | B C|
0d54 ; --------------------------------------------------------------------------------------
0d54 ; Debug chain
0d54 ; --------------------------------------------------------------------------------------
0d54 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0d56 03cb 03d2  |    |		.DBGLNO	0x03cb,0x03d2,0x03d7,0x03da,0x03df,0x03e4
0d5c 0002 0003  |    |		.XXX[0x4]
0d5e 0001 0004  |    |
0d60 ; --------------------------------------------------------------------------------------
0d60 ; Debug chain
0d60 ; --------------------------------------------------------------------------------------
0d60 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0d62 03eb 03ef  |    |		.DBGLNO	0x03eb,0x03ef,0x03f1
0d65 ; --------------------------------------------------------------------------------------
0d65 ; Debug chain
0d65 ; --------------------------------------------------------------------------------------
0d65 0000 0005  |    |		.DBGLEN	0x0000,0x0005
0d67 0403 0407  |    |		.DBGLNO	0x0403,0x0407,0x040b,0x040e,0x0410
0d6c ; --------------------------------------------------------------------------------------
0d6c ; Debug chain
0d6c ; --------------------------------------------------------------------------------------
0d6c 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0d6e 041b 041e  |    |		.DBGLNO	0x041b,0x041e
0d70 ; --------------------------------------------------------------------------------------
0d70 ; Debug chain
0d70 ; --------------------------------------------------------------------------------------
0d70 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0d72 042b 042d  | + -|		.DBGLNO	0x042b,0x042d,0x0432,0x0436,0x043a
0d77 ; --------------------------------------------------------------------------------------
0d77 ; Debug chain
0d77 ; --------------------------------------------------------------------------------------
0d77 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0d79 0443 044a  | C J|		.DBGLNO	0x0443,0x044a,0x0451,0x0455,0x045a,0x045d,0x0462
0d80 0002 0003  |    |		.XXX[0x5]
0d82 0005 0004  |    |
0d84 0001       |    |
0d85 ; --------------------------------------------------------------------------------------
0d85 ; Debug chain
0d85 ; --------------------------------------------------------------------------------------
0d85 0003 000d  |    |		.DBGLEN	0x0003,0x000d
0d87 046b 0470  | k p|		.DBGLNO	0x046b,0x0470,0x0475,0x047c,0x0480,0x0482,0x0487,0x048b,0x0494,0x0496,0x0498,0x049a,0x049c,0x04a5,0x04aa,0x04af
0d97 0001 0002  |    |		.XXX[0xd]
0d99 0003 0005  |    |
0d9b 0006 000b  |    |
0d9d 0007 0008  |    |
0d9f 0009 000a  |    |
0da1 000c 0004  |    |
0da3 000d       |    |
0da4 ; --------------------------------------------------------------------------------------
0da4 ; Debug chain
0da4 ; --------------------------------------------------------------------------------------
0da4 000d 0031  |   1|		.DBGLEN	0x000d,0x0031
0da6 04bb 04c0  |    |		.DBGLNO	0x04bb,0x04c0,0x04ca,0x04cf,0x04d4,0x04d9,0x04da,0x04db,0x04e0,0x04e5,0x04e8,0x04e9,0x04ed,0x04ef,0x04fa,0x04fe,0x0500,0x0502,0x0506,0x050a,0x050c,0x0514,0x0516,0x0519,0x051e,0x0522,0x052b,0x0538,0x053e,0x0542,0x0546,0x054a,0x0556,0x055a,0x055d,0x0560,0x0563,0x0568,0x056a,0x0572,0x0574,0x0576,0x0578,0x0579,0x057d,0x057f,0x0582,0x0584,0x0589,0x058f,0x0591,0x0593,0x0595,0x0597,0x0599,0x05a3,0x05aa,0x05ae,0x05b3,0x05b8,0x05ba,0x05bd
0de4 0001 0002  |    |		.XXX[0x31]
0de6 0003 0004  |    |
0de8 0005 0007  |    |
0dea 0008 0009  |    |
0dec 0026 0027  | & '|
0dee 000a 000b  |    |
0df0 000c 000d  |    |
0df2 000e 0010  |    |
0df4 0011 0012  |    |
0df6 0013 0014  |    |
0df8 0015 0016  |    |
0dfa 0017 0018  |    |
0dfc 0019 001a  |    |
0dfe 001b 001c  |    |
0e00 001d 001e  |    |
0e02 001f 0020  |    |
0e04 0021 0022  | ! "|
0e06 0023 000f  | #  |
0e08 0024 0025  | $ %|
0e0a 0028 0029  | ( )|
0e0c 002a 002b  | * +|
0e0e 002c 002d  | , -|
0e10 002e 0006  | .  |
0e12 002f 0030  | / 0|
0e14 0031       | 1  |
0e15 ; --------------------------------------------------------------------------------------
0e15 ; Debug chain
0e15 ; --------------------------------------------------------------------------------------
0e15 0002 0006  |    |		.DBGLEN	0x0002,0x0006
0e17 05cb 05d0  |    |		.DBGLNO	0x05cb,0x05d0,0x05d7,0x05db,0x05df,0x05e1,0x05e6,0x05eb
0e1f 0002 0003  |    |		.XXX[0x6]
0e21 0004 0005  |    |
0e23 0001 0006  |    |
0e25 ; --------------------------------------------------------------------------------------
0e25 ; Debug chain
0e25 ; --------------------------------------------------------------------------------------
0e25 0001 0004  |    |		.DBGLEN	0x0001,0x0004
0e27 05f3 05f8  |    |		.DBGLNO	0x05f3,0x05f8,0x05fc,0x0605,0x0613
0e2c ; --------------------------------------------------------------------------------------
0e2c ; Debug chain
0e2c ; --------------------------------------------------------------------------------------
0e2c 0005 0008  |    |		.DBGLEN	0x0005,0x0008
0e2e 0623 0628  | # (|		.DBGLNO	0x0623,0x0628,0x062d,0x0637,0x0639,0x063c,0x0640,0x0644,0x065d,0x065f,0x0665,0x066a,0x066f
0e3b 0001 0003  |    |		.XXX[0x8]
0e3d 0004 0005  |    |
0e3f 0006 0007  |    |
0e41 0002 0008  |    |
0e43 ; --------------------------------------------------------------------------------------
0e43 ; Debug chain
0e43 ; --------------------------------------------------------------------------------------
0e43 0001 0001  |    |		.DBGLEN	0x0001,0x0001
0e45 067b 0682  | {  |		.DBGLNO	0x067b,0x0682
0e47 ; --------------------------------------------------------------------------------------
0e47 ; Debug chain
0e47 ; --------------------------------------------------------------------------------------
0e47 0001 0001  |    |		.DBGLEN	0x0001,0x0001
0e49 069b 06a2  |    |		.DBGLNO	0x069b,0x06a2
0e4b ; --------------------------------------------------------------------------------------
0e4b ; Debug chain
0e4b ; --------------------------------------------------------------------------------------
0e4b 0004 000e  |    |		.DBGLEN	0x0004,0x000e
0e4d 06bb 06bd  |    |		.DBGLNO	0x06bb,0x06bd,0x06c2,0x06c4,0x06c6,0x06c8,0x06cc,0x06cf,0x06d3,0x06d6,0x06da,0x06e7,0x06ec,0x06ee,0x06f5,0x06f7,0x06f9,0x0701
0e5f ; --------------------------------------------------------------------------------------
0e5f ; Debug chain
0e5f ; --------------------------------------------------------------------------------------
0e5f 0003 000e  |    |		.DBGLEN	0x0003,0x000e
0e61 070b 070e  |    |		.DBGLNO	0x070b,0x070e,0x0713,0x0715,0x0718,0x071b,0x071d,0x0721,0x0725,0x0729,0x072a,0x072f,0x0733,0x0739,0x074a,0x074f,0x0752
0e72 0001 0002  |    |		.XXX[0xe]
0e74 0003 0004  |    |
0e76 0006 0007  |    |
0e78 0008 0009  |    |
0e7a 000a 000b  |    |
0e7c 000c 000d  |    |
0e7e 000e 0005  |    |
0e80 ; --------------------------------------------------------------------------------------
0e80 ; Debug chain
0e80 ; --------------------------------------------------------------------------------------
0e80 0001 0001  |    |		.DBGLEN	0x0001,0x0001
0e82 075b 076e  | [ n|		.DBGLNO	0x075b,0x076e
0e84 ; --------------------------------------------------------------------------------------
0e84 ; Debug chain
0e84 ; --------------------------------------------------------------------------------------
0e84 0002 0007  |    |		.DBGLEN	0x0002,0x0007
0e86 077b 077d  | { }|		.DBGLNO	0x077b,0x077d,0x0784,0x078c,0x0795,0x0799,0x079d,0x07a4,0x07a9
0e8f 0001 0003  |    |		.XXX[0x7]
0e91 0004 0005  |    |
0e93 0006 0002  |    |
0e95 0007       |    |
0e96 ; --------------------------------------------------------------------------------------
0e96 ; Debug chain
0e96 ; --------------------------------------------------------------------------------------
0e96 0002 0006  |    |		.DBGLEN	0x0002,0x0006
0e98 07b3 07b5  |    |		.DBGLNO	0x07b3,0x07b5,0x07be,0x07c7,0x07cb,0x07cf,0x07d6,0x07db
0ea0 0002 0003  |    |		.XXX[0x6]
0ea2 0004 0005  |    |
0ea4 0001 0006  |    |
0ea6 ; --------------------------------------------------------------------------------------
0ea6 ; Debug chain
0ea6 ; --------------------------------------------------------------------------------------
0ea6 0002 0006  |    |		.DBGLEN	0x0002,0x0006
0ea8 07e3 07e5  |    |		.DBGLNO	0x07e3,0x07e5,0x07ee,0x07f7,0x07fb,0x07ff,0x0806,0x080b
0eb0 0002 0003  |    |		.XXX[0x6]
0eb2 0004 0005  |    |
0eb4 0001 0006  |    |
0eb6 ; --------------------------------------------------------------------------------------
0eb6 ; Debug chain
0eb6 ; --------------------------------------------------------------------------------------
0eb6 0001 0023  |   #|		.DBGLEN	0x0001,0x0023
0eb8 0813 081d  |    |		.DBGLNO	0x0813,0x081d,0x0825,0x0829,0x082d,0x0833,0x0836,0x083a,0x0845,0x0849,0x0854,0x0865,0x0868,0x086b,0x086f,0x0872,0x0875,0x0878,0x087b,0x087e,0x0881,0x0884,0x0889,0x088c,0x088f,0x0892,0x0895,0x0898,0x089b,0x089d,0x089f,0x08a2,0x08a5,0x08a9,0x08ac,0x08b1
0edc 0001 0007  |    |		.XXX[0x23]
0ede 0008 0009  |    |
0ee0 000a 000b  |    |
0ee2 000c 000d  |    |
0ee4 000e 000f  |    |
0ee6 0022 0010  | "  |
0ee8 0011 0012  |    |
0eea 0013 0014  |    |
0eec 0015 0016  |    |
0eee 0017 0018  |    |
0ef0 0019 001a  |    |
0ef2 001b 001c  |    |
0ef4 001d 001e  |    |
0ef6 001f 0020  |    |
0ef8 0021 0002  | !  |
0efa 0003 0004  |    |
0efc 0005 0006  |    |
0efe 0023       | #  |
0eff ; --------------------------------------------------------------------------------------
0eff ; Debug chain
0eff ; --------------------------------------------------------------------------------------
0eff 0000 0007  |    |		.DBGLEN	0x0000,0x0007
0f01 08bb 08c3  |    |		.DBGLNO	0x08bb,0x08c3,0x08c5,0x08c8,0x08cb,0x08ce,0x08d1
0f08 0001 0007  |    |		.XXX[0x7]
0f0a 0002 0003  |    |
0f0c 0004 0005  |    |
0f0e 0006       |    |
0f0f ; --------------------------------------------------------------------------------------
0f0f ; Debug chain
0f0f ; --------------------------------------------------------------------------------------
0f0f 0001 000a  |    |		.DBGLEN	0x0001,0x000a
0f11 08db 08df  |    |		.DBGLNO	0x08db,0x08df,0x08e4,0x08f3,0x08f6,0x08f9,0x090e,0x0925,0x093c,0x0940,0x096d
0f1c ; --------------------------------------------------------------------------------------
0f1c ; Debug chain
0f1c ; --------------------------------------------------------------------------------------
0f1c 0001 0005  |    |		.DBGLEN	0x0001,0x0005
0f1e 09a3 09a7  |    |		.DBGLNO	0x09a3,0x09a7,0x09aa,0x09ad,0x09b0,0x09b3
0f24 ; --------------------------------------------------------------------------------------
0f24 ; Debug chain
0f24 ; --------------------------------------------------------------------------------------
0f24 0001 0005  |    |		.DBGLEN	0x0001,0x0005
0f26 09c3 09c7  |    |		.DBGLNO	0x09c3,0x09c7,0x09ca,0x09cd,0x09d0,0x09d3
0f2c ; --------------------------------------------------------------------------------------
0f2c ; Debug chain
0f2c ; --------------------------------------------------------------------------------------
0f2c 0002 0006  |    |		.DBGLEN	0x0002,0x0006
0f2e 09e3 09ed  |    |		.DBGLNO	0x09e3,0x09ed,0x09f1,0x0a06,0x0a0a,0x0a0e,0x0a12,0x0a1f
0f36 ; --------------------------------------------------------------------------------------
0f36 ; Debug chain
0f36 ; --------------------------------------------------------------------------------------
0f36 0000 000a  |    |		.DBGLEN	0x0000,0x000a
0f38 0a2b 0a36  | + 6|		.DBGLNO	0x0a2b,0x0a36,0x0a38,0x0a3a,0x0a3c,0x0a44,0x0a48,0x0a4b,0x0a4d,0x0a4f
0f42 0001 0005  |    |		.XXX[0xa]
0f44 0006 0007  |    |
0f46 0008 0009  |    |
0f48 000a 0002  |    |
0f4a 0003 0004  |    |
0f4c 0000 0000  |    |		.BLANK	0000[0xb4]