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

⟦aee4b360c⟧

    Length: 6144 (0x1800)
    Notes: 00_class, 5811_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_040cf4

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 5811       |X   |		.CONST	0x5811								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0698       |    |		.CONST	0x0698								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 0005       |    |		.CONST	0x0005								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00b1       |    |		.CONST	0x00b1								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 002d       | -  |		.CONST	0x002d								; Number of locals
000b			INIT_0008:
000b 0007       |    |		Action	Break_Optional							; Debug Table 0x0 = .DEBUG	0x000b,0x07fa,0x8000,0x0000,0x0035,0x1874,0x0000,0x0009
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 619e       |a   |		Indirect_Literal	Discrete,0x1ac,{0x00000000, 0x35187401}		; Debug Table 0x0.0x2 = 0xd,0xfffd
000e 0129       | )  |		Execute	Any,Make_Visible
000f e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x3 = 0xf,0xfffc
0010 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0011 0129       | )  |		Execute	Any,Make_Visible
0012 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x4 = 0x12,0xfffb
0013 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0014 0129       | )  |		Execute	Any,Make_Visible
0015 6192       |a   |		Indirect_Literal	Discrete,0x1a8,{0xffffffff, 0xffff8000}		; Debug Table 0x0.0x5 = 0x15,0xfffa
0016 618d       |a   |		Indirect_Literal	Discrete,0x1a4,{0x00000000, 0x00007fff}
0017 00e2       |    |		Load_Encached	Integer_Cache
0018 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
0019 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x6 = 0x19,0xfff9
001a 6189       |a   |		Indirect_Literal	Discrete,0x1a4,{0x00000000, 0x00007fff}
001b 00da       |    |		Load_Top	At_Offset_2
001c 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
001d 4801       |H   |		Short_Literal	0x1							; Debug Table 0x0.0x7 = 0x1d,0xfff8
001e 6185       |a   |		Indirect_Literal	Discrete,0x1a4,{0x00000000, 0x00007fff}
001f 00db       |    |		Load_Top	At_Offset_3
0020 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
0021 617e       |a~  |		Indirect_Literal	Discrete,0x1a0,{0xffffffff, 0x80000000}		; Debug Table 0x0.0x8 = 0x21,0xfff7
0022 6179       |ay  |		Indirect_Literal	Discrete,0x19c,{0x00000000, 0x7fffffff}
0023 e002       |    |		Load	0x0,0x2
0024 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0025 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
0026 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x9 = 0x26,0xfff6
0027 6174       |at  |		Indirect_Literal	Discrete,0x19c,{0x00000000, 0x7fffffff}
0028 00da       |    |		Load_Top	At_Offset_2
0029 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
002a 4801       |H   |		Short_Literal	0x1							; Debug Table 0x0.0xa = 0x2a,0xfff5
002b 6170       |ap  |		Indirect_Literal	Discrete,0x19c,{0x00000000, 0x7fffffff}
002c 00db       |    |		Load_Top	At_Offset_3
002d 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
002e e002       |    |		Load	0x0,0x2								; Debug Table 0x0.0xb = 0x2e,0xfff4
002f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0030 0129       | )  |		Execute	Any,Make_Visible
0031 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0xc = 0x31,0xfff3
0032 6169       |ai  |		Indirect_Literal	Discrete,0x19c,{0x00000000, 0x7fffffff}
0033 00da       |    |		Load_Top	At_Offset_2
0034 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
0035 4801       |H   |		Short_Literal	0x1							; Debug Table 0x0.0xd = 0x35,0xfff2
0036 6165       |ae  |		Indirect_Literal	Discrete,0x19c,{0x00000000, 0x7fffffff}
0037 00db       |    |		Load_Top	At_Offset_3
0038 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
0039 e002       |    |		Load	0x0,0x2								; Debug Table 0x0.0xe = 0x39,0xfff1
003a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
003b 0129       | )  |		Execute	Any,Make_Visible
003c e002       |    |		Load	0x0,0x2								; Debug Table 0x0.0xf = 0x3c,0xfff0
003d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
003e 0129       | )  |		Execute	Any,Make_Visible
003f 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x10 = 0x3f,0xffef
0040 6157       |aW  |		Indirect_Literal	Discrete,0x198,{0x00000000, 0x3b9ac9ff}
0041 e214       |    |		Load	0x1,0x14
0042 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
0043 e213       |    |		Load	0x1,0x13							; Debug Table 0x0.0x11 = 0x43,0xffee
0044 00d9       |    |		Load_Top	At_Offset_1
0045 02a0       |    |		Declare_Subprogram	Null_Subprogram
0046 4802       |H   |		Short_Literal	0x2
0047 032e       | .  |		Declare_Type	Record,Defined,Visible
0048 029a 00bb  |    |		Declare_Subprogram	INIT_00b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x12 = 0x48,0xffed
004a 029a 011b  |    |		Declare_Subprogram	INIT_0118,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x13 = 0x4a,0xffec
004c e210       |    |		Load	0x1,0x10							; Debug Table 0x0.0x14 = 0x4c,0xffeb
004d 0129       | )  |		Execute	Any,Make_Visible
004e 4801       |H   |		Short_Literal	0x1							; Debug Table 0x0.0x15 = 0x4e,0xffea
004f 480c       |H   |		Short_Literal	0xc
0050 e210       |    |		Load	0x1,0x10
0051 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
0052 4801       |H   |		Short_Literal	0x1							; Debug Table 0x0.0x16 = 0x52,0xffe9
0053 481f       |H   |		Short_Literal	0x1f
0054 e210       |    |		Load	0x1,0x10
0055 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
0056 e21c       |    |		Load	0x1,0x1c							; Debug Table 0x0.0x17 = 0x56,0xffe8
0057 0129       | )  |		Execute	Any,Make_Visible
0058 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x0.0x18 = 0x58,0xffe7
0059 00db       |    |		Load_Top	At_Offset_3
005a 00db       |    |		Load_Top	At_Offset_3
005b 00db       |    |		Load_Top	At_Offset_3
005c 02a0       |    |		Declare_Subprogram	Null_Subprogram
005d 4804       |H   |		Short_Literal	0x4
005e 032e       | .  |		Declare_Type	Record,Defined,Visible
005f 029a 013b  |   ;|		Declare_Subprogram	INIT_0138,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x19 = 0x5f,0xffe6
0061 029a 016b  |   k|		Declare_Subprogram	INIT_0168,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1a = 0x61,0xffe5
0063 4805       |H   |		Short_Literal	0x5							; Debug Table 0x0.0x1b = 0x63,0xffe4
0064 612f       |a/  |		Indirect_Literal	Discrete,0x194,{0x00471409, 0x00001b30}
0065 02a0       |    |		Declare_Subprogram	Null_Subprogram
0066 038d       |    |		Declare_Type	Package,Defined,Visible,Not_Elaborated
0067 00bf       |    |		Action	Accept_Activation
0068 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1 = .DEBUG	0x0068,0x0834,0x8000,0x0000,0x0035,0x1884,0x0000,0x0005
													; Debug Table 0x1.0x0 = 0x68,0xffff
0069 4801       |H   |		Short_Literal	0x1
006a e20f       |    |		Load	0x1,0xf
006b 035b       | [  |		Declare_Type	Array,Constrained
006c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x1 = 0x6c,0xfffe
006d 0337       | 7  |		Declare_Variable	Array
006e 4801       |H   |		Short_Literal	0x1
006f 4801       |H   |		Short_Literal	0x1
0070 e003       |    |		Load	0x0,0x3
0071 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0072 0334       | 4  |		Declare_Variable	Array,With_Constraint
0073 4800       |H   |		Short_Literal	0x0
0074 4801       |H   |		Short_Literal	0x1
0075 00da       |    |		Load_Top	At_Offset_2
0076 01d6       |    |		Execute	Vector,Field_Write
0077 00d9       |    |		Load_Top	At_Offset_1
0078 01d4       |    |		Execute	Vector,Structure_Write
0079 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0x79,0xfffd
007a 4f80       |O   |		Short_Literal	-0x80							; Debug Table 0x1.0x3 = 0x7a,0xfffc
007b 487f       |H   |		Short_Literal	0x7f
007c e216       |    |		Load	0x1,0x16
007d 03f8       |    |		Declare_Type	Discrete,Constrained
007e e002       |    |		Load	0x0,0x2								; Debug Table 0x1.0x4 = 0x7e,0xfffb
007f 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0080 00e3       |    |		Load_Encached	Natural_Cache
0081 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0082 610d       |a   |		Indirect_Literal	Discrete,0x190,{0x00000000, 0x3b9aca00}		; Debug Table 0x1.0x5 = 0x82,0xfffa
0083 00d9       |    |		Load_Top	At_Offset_1
0084 0270       | p  |		Execute	Discrete,Divide
0085 00e3       |    |		Load_Encached	Natural_Cache
0086 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0087 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1.0x6 = 0x87,0xfff9
0088 00d9       |    |		Load_Top	At_Offset_1
0089 0271       | q  |		Execute	Discrete,Times
008a 6105       |a   |		Indirect_Literal	Discrete,0x190,{0x00000000, 0x3b9aca00}
008b 027f       |    |		Execute	Discrete,Equal
008c 7002       |p   |		Jump_Nonzero	0x8f
008d 4887       |H   |		Short_Literal	0x87
008e 0257       | W  |		Execute	Discrete,Raise
008f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x7 = 0x8f,0xfff8
0090 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
0091 00e3       |    |		Load_Encached	Natural_Cache
0092 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0093 00e7       |    |		Load_Encached	Duration_Cache						; Debug Table 0x1.0x8 = 0x93,0xfff7
0094 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0095 00e7       |    |		Load_Encached	Duration_Cache
0096 1c03       |    |		Execute_Immediate	Run_Utility,0x3
0097 023a       | :  |		Execute	Float,Divide
0098 0235       | 5  |		Execute	Float,Round_To_Discrete
0099 00db       |    |		Load_Top	At_Offset_3
009a 0271       | q  |		Execute	Discrete,Times
009b 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
009c 00e7       |    |		Load_Encached	Duration_Cache
009d 03f1       |    |		Declare_Variable	Discrete,With_Value
009e 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d				; Debug Table 0x1.0x9 = 0x9e,0xfff6
009f 00c7       |    |		Action	Elaborate_Subprogram
00a0 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e				; Debug Table 0x1.0xa = 0xa0,0xfff5
00a1 00c7       |    |		Action	Elaborate_Subprogram
00a2 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24				; Debug Table 0x1.0xb = 0xa2,0xfff4
00a3 00c7       |    |		Action	Elaborate_Subprogram
00a4 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25				; Debug Table 0x1.0xc = 0xa4,0xfff3
00a5 00c7       |    |		Action	Elaborate_Subprogram
00a6 00b6       |    |		Action	Make_Scope							; Debug Table 0x1.0xd = 0xa6,0xfff2
00a7 e229       | )  |		Load	0x1,0x29
00a8 e228       | (  |		Load	0x1,0x28
00a9 e227       | '  |		Load	0x1,0x27
00aa e004       |    |		Load	0x0,0x4
00ab e003       |    |		Load	0x0,0x3
00ac 4806       |H   |		Short_Literal	0x6
00ad e226       | &  |		Load	0x1,0x26
00ae 020e       |    |		Execute	Module,Augment_Imports
00af e226       | &  |		Load	0x1,0x26
00b0 020d       |    |		Execute	Module,Elaborate
00b1			BODY_0008:
00b1 00bc       |    |		Action	Signal_Activated
00b2 00bb       |    |		Action	Signal_Completion
00b3 0000 0000  |    |		.BLANK	0000[0x5]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00bf       |    |		.CONST	0x00bf								; Address of begin
00b9 010e       |    |		.CONST	0x010e								; Address of exception handler
00ba 0004       |    |		.CONST	0x0004								; Number of locals
00bb			INIT_00b8:
00bb e213       |    |		Load	0x1,0x13							; Debug Table 0x2 = .DEBUG	0x00bb,0x0852,0x0002,0x0000,0x0035,0x1874,0x0000,0x00f0
													; Debug Table 0x2.0x0 = 0xbb,0xffff
00bc 0007       |    |		Action	Break_Optional
00bd 00e7       |    |		Load_Encached	Duration_Cache						; Debug Table 0x2.0x1 = 0xbd,0xfffe
00be 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x2.0x2 = 0xbe,0xfffd
00bf			BODY_00b8:
00bf e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2.0x3 = 0xbf,0x1
00c0 00d8       |    |		Load_Top	At_Offset_0
00c1 0c00       |    |		Execute_Immediate	Greater_Equal,0x0
00c2 7003       |p   |		Jump_Nonzero	0xc6
00c3 60c8       |`   |		Indirect_Literal	Discrete,0x18c,{0xffffffff, 0xffffc000}
00c4 0273       | s  |		Execute	Discrete,Plus
00c5 7802       |x   |		Jump	0xc8
00c6 60c1       |`   |		Indirect_Literal	Discrete,0x188,{0x00000000, 0x00004000}
00c7 0273       | s  |		Execute	Discrete,Plus
00c8 09f1       |    |		Execute_Immediate	Binary_Scale,-0xf
00c9 e213       |    |		Load	0x1,0x13
00ca 025e       | ^  |		Execute	Discrete,Convert
00cb 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
00cc e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2.0x4 = 0xcc,0x2
00cd 00db       |    |		Load_Top	At_Offset_3
00ce 090f       |    |		Execute_Immediate	Binary_Scale,0xf
00cf 0272       | r  |		Execute	Discrete,Minus
00d0 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
00d1 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0x5 = 0xd1,0x3
00d2 4800       |H   |		Short_Literal	0x0
00d3 027c       | |  |		Execute	Discrete,Less
00d4 6808       |h   |		Jump_Zero	0xdd
00d5 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0x6 = 0xd5,0x4
00d6 0aff       |    |		Execute_Immediate	Plus,-0x1
00d7 005b       | [  |		Store_Top	Discrete,At_Offset_3
00d8 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2.0x7 = 0xd8,0x5
00d9 00db       |    |		Load_Top	At_Offset_3
00da 090f       |    |		Execute_Immediate	Binary_Scale,0xf
00db 0272       | r  |		Execute	Discrete,Minus
00dc 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
00dd 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0x8 = 0xdd,0x6
00de 4800       |H   |		Short_Literal	0x0
00df 027b       | {  |		Execute	Discrete,Greater_Equal
00e0 7002       |p   |		Jump_Nonzero	0xe3
00e1 4887       |H   |		Short_Literal	0x87
00e2 0257       | W  |		Execute	Discrete,Raise
00e3 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0x9 = 0xe3,0x7
00e4 609f       |`   |		Indirect_Literal	Discrete,0x184,{0x00000000, 0x00008000}
00e5 027c       | |  |		Execute	Discrete,Less
00e6 7002       |p   |		Jump_Nonzero	0xe9
00e7 4887       |H   |		Short_Literal	0x87
00e8 0257       | W  |		Execute	Discrete,Raise
00e9 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0xa = 0xe9,0x8
00ea e22a       | *  |		Load	0x1,0x2a
00eb 0271       | q  |		Execute	Discrete,Times
00ec 00d8       |    |		Load_Top	At_Offset_0
00ed 0c00       |    |		Execute_Immediate	Greater_Equal,0x0
00ee 7003       |p   |		Jump_Nonzero	0xf2
00ef 609c       |`   |		Indirect_Literal	Discrete,0x18c,{0xffffffff, 0xffffc000}
00f0 0273       | s  |		Execute	Discrete,Plus
00f1 7802       |x   |		Jump	0xf4
00f2 6095       |`   |		Indirect_Literal	Discrete,0x188,{0x00000000, 0x00004000}
00f3 0273       | s  |		Execute	Discrete,Plus
00f4 09f1       |    |		Execute_Immediate	Binary_Scale,-0xf
00f5 00e3       |    |		Load_Encached	Natural_Cache
00f6 025e       | ^  |		Execute	Discrete,Convert
00f7 e22b       | +  |		Load	0x1,0x2b
00f8 0271       | q  |		Execute	Discrete,Times
00f9 0059       | Y  |		Store_Top	Discrete,At_Offset_1
00fa 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0xb = 0xfa,0x9
00fb 609c       |`   |		Indirect_Literal	Discrete,0x198,{0x00000000, 0x3b9ac9ff}
00fc 027d       | }  |		Execute	Discrete,Greater
00fd 6805       |h   |		Jump_Zero	0x103
00fe 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0xc = 0xfe,0xa
00ff 0a01       |    |		Execute_Immediate	Plus,0x1
0100 005b       | [  |		Store_Top	Discrete,At_Offset_3
0101 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2.0xd = 0x101,0xb
0102 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0103 e21c       |    |		Load	0x1,0x1c							; Debug Table 0x2.0xe = 0x103,0xc
0104 0322       | "  |		Declare_Variable	Record
0105 00db       |    |		Load_Top	At_Offset_3
0106 00d9       |    |		Load_Top	At_Offset_1
0107 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0108 00d9       |    |		Load_Top	At_Offset_1
0109 e21b       |    |		Load	0x1,0x1b
010a 025b       | [  |		Execute	Discrete,Check_In_Type
010b 00d9       |    |		Load_Top	At_Offset_1
010c 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
010d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
010e			TRAP_00b8:
010e 010e       |    |		Execute	Exception,Is_Constraint_Error
010f 7002       |p   |		Jump_Nonzero	0x112
0110 010d       |    |		Execute	Exception,Is_Numeric_Error
0111 6802       |h   |		Jump_Zero	0x114
0112 e20d       |    |		Load	0x1,0xd								; Debug Table 0x2.0xf = 0x112,0xd
0113 0257       | W  |		Execute	Discrete,Raise
0114 0100       |    |		Execute	Exception,Raise
0115 0000 0000  |    |		.XXX[0x3]
0117 0000       |    |
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 011c       |    |		.CONST	0x011c								; Address of begin
0119 0131       | 1  |		.CONST	0x0131								; Address of exception handler
011a 0002       |    |		.CONST	0x0002								; Number of locals
011b			INIT_0118:
011b 00e7       |    |		Load_Encached	Duration_Cache						; Debug Table 0x3 = .DEBUG	0x011b,0x0874,0x0002,0x0000,0x0035,0x1874,0x0000,0x00fd
													; Debug Table 0x3.0x0 = 0x11b,0xffff
011c			BODY_0118:
011c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x1 = 0x11c,0x1
011d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
011e e22c       | ,  |		Load	0x1,0x2c
011f 0273       | s  |		Execute	Discrete,Plus
0120 0248       | H  |		Execute	Discrete,Check_In_Integer
0121 e22b       | +  |		Load	0x1,0x2b
0122 0270       | p  |		Execute	Discrete,Divide
0123 090f       |    |		Execute_Immediate	Binary_Scale,0xf
0124 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0125 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x2 = 0x125,0x2
0126 e22d       | -  |		Load	0x1,0x2d
0127 0273       | s  |		Execute	Discrete,Plus
0128 e22a       | *  |		Load	0x1,0x2a
0129 0270       | p  |		Execute	Discrete,Divide
012a 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
012b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x3 = 0x12b,0x3
012c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
012d 090f       |    |		Execute_Immediate	Binary_Scale,0xf
012e 00d9       |    |		Load_Top	At_Offset_1
012f 0273       | s  |		Execute	Discrete,Plus
0130 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0131			TRAP_0118:
0131 010e       |    |		Execute	Exception,Is_Constraint_Error
0132 7002       |p   |		Jump_Nonzero	0x135
0133 010d       |    |		Execute	Exception,Is_Numeric_Error
0134 6802       |h   |		Jump_Zero	0x137
0135 e20d       |    |		Load	0x1,0xd								; Debug Table 0x3.0x4 = 0x135,0x4
0136 0257       | W  |		Execute	Discrete,Raise
0137 0100       |    |		Execute	Exception,Raise
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013f       | ?  |		.CONST	0x013f								; Address of begin
0139 015d       | ]  |		.CONST	0x015d								; Address of exception handler
013a 0003       |    |		.CONST	0x0003								; Number of locals
013b			INIT_0138:
013b e005       |    |		Load	0x0,0x5								; Debug Table 0x4 = .DEBUG	0x013b,0x0880,0x0002,0x0000,0x0035,0x1874,0x0000,0x0140
													; Debug Table 0x4.0x0 = 0x13b,0xffff
013c 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
013d e223       | #  |		Load	0x1,0x23							; Debug Table 0x4.0x1 = 0x13d,0xfffe
013e 0322       | "  |		Declare_Variable	Record
013f			BODY_0138:
013f e005       |    |		Load	0x0,0x5								; Debug Table 0x4.0x2 = 0x13f,0x1
0140 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0141 e005       |    |		Load	0x0,0x5
0142 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0143 e005       |    |		Load	0x0,0x5
0144 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0145 e005       |    |		Load	0x0,0x5
0146 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0147 e5ff       |    |		Load	0x2,-0x1
0148 e005       |    |		Load	0x0,0x5
0149 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
014a e210       |    |		Load	0x1,0x10
014b 025e       | ^  |		Execute	Discrete,Convert
014c e403       |    |		Load	0x2,0x3
014d 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
014e e220       |    |		Load	0x1,0x20
014f 025e       | ^  |		Execute	Discrete,Convert
0150 00db       |    |		Load_Top	At_Offset_3
0151 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0152 e221       | !  |		Load	0x1,0x21
0153 025e       | ^  |		Execute	Discrete,Convert
0154 00da       |    |		Load_Top	At_Offset_2
0155 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0156 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0157 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0x3 = 0x157,0x2
0158 821d       |    |		Call	0x1,0x1d
0159 00d9       |    |		Load_Top	At_Offset_1
015a 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
015b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x4 = 0x15b,0x3
015c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
015d			TRAP_0138:
015d 010e       |    |		Execute	Exception,Is_Constraint_Error
015e 7002       |p   |		Jump_Nonzero	0x161
015f 010d       |    |		Execute	Exception,Is_Numeric_Error
0160 6802       |h   |		Jump_Zero	0x163
0161 e20d       |    |		Load	0x1,0xd								; Debug Table 0x4.0x5 = 0x161,0x4
0162 0257       | W  |		Execute	Discrete,Raise
0163 0100       |    |		Execute	Exception,Raise
0164 0000 0000  |    |		.BLANK	0000[0x4]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016b       | k  |		.CONST	0x016b								; Address of begin
0169 017d       | }  |		.CONST	0x017d								; Address of exception handler
016a 0001       |    |		.CONST	0x0001								; Number of locals
016b			BODY_0168:
016b			INIT_0168:
016b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5 = .DEBUG	0x016b,0x088e,0x0002,0x0000,0x0035,0x1874,0x0000,0x014d
													; Debug Table 0x5.0x0 = 0x16b,0x1
016c 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
016d 821e       |    |		Call	0x1,0x1e
016e e005       |    |		Load	0x0,0x5
016f 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0170 025b       | [  |		Execute	Discrete,Check_In_Type
0171 00db       |    |		Load_Top	At_Offset_3
0172 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0173 e5ff       |    |		Load	0x2,-0x1
0174 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0175 e5ff       |    |		Load	0x2,-0x1
0176 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0177 e005       |    |		Load	0x0,0x5
0178 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0179 025b       | [  |		Execute	Discrete,Check_In_Type
017a e005       |    |		Load	0x0,0x5
017b 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
017c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
017d			TRAP_0168:
017d 010e       |    |		Execute	Exception,Is_Constraint_Error
017e 7002       |p   |		Jump_Nonzero	0x181
017f 010d       |    |		Execute	Exception,Is_Numeric_Error
0180 6802       |h   |		Jump_Zero	0x183
0181 e20d       |    |		Load	0x1,0xd								; Debug Table 0x5.0x1 = 0x181,0x2
0182 0257       | W  |		Execute	Discrete,Raise
0183 0100       |    |		Execute	Exception,Raise
0184 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008000}
0188 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
018c ffff ffff  |    |		.LITERAL	{0xffffffff, 0xffffc000}
0190 0000 0000  |    |		.LITERAL	{0x00000000, 0x3b9aca00}
0194 0047 1409  | G  |		.LITERAL	{0x00471409, 0x00001b30}
0198 0000 0000  |    |		.LITERAL	{0x00000000, 0x3b9ac9ff}
019c 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffffff}
01a0 ffff ffff  |    |		.LITERAL	{0xffffffff, 0x80000000}
01a4 0000 0000  |    |		.LITERAL	{0x00000000, 0x00007fff}
01a8 ffff ffff  |    |		.LITERAL	{0xffffffff, 0xffff8000}
01ac 0000 0000  |    |		.LITERAL	{0x00000000, 0x35187401}
01b0 022f 0004  | /  |		.XXX[0x3]
01b2 002d       | -  |
01b3 029a 023b  |   ;|		Declare_Subprogram	INIT_0238,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6 = .DEBUG	0x01b3,0x0894,0x4000,0x0000,0x0035,0x1874,0x0000,0x015a
													; Debug Table 0x6.0x0 = 0x1b3,0xffff
01b5 029a 024b  |   K|		Declare_Subprogram	INIT_0248,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6.0x1 = 0x1b5,0xfffe
01b7 029a 025b  |   [|		Declare_Subprogram	INIT_0258,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6.0x2 = 0x1b7,0xfffd
01b9 029a 026b  |   k|		Declare_Subprogram	INIT_0268,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6.0x3 = 0x1b9,0xfffc
01bb 029a 027b  |   {|		Declare_Subprogram	INIT_0278,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6.0x4 = 0x1bb,0xfffb
01bd 029a 02bb  |    |		Declare_Subprogram	INIT_02b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6.0x5 = 0x1bd,0xfffa
01bf 029a 02eb  |    |		Declare_Subprogram	INIT_02e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6.0x6 = 0x1bf,0xfff9
01c1 029a 0303  |    |		Declare_Subprogram	INIT_0300,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6.0x7 = 0x1c1,0xfff8
01c3 029a 0323  |   #|		Declare_Subprogram	INIT_0320,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6.0x8 = 0x1c3,0xfff7
01c5 029a 033b  |   ;|		Declare_Subprogram	INIT_0338,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6.0x9 = 0x1c5,0xfff6
01c7 029a 035b  |   [|		Declare_Subprogram	INIT_0358,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6.0xa = 0x1c7,0xfff5
01c9 029a 037b  |   {|		Declare_Subprogram	INIT_0378,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6.0xb = 0x1c9,0xfff4
01cb 029a 03a3  |    |		Declare_Subprogram	INIT_03a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6.0xc = 0x1cb,0xfff3
01cd 029a 03b3  |    |		Declare_Subprogram	INIT_03b0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6.0xd = 0x1cd,0xfff2
01cf 029a 03cb  |    |		Declare_Subprogram	INIT_03c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6.0xe = 0x1cf,0xfff1
01d1 029a 03e3  |    |		Declare_Subprogram	INIT_03e0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6.0xf = 0x1d1,0xfff0
01d3 029a 03f3  |    |		Declare_Subprogram	INIT_03f0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6.0x10 = 0x1d3,0xffef
01d5 029a 0403  |    |		Declare_Subprogram	INIT_0400,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6.0x11 = 0x1d5,0xffee
01d7 029a 041b  |    |		Declare_Subprogram	INIT_0418,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6.0x12 = 0x1d7,0xffed
01d9 029a 043b  |   ;|		Declare_Subprogram	INIT_0438,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6.0x13 = 0x1d9,0xffec
01db 029a 045b  |   [|		Declare_Subprogram	INIT_0458,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6.0x14 = 0x1db,0xffeb
01dd 029a 048b  |    |		Declare_Subprogram	INIT_0488,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6.0x15 = 0x1dd,0xffea
01df 029a 04bb  |    |		Declare_Subprogram	INIT_04b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6.0x16 = 0x1df,0xffe9
01e1 029a 04e3  |    |		Declare_Subprogram	INIT_04e0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x6.0x17 = 0x1e1,0xffe8
01e3 4803       |H   |		Short_Literal	0x3							; Debug Table 0x6.0x18 = 0x1e3,0xffe7
01e4 624b       |bK  |		Indirect_Literal	Discrete,0x430,{0x00471409, 0x00006530}
01e5 02a0       |    |		Declare_Subprogram	Null_Subprogram
01e6 038d       |    |		Declare_Type	Package,Defined,Visible,Not_Elaborated
01e7 4809       |H   |		Short_Literal	0x9							; Debug Table 0x6.0x19 = 0x1e7,0xffe6
01e8 6243       |bC  |		Indirect_Literal	Discrete,0x42c,{0x00471409, 0x00005bb0}
01e9 02a0       |    |		Declare_Subprogram	Null_Subprogram
01ea 038d       |    |		Declare_Type	Package,Defined,Visible,Not_Elaborated
01eb 00bf       |    |		Action	Accept_Activation
01ec 029d 0503  |    |		Declare_Subprogram	INIT_0500,For_Outer_Call			; Debug Table 0x7 = .DEBUG	0x01ec,0x08ca,0x4000,0x0000,0x0035,0x1884,0x0000,0x0220
													; Debug Table 0x7.0x0 = 0x1ec,0xffff
01ee 029d 0553  |   S|		Declare_Subprogram	INIT_0550,For_Outer_Call			; Debug Table 0x7.0x1 = 0x1ee,0xfffe
01f0 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x7.0x2 = 0x1f0,0xfffd
01f1 00c7       |    |		Action	Elaborate_Subprogram
01f2 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x7.0x3 = 0x1f2,0xfffc
01f3 00c7       |    |		Action	Elaborate_Subprogram
01f4 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x7.0x4 = 0x1f4,0xfffb
01f5 00c7       |    |		Action	Elaborate_Subprogram
01f6 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x7.0x5 = 0x1f6,0xfffa
01f7 00c7       |    |		Action	Elaborate_Subprogram
01f8 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x7.0x6 = 0x1f8,0xfff9
01f9 00c7       |    |		Action	Elaborate_Subprogram
01fa 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x7.0x7 = 0x1fa,0xfff8
01fb 00c7       |    |		Action	Elaborate_Subprogram
01fc 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x7.0x8 = 0x1fc,0xfff7
01fd 00c7       |    |		Action	Elaborate_Subprogram
01fe 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x7.0x9 = 0x1fe,0xfff6
01ff 00c7       |    |		Action	Elaborate_Subprogram
0200 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x7.0xa = 0x200,0xfff5
0201 00c7       |    |		Action	Elaborate_Subprogram
0202 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b				; Debug Table 0x7.0xb = 0x202,0xfff4
0203 00c7       |    |		Action	Elaborate_Subprogram
0204 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e				; Debug Table 0x7.0xc = 0x204,0xfff3
0205 00c7       |    |		Action	Elaborate_Subprogram
0206 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f				; Debug Table 0x7.0xd = 0x206,0xfff2
0207 00c7       |    |		Action	Elaborate_Subprogram
0208 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c				; Debug Table 0x7.0xe = 0x208,0xfff1
0209 00c7       |    |		Action	Elaborate_Subprogram
020a 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d				; Debug Table 0x7.0xf = 0x20a,0xfff0
020b 00c7       |    |		Action	Elaborate_Subprogram
020c 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20				; Debug Table 0x7.0x10 = 0x20c,0xffef
020d 00c7       |    |		Action	Elaborate_Subprogram
020e 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21				; Debug Table 0x7.0x11 = 0x20e,0xffee
020f 00c7       |    |		Action	Elaborate_Subprogram
0210 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24				; Debug Table 0x7.0x12 = 0x210,0xffed
0211 00c7       |    |		Action	Elaborate_Subprogram
0212 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25				; Debug Table 0x7.0x13 = 0x212,0xffec
0213 00c7       |    |		Action	Elaborate_Subprogram
0214 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28				; Debug Table 0x7.0x14 = 0x214,0xffeb
0215 00c7       |    |		Action	Elaborate_Subprogram
0216 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29				; Debug Table 0x7.0x15 = 0x216,0xffea
0217 00c7       |    |		Action	Elaborate_Subprogram
0218 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26				; Debug Table 0x7.0x16 = 0x218,0xffe9
0219 00c7       |    |		Action	Elaborate_Subprogram
021a 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27				; Debug Table 0x7.0x17 = 0x21a,0xffe8
021b 00c7       |    |		Action	Elaborate_Subprogram
021c 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22				; Debug Table 0x7.0x18 = 0x21c,0xffe7
021d 00c7       |    |		Action	Elaborate_Subprogram
021e 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23				; Debug Table 0x7.0x19 = 0x21e,0xffe6
021f 00c7       |    |		Action	Elaborate_Subprogram
0220 e001       |    |		Load	0x0,0x1								; Debug Table 0x7.0x1a = 0x220,0xffe5
0221 00b6       |    |		Action	Make_Scope
0222 4802       |H   |		Short_Literal	0x2
0223 e22a       | *  |		Load	0x1,0x2a
0224 020e       |    |		Execute	Module,Augment_Imports
0225 00db       |    |		Load_Top	At_Offset_3
0226 020d       |    |		Execute	Module,Elaborate
0227 0007       |    |		Action	Break_Optional
0228 e001       |    |		Load	0x0,0x1								; Debug Table 0x7.0x1b = 0x228,0xffe4
0229 00b6       |    |		Action	Make_Scope
022a 4802       |H   |		Short_Literal	0x2
022b e22b       | +  |		Load	0x1,0x2b
022c 020e       |    |		Execute	Module,Augment_Imports
022d 00da       |    |		Load_Top	At_Offset_2
022e 020d       |    |		Execute	Module,Elaborate
022f 00bc       |    |		Action	Signal_Activated
0230 00bb       |    |		Action	Signal_Completion
0231 0000 0000  |    |		.BLANK	0000[0x7]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023b       | ;  |		.CONST	0x023b								; Address of begin
0239 0004       |    |		.CONST	0x0004								; Address of exception handler
023a 0001       |    |		.CONST	0x0001								; Number of locals
023b			BODY_0238:
023b			INIT_0238:
023b 4802       |H   |		Short_Literal	0x2							; Debug Table 0x8 = .DEBUG	0x023b,0x0904,0x1001,0x0000,0x0035,0x1874,0x0000,0x017a
													; Debug Table 0x8.0x0 = 0x23b,0x1
023c e5fe       |    |		Load	0x2,-0x2
023d e001       |    |		Load	0x0,0x1
023e 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
023f 025b       | [  |		Execute	Discrete,Check_In_Type
0240 e5ff       |    |		Load	0x2,-0x1
0241 e20f       |    |		Load	0x1,0xf
0242 0119       |    |		Execute	Any,Check_In_Formal_Type
0243 822c       | ,  |		Call	0x1,0x2c
0244 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0245 0000 0000  |    |		.XXX[0x3]
0247 0000       |    |
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024b       | K  |		.CONST	0x024b								; Address of begin
0249 0004       |    |		.CONST	0x0004								; Address of exception handler
024a 0001       |    |		.CONST	0x0001								; Number of locals
024b			BODY_0248:
024b			INIT_0248:
024b e001       |    |		Load	0x0,0x1								; Debug Table 0x9 = .DEBUG	0x024b,0x0908,0x1001,0x0000,0x0035,0x1874,0x0000,0x0188
													; Debug Table 0x9.0x0 = 0x24b,0x1
024c 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
024d 4802       |H   |		Short_Literal	0x2
024e e5ff       |    |		Load	0x2,-0x1
024f e20f       |    |		Load	0x1,0xf
0250 0119       |    |		Execute	Any,Check_In_Formal_Type
0251 822d       | -  |		Call	0x1,0x2d
0252 e001       |    |		Load	0x0,0x1
0253 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0254 025e       | ^  |		Execute	Discrete,Convert
0255 c5fe       |    |		Store	0x2,-0x2
0256 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0257 0000       |    |		.XXX[0x1]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 025b       | [  |		.CONST	0x025b								; Address of begin
0259 0004       |    |		.CONST	0x0004								; Address of exception handler
025a 0001       |    |		.CONST	0x0001								; Number of locals
025b			BODY_0258:
025b			INIT_0258:
025b 4804       |H   |		Short_Literal	0x4							; Debug Table 0xa = .DEBUG	0x025b,0x090c,0x1001,0x0000,0x0035,0x1874,0x0000,0x0196
													; Debug Table 0xa.0x0 = 0x25b,0x1
025c e5fe       |    |		Load	0x2,-0x2
025d e5ff       |    |		Load	0x2,-0x1
025e e20f       |    |		Load	0x1,0xf
025f 0119       |    |		Execute	Any,Check_In_Formal_Type
0260 822c       | ,  |		Call	0x1,0x2c
0261 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0262 0000 0000  |    |		.BLANK	0000[0x6]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026b       | k  |		.CONST	0x026b								; Address of begin
0269 0004       |    |		.CONST	0x0004								; Address of exception handler
026a 0001       |    |		.CONST	0x0001								; Number of locals
026b			BODY_0268:
026b			INIT_0268:
026b e001       |    |		Load	0x0,0x1								; Debug Table 0xb = .DEBUG	0x026b,0x0910,0x1001,0x0000,0x0035,0x1874,0x0000,0x01a4
													; Debug Table 0xb.0x0 = 0x26b,0x1
026c 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
026d 4804       |H   |		Short_Literal	0x4
026e e5ff       |    |		Load	0x2,-0x1
026f e20f       |    |		Load	0x1,0xf
0270 0119       |    |		Execute	Any,Check_In_Formal_Type
0271 822d       | -  |		Call	0x1,0x2d
0272 e001       |    |		Load	0x0,0x1
0273 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0274 025e       | ^  |		Execute	Discrete,Convert
0275 c5fe       |    |		Store	0x2,-0x2
0276 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0277 0000       |    |		.XXX[0x1]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 0281       |    |		.CONST	0x0281								; Address of begin
0279 02ab       |    |		.CONST	0x02ab								; Address of exception handler
027a 0003       |    |		.CONST	0x0003								; Number of locals
027b			INIT_0278:
027b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc = .DEBUG	0x027b,0x0914,0x1001,0x0000,0x0035,0x1874,0x0000,0x01b2
													; Debug Table 0xc.0x0 = 0x27b,0xffff
027c e001       |    |		Load	0x0,0x1
027d 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
027e 03f1       |    |		Declare_Variable	Discrete,With_Value
027f e001       |    |		Load	0x0,0x1								; Debug Table 0xc.0x1 = 0x27f,0xfffe
0280 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0281			BODY_0278:
0281 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xc.0x2 = 0x281,0x1
0282 7003       |p   |		Jump_Nonzero	0x286
0283 4800       |H   |		Short_Literal	0x0							; Debug Table 0xc.0x3 = 0x283,0x2
0284 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0285 7810       |x   |		Jump	0x296
0286 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc.0x4 = 0x286,0x3
0287 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0288 00cf       |    |		Action	Mark_Auxiliary
0289 7807       |x   |		Jump	0x291
028a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xc.0x5 = 0x28a,0x5
028b 0a01       |    |		Execute_Immediate	Plus,0x1
028c 005a       | Z  |		Store_Top	Discrete,At_Offset_2
028d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc.0x6 = 0x28d,0x6
028e 09f8       |    |		Execute_Immediate	Binary_Scale,-0x8
028f 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0290 00c9       |    |		Action	Pop_Auxiliary_Loop
0291 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc.0x7 = 0x291,0x4
0292 e002       |    |		Load	0x0,0x2
0293 0260       | `  |		Execute	Discrete,In_Type
0294 6ff5       |o   |		Jump_Zero	0x28a
0295 00ce       |    |		Action	Pop_Auxiliary
0296 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x8 = 0x296,0x7
0297 e5ff       |    |		Load	0x2,-0x1
0298 e20f       |    |		Load	0x1,0xf
0299 0119       |    |		Execute	Any,Check_In_Formal_Type
029a 8214       |    |		Call	0x1,0x14
029b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x9 = 0x29b,0x8
029c e5fe       |    |		Load	0x2,-0x2
029d e5ff       |    |		Load	0x2,-0x1
029e e20f       |    |		Load	0x1,0xf
029f 0119       |    |		Execute	Any,Check_In_Formal_Type
02a0 822c       | ,  |		Call	0x1,0x2c
02a1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0xa = 0x2a1,0x9
02a2 4801       |H   |		Short_Literal	0x1
02a3 0279       | y  |		Execute	Discrete,And
02a4 6805       |h   |		Jump_Zero	0x2aa
02a5 e003       |    |		Load	0x0,0x3								; Debug Table 0xc.0xb = 0x2a5,0xa
02a6 e5ff       |    |		Load	0x2,-0x1
02a7 e20f       |    |		Load	0x1,0xf
02a8 0119       |    |		Execute	Any,Check_In_Formal_Type
02a9 8210       |    |		Call	0x1,0x10
02aa 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02ab			TRAP_0278:
02ab 010e       |    |		Execute	Exception,Is_Constraint_Error
02ac 7002       |p   |		Jump_Nonzero	0x2af
02ad 010d       |    |		Execute	Exception,Is_Numeric_Error
02ae 6803       |h   |		Jump_Zero	0x2b2
02af e001       |    |		Load	0x0,0x1								; Debug Table 0xc.0xc = 0x2af,0xb
02b0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02b1 0257       | W  |		Execute	Discrete,Raise
02b2 0100       |    |		Execute	Exception,Raise
02b3 0000 0000  |    |		.BLANK	0000[0x5]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bf       |    |		.CONST	0x02bf								; Address of begin
02b9 02d9       |    |		.CONST	0x02d9								; Address of exception handler
02ba 0003       |    |		.CONST	0x0003								; Number of locals
02bb			INIT_02b8:
02bb e001       |    |		Load	0x0,0x1								; Debug Table 0xd = .DEBUG	0x02bb,0x0930,0x1001,0x0000,0x0035,0x1874,0x0000,0x01c0
													; Debug Table 0xd.0x0 = 0x2bb,0xffff
02bc 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
02bd e004       |    |		Load	0x0,0x4								; Debug Table 0xd.0x1 = 0x2bd,0xfffe
02be 0337       | 7  |		Declare_Variable	Array
02bf			BODY_02b8:
02bf e001       |    |		Load	0x0,0x1								; Debug Table 0xd.0x2 = 0x2bf,0x1
02c0 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
02c1 e5ff       |    |		Load	0x2,-0x1
02c2 e20f       |    |		Load	0x1,0xf
02c3 0119       |    |		Execute	Any,Check_In_Formal_Type
02c4 8215       |    |		Call	0x1,0x15
02c5 005a       | Z  |		Store_Top	Discrete,At_Offset_2
02c6 e001       |    |		Load	0x0,0x1								; Debug Table 0xd.0x3 = 0x2c6,0x2
02c7 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
02c8 00da       |    |		Load_Top	At_Offset_2
02c9 e5ff       |    |		Load	0x2,-0x1
02ca e20f       |    |		Load	0x1,0xf
02cb 0119       |    |		Execute	Any,Check_In_Formal_Type
02cc 822d       | -  |		Call	0x1,0x2d
02cd c5fe       |    |		Store	0x2,-0x2
02ce 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0x4 = 0x2ce,0x3
02cf 4801       |H   |		Short_Literal	0x1
02d0 0279       | y  |		Execute	Discrete,And
02d1 6806       |h   |		Jump_Zero	0x2d8
02d2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x5 = 0x2d2,0x4
02d3 e5ff       |    |		Load	0x2,-0x1
02d4 e20f       |    |		Load	0x1,0xf
02d5 0119       |    |		Execute	Any,Check_In_Formal_Type
02d6 8211       |    |		Call	0x1,0x11
02d7 00d1       |    |		Pop_Control	Pop_Count_1
02d8 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02d9			TRAP_02b8:
02d9 010e       |    |		Execute	Exception,Is_Constraint_Error
02da 7002       |p   |		Jump_Nonzero	0x2dd
02db 010d       |    |		Execute	Exception,Is_Numeric_Error
02dc 6803       |h   |		Jump_Zero	0x2e0
02dd e001       |    |		Load	0x0,0x1								; Debug Table 0xd.0x6 = 0x2dd,0x5
02de 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02df 0257       | W  |		Execute	Discrete,Raise
02e0 0100       |    |		Execute	Exception,Raise
02e1 0000 0000  |    |		.BLANK	0000[0x7]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02eb       |    |		.CONST	0x02eb								; Address of begin
02e9 02f3       |    |		.CONST	0x02f3								; Address of exception handler
02ea 0001       |    |		.CONST	0x0001								; Number of locals
02eb			BODY_02e8:
02eb			INIT_02e8:
02eb 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe = .DEBUG	0x02eb,0x0940,0x1001,0x0000,0x0035,0x1874,0x0000,0x01ce
													; Debug Table 0xe.0x0 = 0x2eb,0x1
02ec e005       |    |		Load	0x0,0x5
02ed 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
02ee 00db       |    |		Load_Top	At_Offset_3
02ef e20f       |    |		Load	0x1,0xf
02f0 0119       |    |		Execute	Any,Check_In_Formal_Type
02f1 8210       |    |		Call	0x1,0x10
02f2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02f3			TRAP_02e8:
02f3 010e       |    |		Execute	Exception,Is_Constraint_Error
02f4 7002       |p   |		Jump_Nonzero	0x2f7
02f5 010d       |    |		Execute	Exception,Is_Numeric_Error
02f6 6803       |h   |		Jump_Zero	0x2fa
02f7 e001       |    |		Load	0x0,0x1								; Debug Table 0xe.0x1 = 0x2f7,0x2
02f8 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02f9 0257       | W  |		Execute	Discrete,Raise
02fa 0100       |    |		Execute	Exception,Raise
02fb 0000 0000  |    |		.BLANK	0000[0x5]
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0306       |    |		.CONST	0x0306								; Address of begin
0301 0311       |    |		.CONST	0x0311								; Address of exception handler
0302 0002       |    |		.CONST	0x0002								; Number of locals
0303			INIT_0300:
0303 e005       |    |		Load	0x0,0x5								; Debug Table 0xf = .DEBUG	0x0303,0x0946,0x1001,0x0000,0x0035,0x1874,0x0000,0x01dc
													; Debug Table 0xf.0x0 = 0x303,0xffff
0304 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0305 0337       | 7  |		Declare_Variable	Array
0306			BODY_0300:
0306 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x1 = 0x306,0x1
0307 e5ff       |    |		Load	0x2,-0x1
0308 e20f       |    |		Load	0x1,0xf
0309 0119       |    |		Execute	Any,Check_In_Formal_Type
030a 8211       |    |		Call	0x1,0x11
030b 00d1       |    |		Pop_Control	Pop_Count_1
030c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x2 = 0x30c,0x2
030d e005       |    |		Load	0x0,0x5
030e 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
030f a5fe       |    |		Store_Unchecked	0x2,-0x2
0310 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0311			TRAP_0300:
0311 010e       |    |		Execute	Exception,Is_Constraint_Error
0312 7002       |p   |		Jump_Nonzero	0x315
0313 010d       |    |		Execute	Exception,Is_Numeric_Error
0314 6803       |h   |		Jump_Zero	0x318
0315 e001       |    |		Load	0x0,0x1								; Debug Table 0xf.0x3 = 0x315,0x3
0316 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0317 0257       | W  |		Execute	Discrete,Raise
0318 0100       |    |		Execute	Exception,Raise
0319 0000 0000  |    |		.BLANK	0000[0x7]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0323       | #  |		.CONST	0x0323								; Address of begin
0321 032b       | +  |		.CONST	0x032b								; Address of exception handler
0322 0001       |    |		.CONST	0x0001								; Number of locals
0323			BODY_0320:
0323			INIT_0320:
0323 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x10 = .DEBUG	0x0323,0x0950,0x1001,0x0000,0x0035,0x1874,0x0000,0x01ea
													; Debug Table 0x10.0x0 = 0x323,0x1
0324 e005       |    |		Load	0x0,0x5
0325 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0326 00db       |    |		Load_Top	At_Offset_3
0327 e20f       |    |		Load	0x1,0xf
0328 0119       |    |		Execute	Any,Check_In_Formal_Type
0329 8210       |    |		Call	0x1,0x10
032a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
032b			TRAP_0320:
032b 010e       |    |		Execute	Exception,Is_Constraint_Error
032c 7002       |p   |		Jump_Nonzero	0x32f
032d 010d       |    |		Execute	Exception,Is_Numeric_Error
032e 6803       |h   |		Jump_Zero	0x332
032f e001       |    |		Load	0x0,0x1								; Debug Table 0x10.0x1 = 0x32f,0x2
0330 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0331 0257       | W  |		Execute	Discrete,Raise
0332 0100       |    |		Execute	Exception,Raise
0333 0000 0000  |    |		.BLANK	0000[0x5]
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 033e       | >  |		.CONST	0x033e								; Address of begin
0339 0349       | I  |		.CONST	0x0349								; Address of exception handler
033a 0002       |    |		.CONST	0x0002								; Number of locals
033b			INIT_0338:
033b e005       |    |		Load	0x0,0x5								; Debug Table 0x11 = .DEBUG	0x033b,0x0956,0x1001,0x0000,0x0035,0x1874,0x0000,0x01f8
													; Debug Table 0x11.0x0 = 0x33b,0xffff
033c 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
033d 0337       | 7  |		Declare_Variable	Array
033e			BODY_0338:
033e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x1 = 0x33e,0x1
033f e5ff       |    |		Load	0x2,-0x1
0340 e20f       |    |		Load	0x1,0xf
0341 0119       |    |		Execute	Any,Check_In_Formal_Type
0342 8211       |    |		Call	0x1,0x11
0343 00d1       |    |		Pop_Control	Pop_Count_1
0344 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x2 = 0x344,0x2
0345 e005       |    |		Load	0x0,0x5
0346 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0347 a5fe       |    |		Store_Unchecked	0x2,-0x2
0348 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0349			TRAP_0338:
0349 010e       |    |		Execute	Exception,Is_Constraint_Error
034a 7002       |p   |		Jump_Nonzero	0x34d
034b 010d       |    |		Execute	Exception,Is_Numeric_Error
034c 6803       |h   |		Jump_Zero	0x350
034d e001       |    |		Load	0x0,0x1								; Debug Table 0x11.0x3 = 0x34d,0x3
034e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
034f 0257       | W  |		Execute	Discrete,Raise
0350 0100       |    |		Execute	Exception,Raise
0351 0000 0000  |    |		.BLANK	0000[0x7]
0358 ; --------------------------------------------------------------------------------------
0358 ; SUBPROGRAM
0358 ; --------------------------------------------------------------------------------------
0358 035b       | [  |		.CONST	0x035b								; Address of begin
0359 0004       |    |		.CONST	0x0004								; Address of exception handler
035a 0001       |    |		.CONST	0x0001								; Number of locals
035b			BODY_0358:
035b			INIT_0358:
035b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x12 = .DEBUG	0x035b,0x0960,0x1001,0x0000,0x0035,0x1874,0x0000,0x0206
													; Debug Table 0x12.0x0 = 0x35b,0x1
035c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
035d 00db       |    |		Load_Top	At_Offset_3
035e e20f       |    |		Load	0x1,0xf
035f 0119       |    |		Execute	Any,Check_In_Formal_Type
0360 8212       |    |		Call	0x1,0x12
0361 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x12.0x1 = 0x361,0x2
0362 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0363 00db       |    |		Load_Top	At_Offset_3
0364 e20f       |    |		Load	0x1,0xf
0365 0119       |    |		Execute	Any,Check_In_Formal_Type
0366 8212       |    |		Call	0x1,0x12
0367 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x12.0x2 = 0x367,0x3
0368 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0369 00db       |    |		Load_Top	At_Offset_3
036a e20f       |    |		Load	0x1,0xf
036b 0119       |    |		Execute	Any,Check_In_Formal_Type
036c 8212       |    |		Call	0x1,0x12
036d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x12.0x3 = 0x36d,0x4
036e 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
036f 00db       |    |		Load_Top	At_Offset_3
0370 e20f       |    |		Load	0x1,0xf
0371 0119       |    |		Execute	Any,Check_In_Formal_Type
0372 821e       |    |		Call	0x1,0x1e
0373 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0374 0000 0000  |    |		.BLANK	0000[0x4]
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 037b       | {  |		.CONST	0x037b								; Address of begin
0379 0004       |    |		.CONST	0x0004								; Address of exception handler
037a 0001       |    |		.CONST	0x0001								; Number of locals
037b			BODY_0378:
037b			INIT_0378:
037b e001       |    |		Load	0x0,0x1								; Debug Table 0x13 = .DEBUG	0x037b,0x096a,0x1001,0x0000,0x0035,0x1874,0x0000,0x0214
													; Debug Table 0x13.0x0 = 0x37b,0x1
037c 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
037d 00db       |    |		Load_Top	At_Offset_3
037e e20f       |    |		Load	0x1,0xf
037f 0119       |    |		Execute	Any,Check_In_Formal_Type
0380 8213       |    |		Call	0x1,0x13
0381 e5fe       |    |		Load	0x2,-0x2
0382 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0383 e001       |    |		Load	0x0,0x1								; Debug Table 0x13.0x1 = 0x383,0x2
0384 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0385 00db       |    |		Load_Top	At_Offset_3
0386 e20f       |    |		Load	0x1,0xf
0387 0119       |    |		Execute	Any,Check_In_Formal_Type
0388 8213       |    |		Call	0x1,0x13
0389 e5fe       |    |		Load	0x2,-0x2
038a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
038b e001       |    |		Load	0x0,0x1								; Debug Table 0x13.0x2 = 0x38b,0x3
038c 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
038d 00db       |    |		Load_Top	At_Offset_3
038e e20f       |    |		Load	0x1,0xf
038f 0119       |    |		Execute	Any,Check_In_Formal_Type
0390 8213       |    |		Call	0x1,0x13
0391 e5fe       |    |		Load	0x2,-0x2
0392 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0393 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x13.0x3 = 0x393,0x4
0394 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0395 00db       |    |		Load_Top	At_Offset_3
0396 e20f       |    |		Load	0x1,0xf
0397 0119       |    |		Execute	Any,Check_In_Formal_Type
0398 821f       |    |		Call	0x1,0x1f
0399 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
039a 0000 0000  |    |		.BLANK	0000[0x6]
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03a3       |    |		.CONST	0x03a3								; Address of begin
03a1 0004       |    |		.CONST	0x0004								; Address of exception handler
03a2 0001       |    |		.CONST	0x0001								; Number of locals
03a3			BODY_03a0:
03a3			INIT_03a0:
03a3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x14 = .DEBUG	0x03a3,0x0974,0x1001,0x0000,0x0035,0x1874,0x0000,0x0222
													; Debug Table 0x14.0x0 = 0x3a3,0x1
03a4 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03a5 00db       |    |		Load_Top	At_Offset_3
03a6 e20f       |    |		Load	0x1,0xf
03a7 0119       |    |		Execute	Any,Check_In_Formal_Type
03a8 8214       |    |		Call	0x1,0x14
03a9 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x14.0x1 = 0x3a9,0x2
03aa 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
03ab 00db       |    |		Load_Top	At_Offset_3
03ac e20f       |    |		Load	0x1,0xf
03ad 0119       |    |		Execute	Any,Check_In_Formal_Type
03ae 8214       |    |		Call	0x1,0x14
03af 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03b0 ; --------------------------------------------------------------------------------------
03b0 ; SUBPROGRAM
03b0 ; --------------------------------------------------------------------------------------
03b0 03b3       |    |		.CONST	0x03b3								; Address of begin
03b1 0004       |    |		.CONST	0x0004								; Address of exception handler
03b2 0001       |    |		.CONST	0x0001								; Number of locals
03b3			BODY_03b0:
03b3			INIT_03b0:
03b3 e001       |    |		Load	0x0,0x1								; Debug Table 0x15 = .DEBUG	0x03b3,0x097a,0x1001,0x0000,0x0035,0x1874,0x0000,0x0230
													; Debug Table 0x15.0x0 = 0x3b3,0x1
03b4 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
03b5 00db       |    |		Load_Top	At_Offset_3
03b6 e20f       |    |		Load	0x1,0xf
03b7 0119       |    |		Execute	Any,Check_In_Formal_Type
03b8 8215       |    |		Call	0x1,0x15
03b9 e5fe       |    |		Load	0x2,-0x2
03ba 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
03bb e001       |    |		Load	0x0,0x1								; Debug Table 0x15.0x1 = 0x3bb,0x2
03bc 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
03bd 00db       |    |		Load_Top	At_Offset_3
03be e20f       |    |		Load	0x1,0xf
03bf 0119       |    |		Execute	Any,Check_In_Formal_Type
03c0 8215       |    |		Call	0x1,0x15
03c1 e5fe       |    |		Load	0x2,-0x2
03c2 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
03c3 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03c4 0000 0000  |    |		.BLANK	0000[0x4]
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03cb       |    |		.CONST	0x03cb								; Address of begin
03c9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ca 0001       |    |		.CONST	0x0001								; Number of locals
03cb			BODY_03c8:
03cb			INIT_03c8:
03cb 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x16 = .DEBUG	0x03cb,0x0980,0x1001,0x0000,0x0035,0x1874,0x0000,0x023e
													; Debug Table 0x16.0x0 = 0x3cb,0x1
03cc 6806       |h   |		Jump_Zero	0x3d3
03cd 4801       |H   |		Short_Literal	0x1							; Debug Table 0x16.0x1 = 0x3cd,0x2
03ce 00db       |    |		Load_Top	At_Offset_3
03cf e20f       |    |		Load	0x1,0xf
03d0 0119       |    |		Execute	Any,Check_In_Formal_Type
03d1 8212       |    |		Call	0x1,0x12
03d2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03d3 4800       |H   |		Short_Literal	0x0							; Debug Table 0x16.0x2 = 0x3d3,0x3
03d4 00db       |    |		Load_Top	At_Offset_3
03d5 e20f       |    |		Load	0x1,0xf
03d6 0119       |    |		Execute	Any,Check_In_Formal_Type
03d7 8212       |    |		Call	0x1,0x12
03d8 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03d9 0000 0000  |    |		.BLANK	0000[0x7]
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03e5       |    |		.CONST	0x03e5								; Address of begin
03e1 0004       |    |		.CONST	0x0004								; Address of exception handler
03e2 0002       |    |		.CONST	0x0002								; Number of locals
03e3			INIT_03e0:
03e3 e001       |    |		Load	0x0,0x1								; Debug Table 0x17 = .DEBUG	0x03e3,0x0988,0x1001,0x0000,0x0035,0x1874,0x0000,0x024c
													; Debug Table 0x17.0x0 = 0x3e3,0xffff
03e4 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
03e5			BODY_03e0:
03e5 e001       |    |		Load	0x0,0x1								; Debug Table 0x17.0x1 = 0x3e5,0x1
03e6 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
03e7 e5ff       |    |		Load	0x2,-0x1
03e8 e20f       |    |		Load	0x1,0xf
03e9 0119       |    |		Execute	Any,Check_In_Formal_Type
03ea 8213       |    |		Call	0x1,0x13
03eb 0059       | Y  |		Store_Top	Discrete,At_Offset_1
03ec 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x2 = 0x3ec,0x2
03ed 0e00       |    |		Execute_Immediate	Not_Equal,0x0
03ee a5fe       |    |		Store_Unchecked	0x2,-0x2
03ef 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 03f3       |    |		.CONST	0x03f3								; Address of begin
03f1 0004       |    |		.CONST	0x0004								; Address of exception handler
03f2 0001       |    |		.CONST	0x0001								; Number of locals
03f3			BODY_03f0:
03f3			INIT_03f0:
03f3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x18 = .DEBUG	0x03f3,0x0990,0x1001,0x0000,0x0035,0x1874,0x0000,0x025a
													; Debug Table 0x18.0x0 = 0x3f3,0x1
03f4 00db       |    |		Load_Top	At_Offset_3
03f5 e20f       |    |		Load	0x1,0xf
03f6 0119       |    |		Execute	Any,Check_In_Formal_Type
03f7 8212       |    |		Call	0x1,0x12
03f8 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03f9 0000 0000  |    |		.BLANK	0000[0x7]
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 0403       |    |		.CONST	0x0403								; Address of begin
0401 040e       |    |		.CONST	0x040e								; Address of exception handler
0402 0001       |    |		.CONST	0x0001								; Number of locals
0403			BODY_0400:
0403			INIT_0400:
0403 e001       |    |		Load	0x0,0x1								; Debug Table 0x19 = .DEBUG	0x0403,0x0994,0x1001,0x0000,0x0035,0x1874,0x0000,0x0266
													; Debug Table 0x19.0x0 = 0x403,0x1
0404 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0405 00db       |    |		Load_Top	At_Offset_3
0406 e20f       |    |		Load	0x1,0xf
0407 0119       |    |		Execute	Any,Check_In_Formal_Type
0408 8213       |    |		Call	0x1,0x13
0409 e006       |    |		Load	0x0,0x6
040a 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
040b 025e       | ^  |		Execute	Discrete,Convert
040c c5fe       |    |		Store	0x2,-0x2
040d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
040e			TRAP_0400:
040e 010e       |    |		Execute	Exception,Is_Constraint_Error
040f 7002       |p   |		Jump_Nonzero	0x412
0410 010d       |    |		Execute	Exception,Is_Numeric_Error
0411 6803       |h   |		Jump_Zero	0x415
0412 e001       |    |		Load	0x0,0x1								; Debug Table 0x19.0x1 = 0x412,0x2
0413 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0414 0257       | W  |		Execute	Discrete,Raise
0415 0100       |    |		Execute	Exception,Raise
0416 0000 0000  |    |		.XXX[0x2]
0418 ; --------------------------------------------------------------------------------------
0418 ; SUBPROGRAM
0418 ; --------------------------------------------------------------------------------------
0418 041b       |    |		.CONST	0x041b								; Address of begin
0419 0424       | $  |		.CONST	0x0424								; Address of exception handler
041a 0001       |    |		.CONST	0x0001								; Number of locals
041b			BODY_0418:
041b			INIT_0418:
041b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a = .DEBUG	0x041b,0x099a,0x1001,0x0000,0x0035,0x1874,0x0000,0x0272
													; Debug Table 0x1a.0x0 = 0x41b,0x1
041c e001       |    |		Load	0x0,0x1
041d 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
041e 025b       | [  |		Execute	Discrete,Check_In_Type
041f 00db       |    |		Load_Top	At_Offset_3
0420 e20f       |    |		Load	0x1,0xf
0421 0119       |    |		Execute	Any,Check_In_Formal_Type
0422 8212       |    |		Call	0x1,0x12
0423 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0424			TRAP_0418:
0424 010e       |    |		Execute	Exception,Is_Constraint_Error
0425 7002       |p   |		Jump_Nonzero	0x428
0426 010d       |    |		Execute	Exception,Is_Numeric_Error
0427 6803       |h   |		Jump_Zero	0x42b
0428 e001       |    |		Load	0x0,0x1								; Debug Table 0x1a.0x1 = 0x428,0x2
0429 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
042a 0257       | W  |		Execute	Discrete,Raise
042b 0100       |    |		Execute	Exception,Raise
042c 0047 1409  | G  |		.LITERAL	{0x00471409, 0x00005bb0}
0430 0047 1409  | G  |		.LITERAL	{0x00471409, 0x00006530}
0434 0000 0000  |    |		.BLANK	0000[0x4]
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 043d       | =  |		.CONST	0x043d								; Address of begin
0439 044d       | M  |		.CONST	0x044d								; Address of exception handler
043a 0002       |    |		.CONST	0x0002								; Number of locals
043b			INIT_0438:
043b e001       |    |		Load	0x0,0x1								; Debug Table 0x1b = .DEBUG	0x043b,0x09a0,0x1001,0x0000,0x0035,0x1874,0x0000,0x0280
													; Debug Table 0x1b.0x0 = 0x43b,0xffff
043c 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
043d			BODY_0438:
043d e001       |    |		Load	0x0,0x1								; Debug Table 0x1b.0x1 = 0x43d,0x1
043e 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
043f e5ff       |    |		Load	0x2,-0x1
0440 e20f       |    |		Load	0x1,0xf
0441 0119       |    |		Execute	Any,Check_In_Formal_Type
0442 8213       |    |		Call	0x1,0x13
0443 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0444 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1b.0x2 = 0x444,0x2
0445 00d8       |    |		Load_Top	At_Offset_0
0446 00e8       |    |		Load_Encached	Character_Cache
0447 0260       | `  |		Execute	Discrete,In_Type
0448 7002       |p   |		Jump_Nonzero	0x44b
0449 48e0       |H   |		Short_Literal	0xe0
044a 0257       | W  |		Execute	Discrete,Raise
044b a5fe       |    |		Store_Unchecked	0x2,-0x2
044c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
044d			TRAP_0438:
044d 010e       |    |		Execute	Exception,Is_Constraint_Error
044e 7002       |p   |		Jump_Nonzero	0x451
044f 010d       |    |		Execute	Exception,Is_Numeric_Error
0450 6803       |h   |		Jump_Zero	0x454
0451 e001       |    |		Load	0x0,0x1								; Debug Table 0x1b.0x3 = 0x451,0x3
0452 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0453 0257       | W  |		Execute	Discrete,Raise
0454 0100       |    |		Execute	Exception,Raise
0455 0000 0000  |    |		.XXX[0x3]
0457 0000       |    |
0458 ; --------------------------------------------------------------------------------------
0458 ; SUBPROGRAM
0458 ; --------------------------------------------------------------------------------------
0458 0463       | c  |		.CONST	0x0463								; Address of begin
0459 047a       | z  |		.CONST	0x047a								; Address of exception handler
045a 0002       |    |		.CONST	0x0002								; Number of locals
045b			INIT_0458:
045b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1c = .DEBUG	0x045b,0x09aa,0x1001,0x0000,0x0035,0x1874,0x0000,0x028e
													; Debug Table 0x1c.0x0 = 0x45b,0xffff
045c 01dd       |    |		Execute	Vector,First
045d e5fe       |    |		Load	0x2,-0x2
045e 01dc       |    |		Execute	Vector,Last
045f e001       |    |		Load	0x0,0x1
0460 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0461 035b       | [  |		Declare_Type	Array,Constrained
0462 0337       | 7  |		Declare_Variable	Array
0463			BODY_0458:
0463 00cf       |    |		Action	Mark_Auxiliary
0464 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x1c.0x1 = 0x464,0x1
0465 01d9       |    |		Execute	Vector,Reverse_Bounds
0466 0263       | c  |		Execute	Discrete,Above_Bound
0467 700b       |p   |		Jump_Nonzero	0x473
0468 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1c.0x2 = 0x468,0x2
0469 e5fe       |    |		Load	0x2,-0x2
046a 01d7       |    |		Execute	Vector,Field_Read
046b e006       |    |		Load	0x0,0x6
046c 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
046d 025b       | [  |		Execute	Discrete,Check_In_Type
046e 00d9       |    |		Load_Top	At_Offset_1
046f e402       |    |		Load	0x2,0x2
0470 01d6       |    |		Execute	Vector,Field_Write
0471 00c8       |    |		Action	Pop_Auxiliary_Range
0472 3ff5       |?   |		Loop_Increasing	0x468
0473 00ce       |    |		Action	Pop_Auxiliary
0474 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1c.0x3 = 0x474,0x3
0475 e5ff       |    |		Load	0x2,-0x1
0476 e20f       |    |		Load	0x1,0xf
0477 0119       |    |		Execute	Any,Check_In_Formal_Type
0478 8228       | (  |		Call	0x1,0x28
0479 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
047a			TRAP_0458:
047a 010e       |    |		Execute	Exception,Is_Constraint_Error
047b 7002       |p   |		Jump_Nonzero	0x47e
047c 010d       |    |		Execute	Exception,Is_Numeric_Error
047d 6803       |h   |		Jump_Zero	0x481
047e e001       |    |		Load	0x0,0x1								; Debug Table 0x1c.0x4 = 0x47e,0x4
047f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0480 0257       | W  |		Execute	Discrete,Raise
0481 0100       |    |		Execute	Exception,Raise
0482 0000 0000  |    |		.BLANK	0000[0x6]
0488 ; --------------------------------------------------------------------------------------
0488 ; SUBPROGRAM
0488 ; --------------------------------------------------------------------------------------
0488 0496       |    |		.CONST	0x0496								; Address of begin
0489 04ae       |    |		.CONST	0x04ae								; Address of exception handler
048a 0003       |    |		.CONST	0x0003								; Number of locals
048b			INIT_0488:
048b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1d = .DEBUG	0x048b,0x09b6,0x1002,0x0000,0x0035,0x1874,0x0000,0x029c
													; Debug Table 0x1d.0x0 = 0x48b,0xffff
048c e20f       |    |		Load	0x1,0xf
048d 0119       |    |		Execute	Any,Check_In_Formal_Type
048e 8229       | )  |		Call	0x1,0x29
048f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1d.0x1 = 0x48f,0xfffe
0490 01dd       |    |		Execute	Vector,First
0491 00d9       |    |		Load_Top	At_Offset_1
0492 01dc       |    |		Execute	Vector,Last
0493 00e9       |    |		Load_Encached	String_Cache
0494 035b       | [  |		Declare_Type	Array,Constrained
0495 0337       | 7  |		Declare_Variable	Array
0496			BODY_0488:
0496 00cf       |    |		Action	Mark_Auxiliary
0497 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1d.0x2 = 0x497,0x1
0498 01d9       |    |		Execute	Vector,Reverse_Bounds
0499 0263       | c  |		Execute	Discrete,Above_Bound
049a 700e       |p   |		Jump_Nonzero	0x4a9
049b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1d.0x3 = 0x49b,0x2
049c e402       |    |		Load	0x2,0x2
049d 01d7       |    |		Execute	Vector,Field_Read
049e 00d8       |    |		Load_Top	At_Offset_0
049f 00e8       |    |		Load_Encached	Character_Cache
04a0 0260       | `  |		Execute	Discrete,In_Type
04a1 7002       |p   |		Jump_Nonzero	0x4a4
04a2 48e0       |H   |		Short_Literal	0xe0
04a3 0257       | W  |		Execute	Discrete,Raise
04a4 00d9       |    |		Load_Top	At_Offset_1
04a5 e403       |    |		Load	0x2,0x3
04a6 01d6       |    |		Execute	Vector,Field_Write
04a7 00c8       |    |		Action	Pop_Auxiliary_Range
04a8 3ff2       |?   |		Loop_Increasing	0x49b
04a9 00ce       |    |		Action	Pop_Auxiliary
04aa 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1d.0x4 = 0x4aa,0x3
04ab 00e9       |    |		Load_Encached	String_Cache
04ac 01c6       |    |		Execute	Vector,Convert_To_Formal
04ad 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04ae			TRAP_0488:
04ae 010e       |    |		Execute	Exception,Is_Constraint_Error
04af 7002       |p   |		Jump_Nonzero	0x4b2
04b0 010d       |    |		Execute	Exception,Is_Numeric_Error
04b1 6803       |h   |		Jump_Zero	0x4b5
04b2 e001       |    |		Load	0x0,0x1								; Debug Table 0x1d.0x5 = 0x4b2,0x4
04b3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04b4 0257       | W  |		Execute	Discrete,Raise
04b5 0100       |    |		Execute	Exception,Raise
04b6 0000 0000  |    |		.XXX[0x2]
04b8 ; --------------------------------------------------------------------------------------
04b8 ; SUBPROGRAM
04b8 ; --------------------------------------------------------------------------------------
04b8 04bb       |    |		.CONST	0x04bb								; Address of begin
04b9 04d4       |    |		.CONST	0x04d4								; Address of exception handler
04ba 0001       |    |		.CONST	0x0001								; Number of locals
04bb			BODY_04b8:
04bb			INIT_04b8:
04bb 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1e = .DEBUG	0x04bb,0x09c4,0x1001,0x0000,0x0035,0x1874,0x0000,0x02a7
													; Debug Table 0x1e.0x0 = 0x4bb,0x1
04bc 01db       |    |		Execute	Vector,Length
04bd e001       |    |		Load	0x0,0x1
04be 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
04bf 025b       | [  |		Execute	Discrete,Check_In_Type
04c0 00db       |    |		Load_Top	At_Offset_3
04c1 e20f       |    |		Load	0x1,0xf
04c2 0119       |    |		Execute	Any,Check_In_Formal_Type
04c3 8214       |    |		Call	0x1,0x14
04c4 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1e.0x1 = 0x4c4,0x2
04c5 00db       |    |		Load_Top	At_Offset_3
04c6 e20f       |    |		Load	0x1,0xf
04c7 0119       |    |		Execute	Any,Check_In_Formal_Type
04c8 8210       |    |		Call	0x1,0x10
04c9 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1e.0x2 = 0x4c9,0x3
04ca 01db       |    |		Execute	Vector,Length
04cb 4801       |H   |		Short_Literal	0x1
04cc 0279       | y  |		Execute	Discrete,And
04cd 6805       |h   |		Jump_Zero	0x4d3
04ce e003       |    |		Load	0x0,0x3								; Debug Table 0x1e.0x3 = 0x4ce,0x4
04cf 00db       |    |		Load_Top	At_Offset_3
04d0 e20f       |    |		Load	0x1,0xf
04d1 0119       |    |		Execute	Any,Check_In_Formal_Type
04d2 8210       |    |		Call	0x1,0x10
04d3 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04d4			TRAP_04b8:
04d4 010e       |    |		Execute	Exception,Is_Constraint_Error
04d5 7002       |p   |		Jump_Nonzero	0x4d8
04d6 010d       |    |		Execute	Exception,Is_Numeric_Error
04d7 6803       |h   |		Jump_Zero	0x4db
04d8 e001       |    |		Load	0x0,0x1								; Debug Table 0x1e.0x4 = 0x4d8,0x5
04d9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04da 0257       | W  |		Execute	Discrete,Raise
04db 0100       |    |		Execute	Exception,Raise
04dc 0000 0000  |    |		.BLANK	0000[0x4]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 04e9       |    |		.CONST	0x04e9								; Address of begin
04e1 04f3       |    |		.CONST	0x04f3								; Address of exception handler
04e2 0004       |    |		.CONST	0x0004								; Number of locals
04e3			INIT_04e0:
04e3 e001       |    |		Load	0x0,0x1								; Debug Table 0x1f = .DEBUG	0x04e3,0x09d0,0x1002,0x0000,0x0035,0x1874,0x0000,0x02b3
													; Debug Table 0x1f.0x0 = 0x4e3,0xffff
04e4 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
04e5 e004       |    |		Load	0x0,0x4								; Debug Table 0x1f.0x1 = 0x4e5,0xfffe
04e6 0337       | 7  |		Declare_Variable	Array
04e7 029f 059b  |    |		Declare_Subprogram	INIT_0598,For_Call
04e9			BODY_04e0:
04e9 e001       |    |		Load	0x0,0x1								; Debug Table 0x1f.0x2 = 0x4e9,0x1
04ea 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
04eb e5ff       |    |		Load	0x2,-0x1
04ec e20f       |    |		Load	0x1,0xf
04ed 0119       |    |		Execute	Any,Check_In_Formal_Type
04ee 8215       |    |		Call	0x1,0x15
04ef 005b       | [  |		Store_Top	Discrete,At_Offset_3
04f0 8404       |    |		Call	0x2,0x4								; Debug Table 0x1f.0x3 = 0x4f0,0x2
04f1 4831       |H1  |		Short_Literal	0x31
04f2 0257       | W  |		Execute	Discrete,Raise
04f3			TRAP_04e0:
04f3 010e       |    |		Execute	Exception,Is_Constraint_Error
04f4 7002       |p   |		Jump_Nonzero	0x4f7
04f5 010d       |    |		Execute	Exception,Is_Numeric_Error
04f6 6803       |h   |		Jump_Zero	0x4fa
04f7 e001       |    |		Load	0x0,0x1								; Debug Table 0x1f.0x4 = 0x4f7,0x3
04f8 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04f9 0257       | W  |		Execute	Discrete,Raise
04fa 0100       |    |		Execute	Exception,Raise
04fb 0000 0000  |    |		.BLANK	0000[0x5]
0500 ; --------------------------------------------------------------------------------------
0500 ; SUBPROGRAM
0500 ; --------------------------------------------------------------------------------------
0500 050e       |    |		.CONST	0x050e								; Address of begin
0501 0541       | A  |		.CONST	0x0541								; Address of exception handler
0502 0004       |    |		.CONST	0x0004								; Number of locals
0503			INIT_0500:
0503 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x20 = .DEBUG	0x0503,0x09dc,0x1001,0x0000,0x0035,0x1884,0x0000,0x0221
													; Debug Table 0x20.0x0 = 0x503,0xffff
0504 e001       |    |		Load	0x0,0x1
0505 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0506 03f1       |    |		Declare_Variable	Discrete,With_Value
0507 4801       |H   |		Short_Literal	0x1							; Debug Table 0x20.0x1 = 0x507,0xfffe
0508 e5fd       |    |		Load	0x2,-0x3
0509 e001       |    |		Load	0x0,0x1
050a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
050b 0334       | 4  |		Declare_Variable	Array,With_Constraint
050c e001       |    |		Load	0x0,0x1								; Debug Table 0x20.0x2 = 0x50c,0xfffd
050d 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
050e			BODY_0500:
050e e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x20.0x3 = 0x50e,0x1
050f 0d01       |    |		Execute_Immediate	Less,0x1
0510 6806       |h   |		Jump_Zero	0x517
0511 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x20.0x4 = 0x511,0x2
0512 6803       |h   |		Jump_Zero	0x516
0513 e001       |    |		Load	0x0,0x1								; Debug Table 0x20.0x5 = 0x513,0x3
0514 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0515 0257       | W  |		Execute	Discrete,Raise
0516 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0517 00cf       |    |		Action	Mark_Auxiliary
0518 4802       |H   |		Short_Literal	0x2							; Debug Table 0x20.0x6 = 0x518,0x4
0519 00db       |    |		Load_Top	At_Offset_3
051a 01dc       |    |		Execute	Vector,Last
051b 0264       | d  |		Execute	Discrete,Below_Bound
051c 7012       |p   |		Jump_Nonzero	0x52f
051d e402       |    |		Load	0x2,0x2								; Debug Table 0x20.0x7 = 0x51d,0x5
051e 48ff       |H   |		Short_Literal	0xff
051f 0279       | y  |		Execute	Discrete,And
0520 a404       |    |		Store_Unchecked	0x2,0x4
0521 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x20.0x8 = 0x521,0x6
0522 e006       |    |		Load	0x0,0x6
0523 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0524 025b       | [  |		Execute	Discrete,Check_In_Type
0525 00d9       |    |		Load_Top	At_Offset_1
0526 e403       |    |		Load	0x2,0x3
0527 01d6       |    |		Execute	Vector,Field_Write
0528 e402       |    |		Load	0x2,0x2								; Debug Table 0x20.0x9 = 0x528,0x7
0529 e404       |    |		Load	0x2,0x4
052a 0272       | r  |		Execute	Discrete,Minus
052b 09f8       |    |		Execute_Immediate	Binary_Scale,-0x8
052c a402       |    |		Store_Unchecked	0x2,0x2
052d 00c8       |    |		Action	Pop_Auxiliary_Range
052e 37ee       |7   |		Loop_Decreasing	0x51d
052f 00ce       |    |		Action	Pop_Auxiliary
0530 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x20.0xa = 0x530,0x8
0531 e002       |    |		Load	0x0,0x2
0532 025b       | [  |		Execute	Discrete,Check_In_Type
0533 48ff       |H   |		Short_Literal	0xff
0534 0279       | y  |		Execute	Discrete,And
0535 e006       |    |		Load	0x0,0x6
0536 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0537 025b       | [  |		Execute	Discrete,Check_In_Type
0538 4801       |H   |		Short_Literal	0x1
0539 00db       |    |		Load_Top	At_Offset_3
053a 01d6       |    |		Execute	Vector,Field_Write
053b 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x20.0xb = 0x53b,0x9
053c e5ff       |    |		Load	0x2,-0x1
053d e20f       |    |		Load	0x1,0xf
053e 0119       |    |		Execute	Any,Check_In_Formal_Type
053f 8210       |    |		Call	0x1,0x10
0540 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0541			TRAP_0500:
0541 010e       |    |		Execute	Exception,Is_Constraint_Error
0542 7002       |p   |		Jump_Nonzero	0x545
0543 010d       |    |		Execute	Exception,Is_Numeric_Error
0544 6803       |h   |		Jump_Zero	0x548
0545 e001       |    |		Load	0x0,0x1								; Debug Table 0x20.0xc = 0x545,0xa
0546 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0547 0257       | W  |		Execute	Discrete,Raise
0548 0100       |    |		Execute	Exception,Raise
0549 0000 0000  |    |		.BLANK	0000[0x7]
0550 ; --------------------------------------------------------------------------------------
0550 ; SUBPROGRAM
0550 ; --------------------------------------------------------------------------------------
0550 055a       | Z  |		.CONST	0x055a								; Address of begin
0551 058a       |    |		.CONST	0x058a								; Address of exception handler
0552 0003       |    |		.CONST	0x0003								; Number of locals
0553			INIT_0550:
0553 4801       |H   |		Short_Literal	0x1							; Debug Table 0x21 = .DEBUG	0x0553,0x09f8,0x1001,0x0000,0x0035,0x1884,0x0000,0x02ad
													; Debug Table 0x21.0x0 = 0x553,0xffff
0554 e5fe       |    |		Load	0x2,-0x2
0555 e001       |    |		Load	0x0,0x1
0556 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0557 0334       | 4  |		Declare_Variable	Array,With_Constraint
0558 e001       |    |		Load	0x0,0x1								; Debug Table 0x21.0x1 = 0x558,0xfffe
0559 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
055a			BODY_0550:
055a e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x21.0x2 = 0x55a,0x1
055b 0d01       |    |		Execute_Immediate	Less,0x1
055c 6803       |h   |		Jump_Zero	0x560
055d 4800       |H   |		Short_Literal	0x0							; Debug Table 0x21.0x3 = 0x55d,0x2
055e a5fd       |    |		Store_Unchecked	0x2,-0x3
055f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0560 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x21.0x4 = 0x560,0x3
0561 e5ff       |    |		Load	0x2,-0x1
0562 e20f       |    |		Load	0x1,0xf
0563 0119       |    |		Execute	Any,Check_In_Formal_Type
0564 8211       |    |		Call	0x1,0x11
0565 00d1       |    |		Pop_Control	Pop_Count_1
0566 4801       |H   |		Short_Literal	0x1							; Debug Table 0x21.0x5 = 0x566,0x4
0567 00da       |    |		Load_Top	At_Offset_2
0568 01d7       |    |		Execute	Vector,Field_Read
0569 e001       |    |		Load	0x0,0x1
056a 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
056b 025b       | [  |		Execute	Discrete,Check_In_Type
056c 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
056d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x21.0x6 = 0x56d,0x5
056e 0c80       |    |		Execute_Immediate	Greater_Equal,-0x80
056f 6804       |h   |		Jump_Zero	0x574
0570 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x21.0x7 = 0x570,0x6
0571 4f00       |O   |		Short_Literal	-0x100
0572 0273       | s  |		Execute	Discrete,Plus
0573 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0574 00cf       |    |		Action	Mark_Auxiliary
0575 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x21.0x8 = 0x575,0x7
0576 01dc       |    |		Execute	Vector,Last
0577 4802       |H   |		Short_Literal	0x2
0578 0263       | c  |		Execute	Discrete,Above_Bound
0579 700c       |p   |		Jump_Nonzero	0x586
057a 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x21.0x9 = 0x57a,0x8
057b 0908       |    |		Execute_Immediate	Binary_Scale,0x8
057c 00d9       |    |		Load_Top	At_Offset_1
057d e402       |    |		Load	0x2,0x2
057e 01d7       |    |		Execute	Vector,Field_Read
057f e001       |    |		Load	0x0,0x1
0580 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0581 025b       | [  |		Execute	Discrete,Check_In_Type
0582 0273       | s  |		Execute	Discrete,Plus
0583 a403       |    |		Store_Unchecked	0x2,0x3
0584 00c8       |    |		Action	Pop_Auxiliary_Range
0585 3ff4       |?   |		Loop_Increasing	0x57a
0586 00ce       |    |		Action	Pop_Auxiliary
0587 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x21.0xa = 0x587,0x9
0588 a5fd       |    |		Store_Unchecked	0x2,-0x3
0589 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
058a			TRAP_0550:
058a 010e       |    |		Execute	Exception,Is_Constraint_Error
058b 7002       |p   |		Jump_Nonzero	0x58e
058c 010d       |    |		Execute	Exception,Is_Numeric_Error
058d 6803       |h   |		Jump_Zero	0x591
058e e001       |    |		Load	0x0,0x1								; Debug Table 0x21.0xb = 0x58e,0xa
058f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0590 0257       | W  |		Execute	Discrete,Raise
0591 0100       |    |		Execute	Exception,Raise
0592 0000 0000  |    |		.BLANK	0000[0x6]
0598 ; --------------------------------------------------------------------------------------
0598 ; SUBPROGRAM
0598 ; --------------------------------------------------------------------------------------
0598 05a0       |    |		.CONST	0x05a0								; Address of begin
0599 0004       |    |		.CONST	0x0004								; Address of exception handler
059a 0002       |    |		.CONST	0x0002								; Number of locals
059b			INIT_0598:
059b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x22 = .DEBUG	0x059b,0x0a12,0x1004,0x0000,0x0035,0x1884,0x0000,0x0704
													; Debug Table 0x22.0x0 = 0x59b,0xffff
059c e402       |    |		Load	0x2,0x2
059d e001       |    |		Load	0x0,0x1
059e 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
059f 0334       | 4  |		Declare_Variable	Array,With_Constraint
05a0			BODY_0598:
05a0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x22.0x1 = 0x5a0,0x1
05a1 e5ff       |    |		Load	0x2,-0x1
05a2 e20f       |    |		Load	0x1,0xf
05a3 0119       |    |		Execute	Any,Check_In_Formal_Type
05a4 8211       |    |		Call	0x1,0x11
05a5 00d1       |    |		Pop_Control	Pop_Count_1
05a6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x22.0x2 = 0x5a6,0x2
05a7 01db       |    |		Execute	Vector,Length
05a8 4801       |H   |		Short_Literal	0x1
05a9 0279       | y  |		Execute	Discrete,And
05aa 6806       |h   |		Jump_Zero	0x5b1
05ab e403       |    |		Load	0x2,0x3								; Debug Table 0x22.0x3 = 0x5ab,0x3
05ac e5ff       |    |		Load	0x2,-0x1
05ad e20f       |    |		Load	0x1,0xf
05ae 0119       |    |		Execute	Any,Check_In_Formal_Type
05af 8211       |    |		Call	0x1,0x11
05b0 00d1       |    |		Pop_Control	Pop_Count_1
05b1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x22.0x4 = 0x5b1,0x4
05b2 00cb       |    |		Action	Pop_Block_With_Result
05b3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05b4 0000 0000  |    |		.BLANK	0000[0x4]
05b8 05c4 0004  |    |		.XXX[0x3]
05ba 0017       |    |
05bb 029a 05cb  |    |		Declare_Subprogram	INIT_05c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x23 = .DEBUG	0x05bb,0x0a1e,0x4000,0x0000,0x0035,0x1874,0x0000,0x02de
													; Debug Table 0x23.0x0 = 0x5bb,0xffff
05bd 029a 05f3  |    |		Declare_Subprogram	INIT_05f0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x23.0x1 = 0x5bd,0xfffe
05bf 00bf       |    |		Action	Accept_Activation
05c0 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x24 = .DEBUG	0x05c0,0x0a24,0x4000,0x0000,0x0035,0x1884,0x0000,0x0856
													; Debug Table 0x24.0x0 = 0x5c0,0xffff
05c1 00c7       |    |		Action	Elaborate_Subprogram
05c2 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x24.0x1 = 0x5c2,0xfffe
05c3 00c7       |    |		Action	Elaborate_Subprogram
05c4 00bc       |    |		Action	Signal_Activated
05c5 00bb       |    |		Action	Signal_Completion
05c6 0000 0000  |    |		.XXX[0x2]
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05cb       |    |		.CONST	0x05cb								; Address of begin
05c9 05e8       |    |		.CONST	0x05e8								; Address of exception handler
05ca 0001       |    |		.CONST	0x0001								; Number of locals
05cb			BODY_05c8:
05cb			INIT_05c8:
05cb 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x25 = .DEBUG	0x05cb,0x0a2a,0x1001,0x0000,0x0035,0x1874,0x0000,0x0325
													; Debug Table 0x25.0x0 = 0x5cb,0x1
05cc 01db       |    |		Execute	Vector,Length
05cd e001       |    |		Load	0x0,0x1
05ce 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
05cf 025b       | [  |		Execute	Discrete,Check_In_Type
05d0 00db       |    |		Load_Top	At_Offset_3
05d1 e002       |    |		Load	0x0,0x2
05d2 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
05d3 0119       |    |		Execute	Any,Check_In_Formal_Type
05d4 e002       |    |		Load	0x0,0x2
05d5 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
05d6 00cf       |    |		Action	Mark_Auxiliary
05d7 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x25.0x1 = 0x5d7,0x2
05d8 01d9       |    |		Execute	Vector,Reverse_Bounds
05d9 0263       | c  |		Execute	Discrete,Above_Bound
05da 700c       |p   |		Jump_Nonzero	0x5e7
05db 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x25.0x2 = 0x5db,0x3
05dc e5fe       |    |		Load	0x2,-0x2
05dd 01d7       |    |		Execute	Vector,Field_Read
05de e20f       |    |		Load	0x1,0xf
05df 0119       |    |		Execute	Any,Check_In_Formal_Type
05e0 e5ff       |    |		Load	0x2,-0x1
05e1 e002       |    |		Load	0x0,0x2
05e2 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
05e3 0119       |    |		Execute	Any,Check_In_Formal_Type
05e4 8210       |    |		Call	0x1,0x10
05e5 00c8       |    |		Action	Pop_Auxiliary_Range
05e6 3ff4       |?   |		Loop_Increasing	0x5db
05e7 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05e8			TRAP_05c8:
05e8 010e       |    |		Execute	Exception,Is_Constraint_Error
05e9 7002       |p   |		Jump_Nonzero	0x5ec
05ea 010d       |    |		Execute	Exception,Is_Numeric_Error
05eb 6803       |h   |		Jump_Zero	0x5ef
05ec e001       |    |		Load	0x0,0x1								; Debug Table 0x25.0x3 = 0x5ec,0x4
05ed 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05ee 0257       | W  |		Execute	Discrete,Raise
05ef 0100       |    |		Execute	Exception,Raise
05f0 ; --------------------------------------------------------------------------------------
05f0 ; SUBPROGRAM
05f0 ; --------------------------------------------------------------------------------------
05f0 05f7       |    |		.CONST	0x05f7								; Address of begin
05f1 0603       |    |		.CONST	0x0603								; Address of exception handler
05f2 0003       |    |		.CONST	0x0003								; Number of locals
05f3			INIT_05f0:
05f3 e001       |    |		Load	0x0,0x1								; Debug Table 0x26 = .DEBUG	0x05f3,0x0a34,0x1002,0x0000,0x0035,0x1874,0x0000,0x0331
													; Debug Table 0x26.0x0 = 0x5f3,0xffff
05f4 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
05f5 029f 0613  |    |		Declare_Subprogram	INIT_0610,For_Call
05f7			BODY_05f0:
05f7 e001       |    |		Load	0x0,0x1								; Debug Table 0x26.0x1 = 0x5f7,0x1
05f8 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
05f9 e5ff       |    |		Load	0x2,-0x1
05fa e002       |    |		Load	0x0,0x2
05fb 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
05fc 0119       |    |		Execute	Any,Check_In_Formal_Type
05fd e002       |    |		Load	0x0,0x2
05fe 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
05ff 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0600 8403       |    |		Call	0x2,0x3								; Debug Table 0x26.0x2 = 0x600,0x2
0601 4831       |H1  |		Short_Literal	0x31
0602 0257       | W  |		Execute	Discrete,Raise
0603			TRAP_05f0:
0603 010e       |    |		Execute	Exception,Is_Constraint_Error
0604 7002       |p   |		Jump_Nonzero	0x607
0605 010d       |    |		Execute	Exception,Is_Numeric_Error
0606 6803       |h   |		Jump_Zero	0x60a
0607 e001       |    |		Load	0x0,0x1								; Debug Table 0x26.0x3 = 0x607,0x3
0608 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0609 0257       | W  |		Execute	Discrete,Raise
060a 0100       |    |		Execute	Exception,Raise
060b 0000 0000  |    |		.BLANK	0000[0x5]
0610 ; --------------------------------------------------------------------------------------
0610 ; SUBPROGRAM
0610 ; --------------------------------------------------------------------------------------
0610 0626       | &  |		.CONST	0x0626								; Address of begin
0611 0004       |    |		.CONST	0x0004								; Address of exception handler
0612 0002       |    |		.CONST	0x0002								; Number of locals
0613			INIT_0610:
0613 e212       |    |		Load	0x1,0x12							; Debug Table 0x27 = .DEBUG	0x0613,0x0a3e,0x1004,0x0000,0x0035,0x1884,0x0000,0x08d5
													; Debug Table 0x27.0x0 = 0x613,0xffff
0614 026a       | j  |		Execute	Discrete,First
0615 e212       |    |		Load	0x1,0x12
0616 026a       | j  |		Execute	Discrete,First
0617 e402       |    |		Load	0x2,0x2
0618 0273       | s  |		Execute	Discrete,Plus
0619 0aff       |    |		Execute_Immediate	Plus,-0x1
061a 00d8       |    |		Load_Top	At_Offset_0
061b e212       |    |		Load	0x1,0x12
061c 0122       | "  |		Execute	Any,Make_Root_Type
061d 0260       | `  |		Execute	Discrete,In_Type
061e 7002       |p   |		Jump_Nonzero	0x621
061f 48e0       |H   |		Short_Literal	0xe0
0620 0257       | W  |		Execute	Discrete,Raise
0621 e215       |    |		Load	0x1,0x15
0622 035b       | [  |		Declare_Type	Array,Constrained
0623 0337       | 7  |		Declare_Variable	Array
0624 00d8       |    |		Load_Top	At_Offset_0
0625 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0626			BODY_0610:
0626 00cf       |    |		Action	Mark_Auxiliary
0627 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x27.0x1 = 0x627,0x1
0628 01d9       |    |		Execute	Vector,Reverse_Bounds
0629 0263       | c  |		Execute	Discrete,Above_Bound
062a 701d       |p   |		Jump_Nonzero	0x648
062b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x27.0x2 = 0x62b,0x2
062c 00d9       |    |		Load_Top	At_Offset_1
062d 00d8       |    |		Load_Top	At_Offset_0
062e 00da       |    |		Load_Top	At_Offset_2
062f 01d7       |    |		Execute	Vector,Field_Read
0630 0120       |    |		Execute	Any,Is_Value
0631 6806       |h   |		Jump_Zero	0x638
0632 e20f       |    |		Load	0x1,0xf
0633 00d9       |    |		Load_Top	At_Offset_1
0634 00db       |    |		Load_Top	At_Offset_3
0635 01d7       |    |		Execute	Vector,Field_Read
0636 00d1       |    |		Pop_Control	Pop_Count_1
0637 7805       |x   |		Jump	0x63d
0638 00d8       |    |		Load_Top	At_Offset_0
0639 00da       |    |		Load_Top	At_Offset_2
063a 01d7       |    |		Execute	Vector,Field_Read
063b e20f       |    |		Load	0x1,0xf
063c 0119       |    |		Execute	Any,Check_In_Formal_Type
063d e5ff       |    |		Load	0x2,-0x1
063e e002       |    |		Load	0x0,0x2
063f 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0640 0119       |    |		Execute	Any,Check_In_Formal_Type
0641 8211       |    |		Call	0x1,0x11
0642 00d9       |    |		Load_Top	At_Offset_1
0643 00db       |    |		Load_Top	At_Offset_3
0644 01d6       |    |		Execute	Vector,Field_Write
0645 00d2       |    |		Pop_Control	Pop_Count_2
0646 00c8       |    |		Action	Pop_Auxiliary_Range
0647 3fe3       |?   |		Loop_Increasing	0x62b
0648 00ce       |    |		Action	Pop_Auxiliary
0649 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x27.0x3 = 0x649,0x3
064a e215       |    |		Load	0x1,0x15
064b 01c6       |    |		Execute	Vector,Convert_To_Formal
064c 00cb       |    |		Action	Pop_Block_With_Result
064d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
064e 0000 0000  |    |		.XXX[0x5]
0650 065c 0004  | \  |
0652 0011       |    |
0653 029a 0663  |   c|		Declare_Subprogram	INIT_0660,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x28 = .DEBUG	0x0653,0x0a48,0x4000,0x0000,0x0035,0x1874,0x0000,0x02bc
													; Debug Table 0x28.0x0 = 0x653,0xffff
0655 029a 067b  |   {|		Declare_Subprogram	INIT_0678,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x28.0x1 = 0x655,0xfffe
0657 00bf       |    |		Action	Accept_Activation
0658 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x29 = .DEBUG	0x0658,0x0a4e,0x4000,0x0000,0x0035,0x1884,0x0000,0x07f5
													; Debug Table 0x29.0x0 = 0x658,0xffff
0659 00c7       |    |		Action	Elaborate_Subprogram
065a 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x29.0x1 = 0x65a,0xfffe
065b 00c7       |    |		Action	Elaborate_Subprogram
065c 00bc       |    |		Action	Signal_Activated
065d 00bb       |    |		Action	Signal_Completion
065e 0000 0000  |    |		.XXX[0x2]
0660 ; --------------------------------------------------------------------------------------
0660 ; SUBPROGRAM
0660 ; --------------------------------------------------------------------------------------
0660 0663       | c  |		.CONST	0x0663								; Address of begin
0661 066e       | n  |		.CONST	0x066e								; Address of exception handler
0662 0001       |    |		.CONST	0x0001								; Number of locals
0663			BODY_0660:
0663			INIT_0660:
0663 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2a = .DEBUG	0x0663,0x0a54,0x1001,0x0000,0x0035,0x1874,0x0000,0x02c2
													; Debug Table 0x2a.0x0 = 0x663,0x1
0664 e001       |    |		Load	0x0,0x1
0665 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0666 025b       | [  |		Execute	Discrete,Check_In_Type
0667 00db       |    |		Load_Top	At_Offset_3
0668 e002       |    |		Load	0x0,0x2
0669 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
066a 0119       |    |		Execute	Any,Check_In_Formal_Type
066b e002       |    |		Load	0x0,0x2
066c 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
066d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
066e			TRAP_0660:
066e 010e       |    |		Execute	Exception,Is_Constraint_Error
066f 7002       |p   |		Jump_Nonzero	0x672
0670 010d       |    |		Execute	Exception,Is_Numeric_Error
0671 6803       |h   |		Jump_Zero	0x675
0672 e001       |    |		Load	0x0,0x1								; Debug Table 0x2a.0x1 = 0x672,0x2
0673 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0674 0257       | W  |		Execute	Discrete,Raise
0675 0100       |    |		Execute	Exception,Raise
0676 0000 0000  |    |		.XXX[0x2]
0678 ; --------------------------------------------------------------------------------------
0678 ; SUBPROGRAM
0678 ; --------------------------------------------------------------------------------------
0678 067d       | }  |		.CONST	0x067d								; Address of begin
0679 0690       |    |		.CONST	0x0690								; Address of exception handler
067a 0002       |    |		.CONST	0x0002								; Number of locals
067b			INIT_0678:
067b e001       |    |		Load	0x0,0x1								; Debug Table 0x2b = .DEBUG	0x067b,0x0a5a,0x1001,0x0000,0x0035,0x1874,0x0000,0x02ce
													; Debug Table 0x2b.0x0 = 0x67b,0xffff
067c 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
067d			BODY_0678:
067d e001       |    |		Load	0x0,0x1								; Debug Table 0x2b.0x1 = 0x67d,0x1
067e 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
067f e5ff       |    |		Load	0x2,-0x1
0680 e002       |    |		Load	0x0,0x2
0681 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0682 0119       |    |		Execute	Any,Check_In_Formal_Type
0683 e002       |    |		Load	0x0,0x2
0684 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0685 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0686 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2b.0x2 = 0x686,0x2
0687 00d8       |    |		Load_Top	At_Offset_0
0688 e20f       |    |		Load	0x1,0xf
0689 0122       | "  |		Execute	Any,Make_Root_Type
068a 0260       | `  |		Execute	Discrete,In_Type
068b 7002       |p   |		Jump_Nonzero	0x68e
068c 48e0       |H   |		Short_Literal	0xe0
068d 0257       | W  |		Execute	Discrete,Raise
068e c5fe       |    |		Store	0x2,-0x2
068f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0690			TRAP_0678:
0690 010e       |    |		Execute	Exception,Is_Constraint_Error
0691 7002       |p   |		Jump_Nonzero	0x694
0692 010d       |    |		Execute	Exception,Is_Numeric_Error
0693 6803       |h   |		Jump_Zero	0x697
0694 e001       |    |		Load	0x0,0x1								; Debug Table 0x2b.0x3 = 0x694,0x3
0695 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0696 0257       | W  |		Execute	Discrete,Raise
0697 0100       |    |		Execute	Exception,Raise
0698 ; --------------------------------------------------------------------------------------
0698 ; Debug Table
0698 ; --------------------------------------------------------------------------------------
0698 0003 002c  |   ,|		.CONST	0x0003,0x002c
069a 000b 07fa  |    |		.DEBUG	0x000b,0x07fa,0x8000,0x0000,0x0035,0x1874,0x0000,0x0009
06a2 0068 0834  | h 4|		.DEBUG	0x0068,0x0834,0x8000,0x0000,0x0035,0x1884,0x0000,0x0005
06aa 00bb 0852  |   R|		.DEBUG	0x00bb,0x0852,0x0002,0x0000,0x0035,0x1874,0x0000,0x00f0
06b2 011b 0874  |   t|		.DEBUG	0x011b,0x0874,0x0002,0x0000,0x0035,0x1874,0x0000,0x00fd
06ba 013b 0880  | ;  |		.DEBUG	0x013b,0x0880,0x0002,0x0000,0x0035,0x1874,0x0000,0x0140
06c2 016b 088e  | k  |		.DEBUG	0x016b,0x088e,0x0002,0x0000,0x0035,0x1874,0x0000,0x014d
06ca 01b3 0894  |    |		.DEBUG	0x01b3,0x0894,0x4000,0x0000,0x0035,0x1874,0x0000,0x015a
06d2 01ec 08ca  |    |		.DEBUG	0x01ec,0x08ca,0x4000,0x0000,0x0035,0x1884,0x0000,0x0220
06da 023b 0904  | ;  |		.DEBUG	0x023b,0x0904,0x1001,0x0000,0x0035,0x1874,0x0000,0x017a
06e2 024b 0908  | K  |		.DEBUG	0x024b,0x0908,0x1001,0x0000,0x0035,0x1874,0x0000,0x0188
06ea 025b 090c  | [  |		.DEBUG	0x025b,0x090c,0x1001,0x0000,0x0035,0x1874,0x0000,0x0196
06f2 026b 0910  | k  |		.DEBUG	0x026b,0x0910,0x1001,0x0000,0x0035,0x1874,0x0000,0x01a4
06fa 027b 0914  | {  |		.DEBUG	0x027b,0x0914,0x1001,0x0000,0x0035,0x1874,0x0000,0x01b2
0702 02bb 0930  |   0|		.DEBUG	0x02bb,0x0930,0x1001,0x0000,0x0035,0x1874,0x0000,0x01c0
070a 02eb 0940  |   @|		.DEBUG	0x02eb,0x0940,0x1001,0x0000,0x0035,0x1874,0x0000,0x01ce
0712 0303 0946  |   F|		.DEBUG	0x0303,0x0946,0x1001,0x0000,0x0035,0x1874,0x0000,0x01dc
071a 0323 0950  | # P|		.DEBUG	0x0323,0x0950,0x1001,0x0000,0x0035,0x1874,0x0000,0x01ea
0722 033b 0956  | ; V|		.DEBUG	0x033b,0x0956,0x1001,0x0000,0x0035,0x1874,0x0000,0x01f8
072a 035b 0960  | [ `|		.DEBUG	0x035b,0x0960,0x1001,0x0000,0x0035,0x1874,0x0000,0x0206
0732 037b 096a  | { j|		.DEBUG	0x037b,0x096a,0x1001,0x0000,0x0035,0x1874,0x0000,0x0214
073a 03a3 0974  |   t|		.DEBUG	0x03a3,0x0974,0x1001,0x0000,0x0035,0x1874,0x0000,0x0222
0742 03b3 097a  |   z|		.DEBUG	0x03b3,0x097a,0x1001,0x0000,0x0035,0x1874,0x0000,0x0230
074a 03cb 0980  |    |		.DEBUG	0x03cb,0x0980,0x1001,0x0000,0x0035,0x1874,0x0000,0x023e
0752 03e3 0988  |    |		.DEBUG	0x03e3,0x0988,0x1001,0x0000,0x0035,0x1874,0x0000,0x024c
075a 03f3 0990  |    |		.DEBUG	0x03f3,0x0990,0x1001,0x0000,0x0035,0x1874,0x0000,0x025a
0762 0403 0994  |    |		.DEBUG	0x0403,0x0994,0x1001,0x0000,0x0035,0x1874,0x0000,0x0266
076a 041b 099a  |    |		.DEBUG	0x041b,0x099a,0x1001,0x0000,0x0035,0x1874,0x0000,0x0272
0772 043b 09a0  | ;  |		.DEBUG	0x043b,0x09a0,0x1001,0x0000,0x0035,0x1874,0x0000,0x0280
077a 045b 09aa  | [  |		.DEBUG	0x045b,0x09aa,0x1001,0x0000,0x0035,0x1874,0x0000,0x028e
0782 048b 09b6  |    |		.DEBUG	0x048b,0x09b6,0x1002,0x0000,0x0035,0x1874,0x0000,0x029c
078a 04bb 09c4  |    |		.DEBUG	0x04bb,0x09c4,0x1001,0x0000,0x0035,0x1874,0x0000,0x02a7
0792 04e3 09d0  |    |		.DEBUG	0x04e3,0x09d0,0x1002,0x0000,0x0035,0x1874,0x0000,0x02b3
079a 0503 09dc  |    |		.DEBUG	0x0503,0x09dc,0x1001,0x0000,0x0035,0x1884,0x0000,0x0221
07a2 0553 09f8  | S  |		.DEBUG	0x0553,0x09f8,0x1001,0x0000,0x0035,0x1884,0x0000,0x02ad
07aa 059b 0a12  |    |		.DEBUG	0x059b,0x0a12,0x1004,0x0000,0x0035,0x1884,0x0000,0x0704
07b2 05bb 0a1e  |    |		.DEBUG	0x05bb,0x0a1e,0x4000,0x0000,0x0035,0x1874,0x0000,0x02de
07ba 05c0 0a24  |   $|		.DEBUG	0x05c0,0x0a24,0x4000,0x0000,0x0035,0x1884,0x0000,0x0856
07c2 05cb 0a2a  |   *|		.DEBUG	0x05cb,0x0a2a,0x1001,0x0000,0x0035,0x1874,0x0000,0x0325
07ca 05f3 0a34  |   4|		.DEBUG	0x05f3,0x0a34,0x1002,0x0000,0x0035,0x1874,0x0000,0x0331
07d2 0613 0a3e  |   >|		.DEBUG	0x0613,0x0a3e,0x1004,0x0000,0x0035,0x1884,0x0000,0x08d5
07da 0653 0a48  | S H|		.DEBUG	0x0653,0x0a48,0x4000,0x0000,0x0035,0x1874,0x0000,0x02bc
07e2 0658 0a4e  | X N|		.DEBUG	0x0658,0x0a4e,0x4000,0x0000,0x0035,0x1884,0x0000,0x07f5
07ea 0663 0a54  | c T|		.DEBUG	0x0663,0x0a54,0x1001,0x0000,0x0035,0x1874,0x0000,0x02c2
07f2 067b 0a5a  | { Z|		.DEBUG	0x067b,0x0a5a,0x1001,0x0000,0x0035,0x1874,0x0000,0x02ce
07fa ; --------------------------------------------------------------------------------------
07fa ; Debug3 Subtable 0x0
07fa ; --------------------------------------------------------------------------------------
07fa 001c 0000  |    |		.DBG3TAB	0x001c,0x0000
07fc 000b ffff  |    |		.CONST	0x000b,0xffff
07fe 000c fffe  |    |		.CONST	0x000c,0xfffe
0800 000d fffd  |    |		.CONST	0x000d,0xfffd
0802 000f fffc  |    |		.CONST	0x000f,0xfffc
0804 0012 fffb  |    |		.CONST	0x0012,0xfffb
0806 0015 fffa  |    |		.CONST	0x0015,0xfffa
0808 0019 fff9  |    |		.CONST	0x0019,0xfff9
080a 001d fff8  |    |		.CONST	0x001d,0xfff8
080c 0021 fff7  | !  |		.CONST	0x0021,0xfff7
080e 0026 fff6  | &  |		.CONST	0x0026,0xfff6
0810 002a fff5  | *  |		.CONST	0x002a,0xfff5
0812 002e fff4  | .  |		.CONST	0x002e,0xfff4
0814 0031 fff3  | 1  |		.CONST	0x0031,0xfff3
0816 0035 fff2  | 5  |		.CONST	0x0035,0xfff2
0818 0039 fff1  | 9  |		.CONST	0x0039,0xfff1
081a 003c fff0  | <  |		.CONST	0x003c,0xfff0
081c 003f ffef  | ?  |		.CONST	0x003f,0xffef
081e 0043 ffee  | C  |		.CONST	0x0043,0xffee
0820 0048 ffed  | H  |		.CONST	0x0048,0xffed
0822 004a ffec  | J  |		.CONST	0x004a,0xffec
0824 004c ffeb  | L  |		.CONST	0x004c,0xffeb
0826 004e ffea  | N  |		.CONST	0x004e,0xffea
0828 0052 ffe9  | R  |		.CONST	0x0052,0xffe9
082a 0056 ffe8  | V  |		.CONST	0x0056,0xffe8
082c 0058 ffe7  | X  |		.CONST	0x0058,0xffe7
082e 005f ffe6  | _  |		.CONST	0x005f,0xffe6
0830 0061 ffe5  | a  |		.CONST	0x0061,0xffe5
0832 0063 ffe4  | c  |		.CONST	0x0063,0xffe4
0834 ; --------------------------------------------------------------------------------------
0834 ; Debug3 Subtable 0x1
0834 ; --------------------------------------------------------------------------------------
0834 000e 0000  |    |		.DBG3TAB	0x000e,0x0000
0836 0068 ffff  | h  |		.CONST	0x0068,0xffff
0838 006c fffe  | l  |		.CONST	0x006c,0xfffe
083a 0079 fffd  | y  |		.CONST	0x0079,0xfffd
083c 007a fffc  | z  |		.CONST	0x007a,0xfffc
083e 007e fffb  | ~  |		.CONST	0x007e,0xfffb
0840 0082 fffa  |    |		.CONST	0x0082,0xfffa
0842 0087 fff9  |    |		.CONST	0x0087,0xfff9
0844 008f fff8  |    |		.CONST	0x008f,0xfff8
0846 0093 fff7  |    |		.CONST	0x0093,0xfff7
0848 009e fff6  |    |		.CONST	0x009e,0xfff6
084a 00a0 fff5  |    |		.CONST	0x00a0,0xfff5
084c 00a2 fff4  |    |		.CONST	0x00a2,0xfff4
084e 00a4 fff3  |    |		.CONST	0x00a4,0xfff3
0850 00a6 fff2  |    |		.CONST	0x00a6,0xfff2
0852 ; --------------------------------------------------------------------------------------
0852 ; Debug3 Subtable 0x2
0852 ; --------------------------------------------------------------------------------------
0852 0003 000d  |    |		.DBG3TAB	0x0003,0x000d
0854 00bb ffff  |    |		.CONST	0x00bb,0xffff
0856 00bd fffe  |    |		.CONST	0x00bd,0xfffe
0858 00be fffd  |    |		.CONST	0x00be,0xfffd
085a 00bf 0001  |    |		.CONST	0x00bf,0x0001
085c 00cc 0002  |    |		.CONST	0x00cc,0x0002
085e 00d1 0003  |    |		.CONST	0x00d1,0x0003
0860 00d5 0004  |    |		.CONST	0x00d5,0x0004
0862 00d8 0005  |    |		.CONST	0x00d8,0x0005
0864 00dd 0006  |    |		.CONST	0x00dd,0x0006
0866 00e3 0007  |    |		.CONST	0x00e3,0x0007
0868 00e9 0008  |    |		.CONST	0x00e9,0x0008
086a 00fa 0009  |    |		.CONST	0x00fa,0x0009
086c 00fe 000a  |    |		.CONST	0x00fe,0x000a
086e 0101 000b  |    |		.CONST	0x0101,0x000b
0870 0103 000c  |    |		.CONST	0x0103,0x000c
0872 0112 000d  |    |		.CONST	0x0112,0x000d
0874 ; --------------------------------------------------------------------------------------
0874 ; Debug3 Subtable 0x3
0874 ; --------------------------------------------------------------------------------------
0874 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0876 011b ffff  |    |		.CONST	0x011b,0xffff
0878 011c 0001  |    |		.CONST	0x011c,0x0001
087a 0125 0002  | %  |		.CONST	0x0125,0x0002
087c 012b 0003  | +  |		.CONST	0x012b,0x0003
087e 0135 0004  | 5  |		.CONST	0x0135,0x0004
0880 ; --------------------------------------------------------------------------------------
0880 ; Debug3 Subtable 0x4
0880 ; --------------------------------------------------------------------------------------
0880 0002 0004  |    |		.DBG3TAB	0x0002,0x0004
0882 013b ffff  | ;  |		.CONST	0x013b,0xffff
0884 013d fffe  | =  |		.CONST	0x013d,0xfffe
0886 013f 0001  | ?  |		.CONST	0x013f,0x0001
0888 0157 0002  | W  |		.CONST	0x0157,0x0002
088a 015b 0003  | [  |		.CONST	0x015b,0x0003
088c 0161 0004  | a  |		.CONST	0x0161,0x0004
088e ; --------------------------------------------------------------------------------------
088e ; Debug3 Subtable 0x5
088e ; --------------------------------------------------------------------------------------
088e 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0890 016b 0001  | k  |		.CONST	0x016b,0x0001
0892 0181 0002  |    |		.CONST	0x0181,0x0002
0894 ; --------------------------------------------------------------------------------------
0894 ; Debug3 Subtable 0x6
0894 ; --------------------------------------------------------------------------------------
0894 001a 0000  |    |		.DBG3TAB	0x001a,0x0000
0896 01b3 ffff  |    |		.CONST	0x01b3,0xffff
0898 01b5 fffe  |    |		.CONST	0x01b5,0xfffe
089a 01b7 fffd  |    |		.CONST	0x01b7,0xfffd
089c 01b9 fffc  |    |		.CONST	0x01b9,0xfffc
089e 01bb fffb  |    |		.CONST	0x01bb,0xfffb
08a0 01bd fffa  |    |		.CONST	0x01bd,0xfffa
08a2 01bf fff9  |    |		.CONST	0x01bf,0xfff9
08a4 01c1 fff8  |    |		.CONST	0x01c1,0xfff8
08a6 01c3 fff7  |    |		.CONST	0x01c3,0xfff7
08a8 01c5 fff6  |    |		.CONST	0x01c5,0xfff6
08aa 01c7 fff5  |    |		.CONST	0x01c7,0xfff5
08ac 01c9 fff4  |    |		.CONST	0x01c9,0xfff4
08ae 01cb fff3  |    |		.CONST	0x01cb,0xfff3
08b0 01cd fff2  |    |		.CONST	0x01cd,0xfff2
08b2 01cf fff1  |    |		.CONST	0x01cf,0xfff1
08b4 01d1 fff0  |    |		.CONST	0x01d1,0xfff0
08b6 01d3 ffef  |    |		.CONST	0x01d3,0xffef
08b8 01d5 ffee  |    |		.CONST	0x01d5,0xffee
08ba 01d7 ffed  |    |		.CONST	0x01d7,0xffed
08bc 01d9 ffec  |    |		.CONST	0x01d9,0xffec
08be 01db ffeb  |    |		.CONST	0x01db,0xffeb
08c0 01dd ffea  |    |		.CONST	0x01dd,0xffea
08c2 01df ffe9  |    |		.CONST	0x01df,0xffe9
08c4 01e1 ffe8  |    |		.CONST	0x01e1,0xffe8
08c6 01e3 ffe7  |    |		.CONST	0x01e3,0xffe7
08c8 01e7 ffe6  |    |		.CONST	0x01e7,0xffe6
08ca ; --------------------------------------------------------------------------------------
08ca ; Debug3 Subtable 0x7
08ca ; --------------------------------------------------------------------------------------
08ca 001c 0000  |    |		.DBG3TAB	0x001c,0x0000
08cc 01ec ffff  |    |		.CONST	0x01ec,0xffff
08ce 01ee fffe  |    |		.CONST	0x01ee,0xfffe
08d0 01f0 fffd  |    |		.CONST	0x01f0,0xfffd
08d2 01f2 fffc  |    |		.CONST	0x01f2,0xfffc
08d4 01f4 fffb  |    |		.CONST	0x01f4,0xfffb
08d6 01f6 fffa  |    |		.CONST	0x01f6,0xfffa
08d8 01f8 fff9  |    |		.CONST	0x01f8,0xfff9
08da 01fa fff8  |    |		.CONST	0x01fa,0xfff8
08dc 01fc fff7  |    |		.CONST	0x01fc,0xfff7
08de 01fe fff6  |    |		.CONST	0x01fe,0xfff6
08e0 0200 fff5  |    |		.CONST	0x0200,0xfff5
08e2 0202 fff4  |    |		.CONST	0x0202,0xfff4
08e4 0204 fff3  |    |		.CONST	0x0204,0xfff3
08e6 0206 fff2  |    |		.CONST	0x0206,0xfff2
08e8 0208 fff1  |    |		.CONST	0x0208,0xfff1
08ea 020a fff0  |    |		.CONST	0x020a,0xfff0
08ec 020c ffef  |    |		.CONST	0x020c,0xffef
08ee 020e ffee  |    |		.CONST	0x020e,0xffee
08f0 0210 ffed  |    |		.CONST	0x0210,0xffed
08f2 0212 ffec  |    |		.CONST	0x0212,0xffec
08f4 0214 ffeb  |    |		.CONST	0x0214,0xffeb
08f6 0216 ffea  |    |		.CONST	0x0216,0xffea
08f8 0218 ffe9  |    |		.CONST	0x0218,0xffe9
08fa 021a ffe8  |    |		.CONST	0x021a,0xffe8
08fc 021c ffe7  |    |		.CONST	0x021c,0xffe7
08fe 021e ffe6  |    |		.CONST	0x021e,0xffe6
0900 0220 ffe5  |    |		.CONST	0x0220,0xffe5
0902 0228 ffe4  | (  |		.CONST	0x0228,0xffe4
0904 ; --------------------------------------------------------------------------------------
0904 ; Debug3 Subtable 0x8
0904 ; --------------------------------------------------------------------------------------
0904 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0906 023b 0001  | ;  |		.CONST	0x023b,0x0001
0908 ; --------------------------------------------------------------------------------------
0908 ; Debug3 Subtable 0x9
0908 ; --------------------------------------------------------------------------------------
0908 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
090a 024b 0001  | K  |		.CONST	0x024b,0x0001
090c ; --------------------------------------------------------------------------------------
090c ; Debug3 Subtable 0xa
090c ; --------------------------------------------------------------------------------------
090c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
090e 025b 0001  | [  |		.CONST	0x025b,0x0001
0910 ; --------------------------------------------------------------------------------------
0910 ; Debug3 Subtable 0xb
0910 ; --------------------------------------------------------------------------------------
0910 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0912 026b 0001  | k  |		.CONST	0x026b,0x0001
0914 ; --------------------------------------------------------------------------------------
0914 ; Debug3 Subtable 0xc
0914 ; --------------------------------------------------------------------------------------
0914 0002 000b  |    |		.DBG3TAB	0x0002,0x000b
0916 027b ffff  | {  |		.CONST	0x027b,0xffff
0918 027f fffe  |    |		.CONST	0x027f,0xfffe
091a 0281 0001  |    |		.CONST	0x0281,0x0001
091c 0283 0002  |    |		.CONST	0x0283,0x0002
091e 0286 0003  |    |		.CONST	0x0286,0x0003
0920 028a 0005  |    |		.CONST	0x028a,0x0005
0922 028d 0006  |    |		.CONST	0x028d,0x0006
0924 0291 0004  |    |		.CONST	0x0291,0x0004
0926 0296 0007  |    |		.CONST	0x0296,0x0007
0928 029b 0008  |    |		.CONST	0x029b,0x0008
092a 02a1 0009  |    |		.CONST	0x02a1,0x0009
092c 02a5 000a  |    |		.CONST	0x02a5,0x000a
092e 02af 000b  |    |		.CONST	0x02af,0x000b
0930 ; --------------------------------------------------------------------------------------
0930 ; Debug3 Subtable 0xd
0930 ; --------------------------------------------------------------------------------------
0930 0002 0005  |    |		.DBG3TAB	0x0002,0x0005
0932 02bb ffff  |    |		.CONST	0x02bb,0xffff
0934 02bd fffe  |    |		.CONST	0x02bd,0xfffe
0936 02bf 0001  |    |		.CONST	0x02bf,0x0001
0938 02c6 0002  |    |		.CONST	0x02c6,0x0002
093a 02ce 0003  |    |		.CONST	0x02ce,0x0003
093c 02d2 0004  |    |		.CONST	0x02d2,0x0004
093e 02dd 0005  |    |		.CONST	0x02dd,0x0005
0940 ; --------------------------------------------------------------------------------------
0940 ; Debug3 Subtable 0xe
0940 ; --------------------------------------------------------------------------------------
0940 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0942 02eb 0001  |    |		.CONST	0x02eb,0x0001
0944 02f7 0002  |    |		.CONST	0x02f7,0x0002
0946 ; --------------------------------------------------------------------------------------
0946 ; Debug3 Subtable 0xf
0946 ; --------------------------------------------------------------------------------------
0946 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
0948 0303 ffff  |    |		.CONST	0x0303,0xffff
094a 0306 0001  |    |		.CONST	0x0306,0x0001
094c 030c 0002  |    |		.CONST	0x030c,0x0002
094e 0315 0003  |    |		.CONST	0x0315,0x0003
0950 ; --------------------------------------------------------------------------------------
0950 ; Debug3 Subtable 0x10
0950 ; --------------------------------------------------------------------------------------
0950 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0952 0323 0001  | #  |		.CONST	0x0323,0x0001
0954 032f 0002  | /  |		.CONST	0x032f,0x0002
0956 ; --------------------------------------------------------------------------------------
0956 ; Debug3 Subtable 0x11
0956 ; --------------------------------------------------------------------------------------
0956 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
0958 033b ffff  | ;  |		.CONST	0x033b,0xffff
095a 033e 0001  | >  |		.CONST	0x033e,0x0001
095c 0344 0002  | D  |		.CONST	0x0344,0x0002
095e 034d 0003  | M  |		.CONST	0x034d,0x0003
0960 ; --------------------------------------------------------------------------------------
0960 ; Debug3 Subtable 0x12
0960 ; --------------------------------------------------------------------------------------
0960 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
0962 035b 0001  | [  |		.CONST	0x035b,0x0001
0964 0361 0002  | a  |		.CONST	0x0361,0x0002
0966 0367 0003  | g  |		.CONST	0x0367,0x0003
0968 036d 0004  | m  |		.CONST	0x036d,0x0004
096a ; --------------------------------------------------------------------------------------
096a ; Debug3 Subtable 0x13
096a ; --------------------------------------------------------------------------------------
096a 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
096c 037b 0001  | {  |		.CONST	0x037b,0x0001
096e 0383 0002  |    |		.CONST	0x0383,0x0002
0970 038b 0003  |    |		.CONST	0x038b,0x0003
0972 0393 0004  |    |		.CONST	0x0393,0x0004
0974 ; --------------------------------------------------------------------------------------
0974 ; Debug3 Subtable 0x14
0974 ; --------------------------------------------------------------------------------------
0974 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0976 03a3 0001  |    |		.CONST	0x03a3,0x0001
0978 03a9 0002  |    |		.CONST	0x03a9,0x0002
097a ; --------------------------------------------------------------------------------------
097a ; Debug3 Subtable 0x15
097a ; --------------------------------------------------------------------------------------
097a 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
097c 03b3 0001  |    |		.CONST	0x03b3,0x0001
097e 03bb 0002  |    |		.CONST	0x03bb,0x0002
0980 ; --------------------------------------------------------------------------------------
0980 ; Debug3 Subtable 0x16
0980 ; --------------------------------------------------------------------------------------
0980 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0982 03cb 0001  |    |		.CONST	0x03cb,0x0001
0984 03cd 0002  |    |		.CONST	0x03cd,0x0002
0986 03d3 0003  |    |		.CONST	0x03d3,0x0003
0988 ; --------------------------------------------------------------------------------------
0988 ; Debug3 Subtable 0x17
0988 ; --------------------------------------------------------------------------------------
0988 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
098a 03e3 ffff  |    |		.CONST	0x03e3,0xffff
098c 03e5 0001  |    |		.CONST	0x03e5,0x0001
098e 03ec 0002  |    |		.CONST	0x03ec,0x0002
0990 ; --------------------------------------------------------------------------------------
0990 ; Debug3 Subtable 0x18
0990 ; --------------------------------------------------------------------------------------
0990 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0992 03f3 0001  |    |		.CONST	0x03f3,0x0001
0994 ; --------------------------------------------------------------------------------------
0994 ; Debug3 Subtable 0x19
0994 ; --------------------------------------------------------------------------------------
0994 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0996 0403 0001  |    |		.CONST	0x0403,0x0001
0998 0412 0002  |    |		.CONST	0x0412,0x0002
099a ; --------------------------------------------------------------------------------------
099a ; Debug3 Subtable 0x1a
099a ; --------------------------------------------------------------------------------------
099a 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
099c 041b 0001  |    |		.CONST	0x041b,0x0001
099e 0428 0002  | (  |		.CONST	0x0428,0x0002
09a0 ; --------------------------------------------------------------------------------------
09a0 ; Debug3 Subtable 0x1b
09a0 ; --------------------------------------------------------------------------------------
09a0 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
09a2 043b ffff  | ;  |		.CONST	0x043b,0xffff
09a4 043d 0001  | =  |		.CONST	0x043d,0x0001
09a6 0444 0002  | D  |		.CONST	0x0444,0x0002
09a8 0451 0003  | Q  |		.CONST	0x0451,0x0003
09aa ; --------------------------------------------------------------------------------------
09aa ; Debug3 Subtable 0x1c
09aa ; --------------------------------------------------------------------------------------
09aa 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
09ac 045b ffff  | [  |		.CONST	0x045b,0xffff
09ae 0464 0001  | d  |		.CONST	0x0464,0x0001
09b0 0468 0002  | h  |		.CONST	0x0468,0x0002
09b2 0474 0003  | t  |		.CONST	0x0474,0x0003
09b4 047e 0004  | ~  |		.CONST	0x047e,0x0004
09b6 ; --------------------------------------------------------------------------------------
09b6 ; Debug3 Subtable 0x1d
09b6 ; --------------------------------------------------------------------------------------
09b6 0002 0004  |    |		.DBG3TAB	0x0002,0x0004
09b8 048b ffff  |    |		.CONST	0x048b,0xffff
09ba 048f fffe  |    |		.CONST	0x048f,0xfffe
09bc 0497 0001  |    |		.CONST	0x0497,0x0001
09be 049b 0002  |    |		.CONST	0x049b,0x0002
09c0 04aa 0003  |    |		.CONST	0x04aa,0x0003
09c2 04b2 0004  |    |		.CONST	0x04b2,0x0004
09c4 ; --------------------------------------------------------------------------------------
09c4 ; Debug3 Subtable 0x1e
09c4 ; --------------------------------------------------------------------------------------
09c4 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
09c6 04bb 0001  |    |		.CONST	0x04bb,0x0001
09c8 04c4 0002  |    |		.CONST	0x04c4,0x0002
09ca 04c9 0003  |    |		.CONST	0x04c9,0x0003
09cc 04ce 0004  |    |		.CONST	0x04ce,0x0004
09ce 04d8 0005  |    |		.CONST	0x04d8,0x0005
09d0 ; --------------------------------------------------------------------------------------
09d0 ; Debug3 Subtable 0x1f
09d0 ; --------------------------------------------------------------------------------------
09d0 0002 0003  |    |		.DBG3TAB	0x0002,0x0003
09d2 04e3 ffff  |    |		.CONST	0x04e3,0xffff
09d4 04e5 fffe  |    |		.CONST	0x04e5,0xfffe
09d6 04e9 0001  |    |		.CONST	0x04e9,0x0001
09d8 04f0 0002  |    |		.CONST	0x04f0,0x0002
09da 04f7 0003  |    |		.CONST	0x04f7,0x0003
09dc ; --------------------------------------------------------------------------------------
09dc ; Debug3 Subtable 0x20
09dc ; --------------------------------------------------------------------------------------
09dc 0003 000a  |    |		.DBG3TAB	0x0003,0x000a
09de 0503 ffff  |    |		.CONST	0x0503,0xffff
09e0 0507 fffe  |    |		.CONST	0x0507,0xfffe
09e2 050c fffd  |    |		.CONST	0x050c,0xfffd
09e4 050e 0001  |    |		.CONST	0x050e,0x0001
09e6 0511 0002  |    |		.CONST	0x0511,0x0002
09e8 0513 0003  |    |		.CONST	0x0513,0x0003
09ea 0518 0004  |    |		.CONST	0x0518,0x0004
09ec 051d 0005  |    |		.CONST	0x051d,0x0005
09ee 0521 0006  | !  |		.CONST	0x0521,0x0006
09f0 0528 0007  | (  |		.CONST	0x0528,0x0007
09f2 0530 0008  | 0  |		.CONST	0x0530,0x0008
09f4 053b 0009  | ;  |		.CONST	0x053b,0x0009
09f6 0545 000a  | E  |		.CONST	0x0545,0x000a
09f8 ; --------------------------------------------------------------------------------------
09f8 ; Debug3 Subtable 0x21
09f8 ; --------------------------------------------------------------------------------------
09f8 0002 000a  |    |		.DBG3TAB	0x0002,0x000a
09fa 0553 ffff  | S  |		.CONST	0x0553,0xffff
09fc 0558 fffe  | X  |		.CONST	0x0558,0xfffe
09fe 055a 0001  | Z  |		.CONST	0x055a,0x0001
0a00 055d 0002  | ]  |		.CONST	0x055d,0x0002
0a02 0560 0003  | `  |		.CONST	0x0560,0x0003
0a04 0566 0004  | f  |		.CONST	0x0566,0x0004
0a06 056d 0005  | m  |		.CONST	0x056d,0x0005
0a08 0570 0006  | p  |		.CONST	0x0570,0x0006
0a0a 0575 0007  | u  |		.CONST	0x0575,0x0007
0a0c 057a 0008  | z  |		.CONST	0x057a,0x0008
0a0e 0587 0009  |    |		.CONST	0x0587,0x0009
0a10 058e 000a  |    |		.CONST	0x058e,0x000a
0a12 ; --------------------------------------------------------------------------------------
0a12 ; Debug3 Subtable 0x22
0a12 ; --------------------------------------------------------------------------------------
0a12 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0a14 059b ffff  |    |		.CONST	0x059b,0xffff
0a16 05a0 0001  |    |		.CONST	0x05a0,0x0001
0a18 05a6 0002  |    |		.CONST	0x05a6,0x0002
0a1a 05ab 0003  |    |		.CONST	0x05ab,0x0003
0a1c 05b1 0004  |    |		.CONST	0x05b1,0x0004
0a1e ; --------------------------------------------------------------------------------------
0a1e ; Debug3 Subtable 0x23
0a1e ; --------------------------------------------------------------------------------------
0a1e 0002 0000  |    |		.DBG3TAB	0x0002,0x0000
0a20 05bb ffff  |    |		.CONST	0x05bb,0xffff
0a22 05bd fffe  |    |		.CONST	0x05bd,0xfffe
0a24 ; --------------------------------------------------------------------------------------
0a24 ; Debug3 Subtable 0x24
0a24 ; --------------------------------------------------------------------------------------
0a24 0002 0000  |    |		.DBG3TAB	0x0002,0x0000
0a26 05c0 ffff  |    |		.CONST	0x05c0,0xffff
0a28 05c2 fffe  |    |		.CONST	0x05c2,0xfffe
0a2a ; --------------------------------------------------------------------------------------
0a2a ; Debug3 Subtable 0x25
0a2a ; --------------------------------------------------------------------------------------
0a2a 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
0a2c 05cb 0001  |    |		.CONST	0x05cb,0x0001
0a2e 05d7 0002  |    |		.CONST	0x05d7,0x0002
0a30 05db 0003  |    |		.CONST	0x05db,0x0003
0a32 05ec 0004  |    |		.CONST	0x05ec,0x0004
0a34 ; --------------------------------------------------------------------------------------
0a34 ; Debug3 Subtable 0x26
0a34 ; --------------------------------------------------------------------------------------
0a34 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
0a36 05f3 ffff  |    |		.CONST	0x05f3,0xffff
0a38 05f7 0001  |    |		.CONST	0x05f7,0x0001
0a3a 0600 0002  |    |		.CONST	0x0600,0x0002
0a3c 0607 0003  |    |		.CONST	0x0607,0x0003
0a3e ; --------------------------------------------------------------------------------------
0a3e ; Debug3 Subtable 0x27
0a3e ; --------------------------------------------------------------------------------------
0a3e 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
0a40 0613 ffff  |    |		.CONST	0x0613,0xffff
0a42 0627 0001  | '  |		.CONST	0x0627,0x0001
0a44 062b 0002  | +  |		.CONST	0x062b,0x0002
0a46 0649 0003  | I  |		.CONST	0x0649,0x0003
0a48 ; --------------------------------------------------------------------------------------
0a48 ; Debug3 Subtable 0x28
0a48 ; --------------------------------------------------------------------------------------
0a48 0002 0000  |    |		.DBG3TAB	0x0002,0x0000
0a4a 0653 ffff  | S  |		.CONST	0x0653,0xffff
0a4c 0655 fffe  | U  |		.CONST	0x0655,0xfffe
0a4e ; --------------------------------------------------------------------------------------
0a4e ; Debug3 Subtable 0x29
0a4e ; --------------------------------------------------------------------------------------
0a4e 0002 0000  |    |		.DBG3TAB	0x0002,0x0000
0a50 0658 ffff  | X  |		.CONST	0x0658,0xffff
0a52 065a fffe  | Z  |		.CONST	0x065a,0xfffe
0a54 ; --------------------------------------------------------------------------------------
0a54 ; Debug3 Subtable 0x2a
0a54 ; --------------------------------------------------------------------------------------
0a54 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0a56 0663 0001  | c  |		.CONST	0x0663,0x0001
0a58 0672 0002  | r  |		.CONST	0x0672,0x0002
0a5a ; --------------------------------------------------------------------------------------
0a5a ; Debug3 Subtable 0x2b
0a5a ; --------------------------------------------------------------------------------------
0a5a 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
0a5c 067b ffff  | {  |		.CONST	0x067b,0xffff
0a5e 067d 0001  | }  |		.CONST	0x067d,0x0001
0a60 0686 0002  |    |		.CONST	0x0686,0x0002
0a62 0694 0003  |    |		.CONST	0x0694,0x0003
0a64 0000 0000  |    |		.BLANK	0000[0x19c]