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

⟦b91166e94⟧

    Length: 2048 (0x800)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, ELAB_segment_table, NULL, R1k_Segment, seg_5e40f2

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 02a0       |    |		.CONST	0x02a0								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0288       |    |		.CONST	0x0288								; Offset to segment table (only in elab segments)
0007 8001       |    |		.CONST	0x8001								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 000e       |    |		.CONST	0x000e								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0001       |    |		.CONST	0x0001								; Number of locals
000b			INIT_0008:
000b 029c 0013  |    |		Declare_Subprogram	INIT_0010,For_Outer_Call,Visible
000d 00bf       |    |		Action	Accept_Activation
000e			BODY_0008:
000e 00bc       |    |		Action	Signal_Activated
000f 00bb       |    |		Action	Signal_Completion
0010 ; --------------------------------------------------------------------------------------
0010 ; SUBPROGRAM
0010 ; --------------------------------------------------------------------------------------
0010 0015       |    |		.CONST	0x0015								; Address of begin
0011 001a       |    |		.CONST	0x001a								; Address of exception handler
0012 0002       |    |		.CONST	0x0002								; Number of locals
0013			INIT_0010:
0013 029f 0023  |   #|		Declare_Subprogram	INIT_0020,For_Call
0015			BODY_0010:
0015 8402       |    |		Call	0x2,0x2
0016 7801       |x   |		Jump	0x18
0017 0003       |    |		.XXX[0x1]
0018 006f       | o  |		Action	Break_Unconditional
0019 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
001a			TRAP_0010:
001a 7801       |x   |		Jump	0x1c
001b 0003       |    |		.XXX[0x1]
001c 006f       | o  |		Action	Break_Unconditional
001d 00d8       |    |		Load_Top	At_Offset_0
001e 0100       |    |		Execute	Exception,Raise
001f 0000       |    |		.XXX[0x1]
0020 ; --------------------------------------------------------------------------------------
0020 ; SUBPROGRAM
0020 ; --------------------------------------------------------------------------------------
0020 0188       |    |		.CONST	0x0188								; Address of begin
0021 0004       |    |		.CONST	0x0004								; Address of exception handler
0022 002b       | +  |		.CONST	0x002b								; Number of locals
0023			INIT_0020:
0023 7801       |x   |		Jump	0x25
0024 0002       |    |		.XXX[0x1]
0025 006f       | o  |		Action	Break_Unconditional
0026 795a       |yZ  |		Jump	0x181
0027 4800       |H   |		Short_Literal	0x0
0028 625b       |b[  |		Indirect_Literal	Discrete,0x284,{0x0001710a, 0x000000b0}
0029 02a0       |    |		Declare_Subprogram	Null_Subprogram
002a 038e       |    |		Declare_Type	Package,Defined
002b 0387       |    |		Declare_Variable	Package
002c 00d8       |    |		Load_Top	At_Offset_0
002d 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
002e 6251       |bQ  |		Indirect_Literal	Discrete,0x280,{0x00000000, 0x000e1804}
002f e002       |    |		Load	0x0,0x2
0030 e001       |    |		Load	0x0,0x1
0031 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0032 6249       |bI  |		Indirect_Literal	Discrete,0x27c,{0x00000000, 0x001a9404}
0033 e002       |    |		Load	0x0,0x2
0034 e001       |    |		Load	0x0,0x1
0035 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0036 4800       |H   |		Short_Literal	0x0
0037 6240       |b@  |		Indirect_Literal	Discrete,0x278,{0x0001b10a, 0x000000b0}
0038 02a0       |    |		Declare_Subprogram	Null_Subprogram
0039 038e       |    |		Declare_Type	Package,Defined
003a 6239       |b9  |		Indirect_Literal	Discrete,0x274,{0x0001a50a, 0x000000b0}
003b 6234       |b4  |		Indirect_Literal	Discrete,0x270,{0x0001a10a, 0x000000b0}
003c 622f       |b/  |		Indirect_Literal	Discrete,0x26c,{0x0001ad0a, 0x000000b0}
003d 622a       |b*  |		Indirect_Literal	Discrete,0x268,{0x0001950a, 0x000000b0}
003e 4804       |H   |		Short_Literal	0x4
003f e606       |    |		Load	0x3,0x6
0040 020e       |    |		Execute	Module,Augment_Imports
0041 0387       |    |		Declare_Variable	Package
0042 6221       |b!  |		Indirect_Literal	Discrete,0x264,{0x00000000, 0x00324804}
0043 e002       |    |		Load	0x0,0x2
0044 e001       |    |		Load	0x0,0x1
0045 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0046 6219       |b   |		Indirect_Literal	Discrete,0x260,{0x00000000, 0x00115804}
0047 e002       |    |		Load	0x0,0x2
0048 e001       |    |		Load	0x0,0x1
0049 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
004a 6211       |b   |		Indirect_Literal	Discrete,0x25c,{0x00000000, 0x0036c804}
004b e002       |    |		Load	0x0,0x2
004c e001       |    |		Load	0x0,0x1
004d 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
004e 6209       |b   |		Indirect_Literal	Discrete,0x258,{0x00000000, 0x00324c04}
004f e002       |    |		Load	0x0,0x2
0050 e001       |    |		Load	0x0,0x1
0051 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0052 6201       |b   |		Indirect_Literal	Discrete,0x254,{0x00000000, 0x000e4804}
0053 e002       |    |		Load	0x0,0x2
0054 e001       |    |		Load	0x0,0x1
0055 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0056 61f9       |a   |		Indirect_Literal	Discrete,0x250,{0x00000000, 0x0004bc04}
0057 e002       |    |		Load	0x0,0x2
0058 e001       |    |		Load	0x0,0x1
0059 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
005a 4800       |H   |		Short_Literal	0x0
005b 61f0       |a   |		Indirect_Literal	Discrete,0x24c,{0x0001bd0a, 0x000000b0}
005c 02a0       |    |		Declare_Subprogram	Null_Subprogram
005d 038e       |    |		Declare_Type	Package,Defined
005e 0387       |    |		Declare_Variable	Package
005f 61e8       |a   |		Indirect_Literal	Discrete,0x248,{0x00000000, 0x000e3804}
0060 e002       |    |		Load	0x0,0x2
0061 e001       |    |		Load	0x0,0x1
0062 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0063 61e0       |a   |		Indirect_Literal	Discrete,0x244,{0x00000001, 0x000d9720}
0064 4801       |H   |		Short_Literal	0x1
0065 e609       |    |		Load	0x3,0x9
0066 e60a       |    |		Load	0x3,0xa
0067 e607       |    |		Load	0x3,0x7
0068 e605       |    |		Load	0x3,0x5
0069 e604       |    |		Load	0x3,0x4
006a e60e       |    |		Load	0x3,0xe
006b 4808       |H   |		Short_Literal	0x8
006c e60d       |    |		Load	0x3,0xd
006d 020e       |    |		Execute	Module,Augment_Imports
006e 00d9       |    |		Load_Top	At_Offset_1
006f 020f       |    |		Execute	Module,Activate
0070 61cf       |a   |		Indirect_Literal	Discrete,0x240,{0x00000000, 0x00115404}
0071 e002       |    |		Load	0x0,0x2
0072 e001       |    |		Load	0x0,0x1
0073 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0074 61c7       |a   |		Indirect_Literal	Discrete,0x23c,{0x00000000, 0x003b6804}
0075 e002       |    |		Load	0x0,0x2
0076 e001       |    |		Load	0x0,0x1
0077 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0078 61bf       |a   |		Indirect_Literal	Discrete,0x238,{0x00000000, 0x00114804}
0079 e002       |    |		Load	0x0,0x2
007a e001       |    |		Load	0x0,0x1
007b 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
007c 61b7       |a   |		Indirect_Literal	Discrete,0x234,{0x00000000, 0x002d7404}
007d e002       |    |		Load	0x0,0x2
007e e001       |    |		Load	0x0,0x1
007f 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0080 61af       |a   |		Indirect_Literal	Discrete,0x230,{0x00000000, 0x003cf004}
0081 e002       |    |		Load	0x0,0x2
0082 e001       |    |		Load	0x0,0x1
0083 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0084 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
0085 4800       |H   |		Short_Literal	0x0
0086 61a5       |a   |		Indirect_Literal	Discrete,0x22c,{0x0001b90a, 0x000000b0}
0087 02a0       |    |		Declare_Subprogram	Null_Subprogram
0088 038e       |    |		Declare_Type	Package,Defined
0089 619e       |a   |		Indirect_Literal	Discrete,0x228,{0x000094ed, 0x75050081}
008a e605       |    |		Load	0x3,0x5
008b 6198       |a   |		Indirect_Literal	Discrete,0x224,{0x00000001, 0x000d9695}
008c 4801       |H   |		Short_Literal	0x1
008d e613       |    |		Load	0x3,0x13
008e 4805       |H   |		Short_Literal	0x5
008f e614       |    |		Load	0x3,0x14
0090 020e       |    |		Execute	Module,Augment_Imports
0091 0387       |    |		Declare_Variable	Package
0092 618d       |a   |		Indirect_Literal	Discrete,0x220,{0x00000000, 0x00010804}
0093 e002       |    |		Load	0x0,0x2
0094 e001       |    |		Load	0x0,0x1
0095 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0096 6185       |a   |		Indirect_Literal	Discrete,0x21c,{0x00000000, 0x001aec04}
0097 e002       |    |		Load	0x0,0x2
0098 e001       |    |		Load	0x0,0x1
0099 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
009a 617d       |a}  |		Indirect_Literal	Discrete,0x218,{0x00000000, 0x000ce004}
009b e002       |    |		Load	0x0,0x2
009c e001       |    |		Load	0x0,0x1
009d 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
009e 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
009f 6174       |at  |		Indirect_Literal	Discrete,0x214,{0x00000000, 0x0036fc04}
00a0 e002       |    |		Load	0x0,0x2
00a1 e001       |    |		Load	0x0,0x1
00a2 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00a3 616c       |al  |		Indirect_Literal	Discrete,0x210,{0x00000000, 0x0001ac04}
00a4 e002       |    |		Load	0x0,0x2
00a5 e001       |    |		Load	0x0,0x1
00a6 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00a7 6164       |ad  |		Indirect_Literal	Discrete,0x20c,{0x00000001, 0x000d9699}
00a8 4804       |H   |		Short_Literal	0x4
00a9 00db       |    |		Load_Top	At_Offset_3
00aa 00db       |    |		Load_Top	At_Offset_3
00ab e617       |    |		Load	0x3,0x17
00ac 615f       |a_  |		Indirect_Literal	Discrete,0x20c,{0x00000001, 0x000d9699}
00ad 4803       |H   |		Short_Literal	0x3
00ae 615d       |a]  |		Indirect_Literal	Discrete,0x20c,{0x00000001, 0x000d9699}
00af 4802       |H   |		Short_Literal	0x2
00b0 e616       |    |		Load	0x3,0x16
00b1 e60a       |    |		Load	0x3,0xa
00b2 e607       |    |		Load	0x3,0x7
00b3 e604       |    |		Load	0x3,0x4
00b4 e615       |    |		Load	0x3,0x15
00b5 e611       |    |		Load	0x3,0x11
00b6 e60e       |    |		Load	0x3,0xe
00b7 e60b       |    |		Load	0x3,0xb
00b8 4811       |H   |		Short_Literal	0x11
00b9 e614       |    |		Load	0x3,0x14
00ba 020e       |    |		Execute	Module,Augment_Imports
00bb e614       |    |		Load	0x3,0x14
00bc 020f       |    |		Execute	Module,Activate
00bd 614a       |aJ  |		Indirect_Literal	Discrete,0x208,{0x00000000, 0x003e2404}
00be e002       |    |		Load	0x0,0x2
00bf e001       |    |		Load	0x0,0x1
00c0 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00c1 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
00c2 4805       |H   |		Short_Literal	0x5
00c3 6140       |a@  |		Indirect_Literal	Discrete,0x204,{0x0001b50a, 0x000000b0}
00c4 02a0       |    |		Declare_Subprogram	Null_Subprogram
00c5 038c       |    |		Declare_Type	Package,Defined,Not_Elaborated
00c6 6139       |a9  |		Indirect_Literal	Discrete,0x200,{0x00000001, 0x000d969a}
00c7 4802       |H   |		Short_Literal	0x2
00c8 e613       |    |		Load	0x3,0x13
00c9 6132       |a2  |		Indirect_Literal	Discrete,0x1fc,{0x000094ee, 0x05050081}
00ca 6135       |a5  |		Indirect_Literal	Discrete,0x200,{0x00000001, 0x000d969a}
00cb 4801       |H   |		Short_Literal	0x1
00cc e61a       |    |		Load	0x3,0x1a
00cd 4807       |H   |		Short_Literal	0x7
00ce e61b       |    |		Load	0x3,0x1b
00cf 020e       |    |		Execute	Module,Augment_Imports
00d0 e60e       |    |		Load	0x3,0xe
00d1 e60b       |    |		Load	0x3,0xb
00d2 4802       |H   |		Short_Literal	0x2
00d3 00db       |    |		Load_Top	At_Offset_3
00d4 020e       |    |		Execute	Module,Augment_Imports
00d5 00d8       |    |		Load_Top	At_Offset_0
00d6 020d       |    |		Execute	Module,Elaborate
00d7 e60d       |    |		Load	0x3,0xd
00d8 611f       |a   |		Indirect_Literal	Discrete,0x1f8,{0x00000001, 0x000d96c1}
00d9 4802       |H   |		Short_Literal	0x2
00da e605       |    |		Load	0x3,0x5
00db e61b       |    |		Load	0x3,0x1b
00dc 611b       |a   |		Indirect_Literal	Discrete,0x1f8,{0x00000001, 0x000d96c1}
00dd 4801       |H   |		Short_Literal	0x1
00de e61a       |    |		Load	0x3,0x1a
00df 6114       |a   |		Indirect_Literal	Discrete,0x1f4,{0x0001a90a, 0x000000b0}
00e0 e60a       |    |		Load	0x3,0xa
00e1 e607       |    |		Load	0x3,0x7
00e2 e604       |    |		Load	0x3,0x4
00e3 e60e       |    |		Load	0x3,0xe
00e4 e612       |    |		Load	0x3,0x12
00e5 e614       |    |		Load	0x3,0x14
00e6 6109       |a   |		Indirect_Literal	Discrete,0x1f0,{0x00000001, 0x000d96c2}
00e7 4801       |H   |		Short_Literal	0x1
00e8 6103       |a   |		Indirect_Literal	Discrete,0x1ec,{0x00019d0a, 0x000000b0}
00e9 60fe       |`   |		Indirect_Literal	Discrete,0x1e8,{0x0001990a, 0x000000b0}
00ea e60b       |    |		Load	0x3,0xb
00eb 60f8       |`   |		Indirect_Literal	Discrete,0x1e4,{0x00000001, 0x000d96c6}
00ec 4801       |H   |		Short_Literal	0x1
00ed 60f2       |`   |		Indirect_Literal	Discrete,0x1e0,{0x0001910a, 0x000000b0}
00ee 60ed       |`   |		Indirect_Literal	Discrete,0x1dc,{0x00018d0a, 0x000000b0}
00ef e609       |    |		Load	0x3,0x9
00f0 e60c       |    |		Load	0x3,0xc
00f1 e610       |    |		Load	0x3,0x10
00f2 60e5       |`   |		Indirect_Literal	Discrete,0x1d8,{0x00000001, 0x000d96c3}
00f3 4802       |H   |		Short_Literal	0x2
00f4 60e3       |`   |		Indirect_Literal	Discrete,0x1d8,{0x00000001, 0x000d96c3}
00f5 4801       |H   |		Short_Literal	0x1
00f6 60dd       |`   |		Indirect_Literal	Discrete,0x1d4,{0x00000001, 0x000d96c4}
00f7 4802       |H   |		Short_Literal	0x2
00f8 60db       |`   |		Indirect_Literal	Discrete,0x1d4,{0x00000001, 0x000d96c4}
00f9 4801       |H   |		Short_Literal	0x1
00fa 60d5       |`   |		Indirect_Literal	Discrete,0x1d0,{0x00000001, 0x000d96c7}
00fb 4801       |H   |		Short_Literal	0x1
00fc 60cf       |`   |		Indirect_Literal	Discrete,0x1cc,{0x000094f2, 0x9d050081}
00fd 4826       |H&  |		Short_Literal	0x26
00fe e606       |    |		Load	0x3,0x6
00ff 020e       |    |		Execute	Module,Augment_Imports
0100 e606       |    |		Load	0x3,0x6
0101 020f       |    |		Execute	Module,Activate
0102 4800       |H   |		Short_Literal	0x0
0103 60c4       |`   |		Indirect_Literal	Discrete,0x1c8,{0x0001790a, 0x000000b0}
0104 02a0       |    |		Declare_Subprogram	Null_Subprogram
0105 038e       |    |		Declare_Type	Package,Defined
0106 0387       |    |		Declare_Variable	Package
0107 00d8       |    |		Load_Top	At_Offset_0
0108 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
0109 4800       |H   |		Short_Literal	0x0
010a 60b9       |`   |		Indirect_Literal	Discrete,0x1c4,{0x0001850a, 0x000000b0}
010b 02a0       |    |		Declare_Subprogram	Null_Subprogram
010c 038e       |    |		Declare_Type	Package,Defined
010d 0387       |    |		Declare_Variable	Package
010e 00d8       |    |		Load_Top	At_Offset_0
010f 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
0110 4800       |H   |		Short_Literal	0x0
0111 60ae       |`   |		Indirect_Literal	Discrete,0x1c0,{0x0001890a, 0x000000b0}
0112 02a0       |    |		Declare_Subprogram	Null_Subprogram
0113 038e       |    |		Declare_Type	Package,Defined
0114 0387       |    |		Declare_Variable	Package
0115 00d8       |    |		Load_Top	At_Offset_0
0116 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
0117 e605       |    |		Load	0x3,0x5
0118 e604       |    |		Load	0x3,0x4
0119 e60e       |    |		Load	0x3,0xe
011a 4803       |H   |		Short_Literal	0x3
011b e620       |    |		Load	0x3,0x20
011c 020e       |    |		Execute	Module,Augment_Imports
011d 00d9       |    |		Load_Top	At_Offset_1
011e 020f       |    |		Execute	Module,Activate
011f 609c       |`   |		Indirect_Literal	Discrete,0x1bc,{0x00000000, 0x003d4404}
0120 e002       |    |		Load	0x0,0x2
0121 e001       |    |		Load	0x0,0x1
0122 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0123 6094       |`   |		Indirect_Literal	Discrete,0x1b8,{0x00000000, 0x003d8804}
0124 e002       |    |		Load	0x0,0x2
0125 e001       |    |		Load	0x0,0x1
0126 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0127 e606       |    |		Load	0x3,0x6
0128 608b       |`   |		Indirect_Literal	Discrete,0x1b4,{0x00000001, 0x000d96d6}
0129 4801       |H   |		Short_Literal	0x1
012a e605       |    |		Load	0x3,0x5
012b e60e       |    |		Load	0x3,0xe
012c e621       | !  |		Load	0x3,0x21
012d e604       |    |		Load	0x3,0x4
012e e623       | #  |		Load	0x3,0x23
012f e60b       |    |		Load	0x3,0xb
0130 e60a       |    |		Load	0x3,0xa
0131 e607       |    |		Load	0x3,0x7
0132 480b       |H   |		Short_Literal	0xb
0133 e61e       |    |		Load	0x3,0x1e
0134 020e       |    |		Execute	Module,Augment_Imports
0135 e61e       |    |		Load	0x3,0x1e
0136 020f       |    |		Execute	Module,Activate
0137 6078       |`x  |		Indirect_Literal	Discrete,0x1b0,{0x00000000, 0x003d8004}
0138 e002       |    |		Load	0x0,0x2
0139 e001       |    |		Load	0x0,0x1
013a 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
013b 4800       |H   |		Short_Literal	0x0
013c 606f       |`o  |		Indirect_Literal	Discrete,0x1ac,{0x0001810a, 0x000000b0}
013d 02a0       |    |		Declare_Subprogram	Null_Subprogram
013e 038e       |    |		Declare_Type	Package,Defined
013f 0387       |    |		Declare_Variable	Package
0140 00d8       |    |		Load_Top	At_Offset_0
0141 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
0142 e609       |    |		Load	0x3,0x9
0143 4801       |H   |		Short_Literal	0x1
0144 00db       |    |		Load_Top	At_Offset_3
0145 020e       |    |		Execute	Module,Augment_Imports
0146 00d9       |    |		Load_Top	At_Offset_1
0147 020f       |    |		Execute	Module,Activate
0148 4800       |H   |		Short_Literal	0x0
0149 605e       |`^  |		Indirect_Literal	Discrete,0x1a8,{0x00017d0a, 0x000000b0}
014a 02a0       |    |		Declare_Subprogram	Null_Subprogram
014b 038e       |    |		Declare_Type	Package,Defined
014c 0387       |    |		Declare_Variable	Package
014d 00d8       |    |		Load_Top	At_Offset_0
014e 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
014f e612       |    |		Load	0x3,0x12
0150 e605       |    |		Load	0x3,0x5
0151 e606       |    |		Load	0x3,0x6
0152 6051       |`Q  |		Indirect_Literal	Discrete,0x1a4,{0x00000001, 0x000d96cd}
0153 4801       |H   |		Short_Literal	0x1
0154 e604       |    |		Load	0x3,0x4
0155 e60e       |    |		Load	0x3,0xe
0156 e60a       |    |		Load	0x3,0xa
0157 e607       |    |		Load	0x3,0x7
0158 4809       |H   |		Short_Literal	0x9
0159 e627       | '  |		Load	0x3,0x27
015a 020e       |    |		Execute	Module,Augment_Imports
015b 00d9       |    |		Load_Top	At_Offset_1
015c 020f       |    |		Execute	Module,Activate
015d 6042       |`B  |		Indirect_Literal	Discrete,0x1a0,{0x00000000, 0x003d5804}
015e e002       |    |		Load	0x0,0x2
015f e001       |    |		Load	0x0,0x1
0160 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0161 603a       |`:  |		Indirect_Literal	Discrete,0x19c,{0x00000000, 0x003d9004}
0162 e002       |    |		Load	0x0,0x2
0163 e001       |    |		Load	0x0,0x1
0164 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0165 6032       |`2  |		Indirect_Literal	Discrete,0x198,{0x00000000, 0x003d7004}
0166 e002       |    |		Load	0x0,0x2
0167 e001       |    |		Load	0x0,0x1
0168 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0169 00d9       |    |		Load_Top	At_Offset_1
016a 00db       |    |		Load_Top	At_Offset_3
016b e60a       |    |		Load	0x3,0xa
016c e607       |    |		Load	0x3,0x7
016d e626       | &  |		Load	0x3,0x26
016e e628       | (  |		Load	0x3,0x28
016f e61f       |    |		Load	0x3,0x1f
0170 e622       | "  |		Load	0x3,0x22
0171 e624       | $  |		Load	0x3,0x24
0172 e609       |    |		Load	0x3,0x9
0173 480a       |H   |		Short_Literal	0xa
0174 e61c       |    |		Load	0x3,0x1c
0175 020e       |    |		Execute	Module,Augment_Imports
0176 e61c       |    |		Load	0x3,0x1c
0177 020f       |    |		Execute	Module,Activate
0178 e626       | &  |		Load	0x3,0x26
0179 e606       |    |		Load	0x3,0x6
017a e61d       |    |		Load	0x3,0x1d
017b 4803       |H   |		Short_Literal	0x3
017c e602       |    |		Load	0x3,0x2
017d 020e       |    |		Execute	Module,Augment_Imports
017e e602       |    |		Load	0x3,0x2
017f 020f       |    |		Execute	Module,Activate
0180 7807       |x   |		Jump	BODY_0020
0181 6012       |`   |		Indirect_Literal	Discrete,0x194,{0x00000000, 0x00001f40}
0182 600d       |`   |		Indirect_Literal	Discrete,0x190,{0x00000000, 0x00190c04}
0183 e002       |    |		Load	0x0,0x2
0184 e001       |    |		Load	0x0,0x1
0185 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0186 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0187 7e9f       |~   |		Jump	0x27
0188			BODY_0020:
0188 e5fd       |    |		Load	0x2,-0x3
0189 e5fe       |    |		Load	0x2,-0x2
018a e5ff       |    |		Load	0x2,-0x1
018b 8603       |    |		Call	0x3,0x3
018c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
018d 0000 0000  |    |		.XXX[0x3]
018f 0000       |    |
0190 0000 0000  |    |		.LITERAL	{0x00000000, 0x00190c04}
0194 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001f40}
0198 0000 0000  |    |		.LITERAL	{0x00000000, 0x003d7004}
019c 0000 0000  |    |		.LITERAL	{0x00000000, 0x003d9004}
01a0 0000 0000  |    |		.LITERAL	{0x00000000, 0x003d5804}
01a4 0000 0001  |    |		.LITERAL	{0x00000001, 0x000d96cd}
01a8 0001 7d0a  |  } |		.LITERAL	{0x00017d0a, 0x000000b0}
01ac 0001 810a  |    |		.LITERAL	{0x0001810a, 0x000000b0}
01b0 0000 0000  |    |		.LITERAL	{0x00000000, 0x003d8004}
01b4 0000 0001  |    |		.LITERAL	{0x00000001, 0x000d96d6}
01b8 0000 0000  |    |		.LITERAL	{0x00000000, 0x003d8804}
01bc 0000 0000  |    |		.LITERAL	{0x00000000, 0x003d4404}
01c0 0001 890a  |    |		.LITERAL	{0x0001890a, 0x000000b0}
01c4 0001 850a  |    |		.LITERAL	{0x0001850a, 0x000000b0}
01c8 0001 790a  |  y |		.LITERAL	{0x0001790a, 0x000000b0}
01cc 0000 94f2  |    |		.LITERAL	{0x000094f2, 0x9d050081}
01d0 0000 0001  |    |		.LITERAL	{0x00000001, 0x000d96c7}
01d4 0000 0001  |    |		.LITERAL	{0x00000001, 0x000d96c4}
01d8 0000 0001  |    |		.LITERAL	{0x00000001, 0x000d96c3}
01dc 0001 8d0a  |    |		.LITERAL	{0x00018d0a, 0x000000b0}
01e0 0001 910a  |    |		.LITERAL	{0x0001910a, 0x000000b0}
01e4 0000 0001  |    |		.LITERAL	{0x00000001, 0x000d96c6}
01e8 0001 990a  |    |		.LITERAL	{0x0001990a, 0x000000b0}
01ec 0001 9d0a  |    |		.LITERAL	{0x00019d0a, 0x000000b0}
01f0 0000 0001  |    |		.LITERAL	{0x00000001, 0x000d96c2}
01f4 0001 a90a  |    |		.LITERAL	{0x0001a90a, 0x000000b0}
01f8 0000 0001  |    |		.LITERAL	{0x00000001, 0x000d96c1}
01fc 0000 94ee  |    |		.LITERAL	{0x000094ee, 0x05050081}
0200 0000 0001  |    |		.LITERAL	{0x00000001, 0x000d969a}
0204 0001 b50a  |    |		.LITERAL	{0x0001b50a, 0x000000b0}
0208 0000 0000  |    |		.LITERAL	{0x00000000, 0x003e2404}
020c 0000 0001  |    |		.LITERAL	{0x00000001, 0x000d9699}
0210 0000 0000  |    |		.LITERAL	{0x00000000, 0x0001ac04}
0214 0000 0000  |    |		.LITERAL	{0x00000000, 0x0036fc04}
0218 0000 0000  |    |		.LITERAL	{0x00000000, 0x000ce004}
021c 0000 0000  |    |		.LITERAL	{0x00000000, 0x001aec04}
0220 0000 0000  |    |		.LITERAL	{0x00000000, 0x00010804}
0224 0000 0001  |    |		.LITERAL	{0x00000001, 0x000d9695}
0228 0000 94ed  |    |		.LITERAL	{0x000094ed, 0x75050081}
022c 0001 b90a  |    |		.LITERAL	{0x0001b90a, 0x000000b0}
0230 0000 0000  |    |		.LITERAL	{0x00000000, 0x003cf004}
0234 0000 0000  |    |		.LITERAL	{0x00000000, 0x002d7404}
0238 0000 0000  |    |		.LITERAL	{0x00000000, 0x00114804}
023c 0000 0000  |    |		.LITERAL	{0x00000000, 0x003b6804}
0240 0000 0000  |    |		.LITERAL	{0x00000000, 0x00115404}
0244 0000 0001  |    |		.LITERAL	{0x00000001, 0x000d9720}
0248 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e3804}
024c 0001 bd0a  |    |		.LITERAL	{0x0001bd0a, 0x000000b0}
0250 0000 0000  |    |		.LITERAL	{0x00000000, 0x0004bc04}
0254 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e4804}
0258 0000 0000  |    |		.LITERAL	{0x00000000, 0x00324c04}
025c 0000 0000  |    |		.LITERAL	{0x00000000, 0x0036c804}
0260 0000 0000  |    |		.LITERAL	{0x00000000, 0x00115804}
0264 0000 0000  |    |		.LITERAL	{0x00000000, 0x00324804}
0268 0001 950a  |    |		.LITERAL	{0x0001950a, 0x000000b0}
026c 0001 ad0a  |    |		.LITERAL	{0x0001ad0a, 0x000000b0}
0270 0001 a10a  |    |		.LITERAL	{0x0001a10a, 0x000000b0}
0274 0001 a50a  |    |		.LITERAL	{0x0001a50a, 0x000000b0}
0278 0001 b10a  |    |		.LITERAL	{0x0001b10a, 0x000000b0}
027c 0000 0000  |    |		.LITERAL	{0x00000000, 0x001a9404}
0280 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e1804}
0284 0001 710a  |  q |		.LITERAL	{0x0001710a, 0x000000b0}
0288 ; --------------------------------------------------------------------------------------
0288 ; Segment Table
0288 ; --------------------------------------------------------------------------------------
0288 010a 0028  |   (|		.XXX[0x13]
028a 0111 0037  |   7|
028c 003a 013c  | : <|
028e 003b 0149  | ; I|
0290 003c 003d  | < =|
0292 005b 0086  | [  |
0294 00c3 00df  |    |
0296 00e8 00e9  |    |
0298 00ed 00ee  |    |
029a 0103       |    |
029b 0000 0000  |    |		.BLANK	0000[0x5]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; Debug Table
02a0 ; --------------------------------------------------------------------------------------
02a0 0004 000d  |    |		.DEBUG4	0x0004,0x000d,0x96ab,0x0000,0x0001,0x0000
02a6 5d3d 492d  |]=I-|		.XXX[0x15a]
02a8 2539 1cb9  |%9  |
02aa 5539 2551  |U9%Q|
02ac 4cb8 28c4  |L ( |
02ae d8e8 c4c8  |    |
02b0 e8cc c880  |    |
02b2 8484 8480  |    |
02b4 b90d 3d39  |  =9|
02b6 5915 4951  |Y IQ|
02b8 1549 4cb9  | IL |
02ba 0d59 517c  | YQ||
02bc c4cc c57d  |   }|
02be 4955 389d  |IU8 |
02c0 4d41 150c  |MA  |
02c2 b828 c4d8  | (  |
02c4 e8c4 c8e8  |    |
02c6 ccc8 8084  |    |
02c8 8484 813d  |   =|
02ca b9b1 e481  |    |
02cc a5b8 8085  |    |
02ce 60c4 c4b9  |`   |
02d0 617d 5115  |a}Q |
02d2 4d51 2539  |MQ%9|
02d4 1cb9 4915  |  I |
02d6 58d9 7cc1  |X | |
02d8 7cc1 7d5d  || }]|
02da 3d49 2d25  |=I-%|
02dc 391c b955  |9  U|
02de 3925 514c  |9%QL|
02e0 b828 c4d8  | (  |
02e2 e8c4 c8e8  |    |
02e4 ccc8 8084  |    |
02e6 8484 80b9  |    |
02e8 0d3d 3959  | =9Y|
02ea 1549 5115  | IQ |
02ec 494c b90d  |IL  |
02ee 5951 7cc4  |YQ| |
02f0 ccc8 9d09  |    |
02f2 3d11 64b8  |= d |
02f4 28c4 d8e8  |(   |
02f6 c4c8 e8cc  |    |
02f8 c880 8484  |    |
02fa 8481 3db9  |  = |
02fc b1e4 81a5  |    |
02fe b880 8560  |   `|
0300 c4c4 b961  |   a|
0302 7d51 154d  |}Q M|
0304 5125 391c  |Q%9 |
0306 b949 1558  | I X|
0308 d97c c17c  | | ||
030a c17d 5d3d  | }]=|
030c 492d 2539  |I-%9|
030e 1cb9 5539  |  U9|
0310 2551 4cb8  |%QL |
0312 28c4 d8e8  |(   |
0314 c4c8 e8cc  |    |
0316 c880 8484  |    |
0318 8480 b90d  |    |
031a 3d39 5915  |=9Y |
031c 4951 1549  |IQ I|
031e 4cb9 0d59  |L  Y|
0320 517c c4cc  |Q|  |
0322 c89d 4d41  |  MA|
0324 150c b828  |   (|
0326 c4d8 e8c4  |    |
0328 c8e8 ccc8  |    |
032a 8084 8484  |    |
032c 813d b9b1  | =  |
032e e481 a5b8  |    |
0330 8085 60c4  |  ` |
0332 c4b9 617d  |  a}|
0334 5115 4d51  |Q MQ|
0336 2539 1cb9  |%9  |
0338 4915 58d9  |I X |
033a 7cc1 7cc1  || | |
033c 7d5d 3d49  |}]=I|
033e 2d25 391c  |-%9 |
0340 b955 3925  | U9%|
0342 514c b828  |QL (|
0344 c4d8 e8c4  |    |
0346 c8e8 ccc8  |    |
0348 8084 8484  |    |
034a 80b9 0d3d  |   =|
034c 3959 1549  |9Y I|
034e 5115 494c  |Q IL|
0350 b90d 5951  |  YQ|
0352 7cc4 ccc9  ||   |
0354 7d49 5538  |}IU8|
0356 9d09 3d11  |  = |
0358 64b8 28c4  |d ( |
035a d8e8 c4c8  |    |
035c e8cc c880  |    |
035e 8484 8481  |    |
0360 3db9 b1e4  |=   |
0362 81a5 b880  |    |
0364 8560 c4c4  | `  |
0366 b961 7d51  | a}Q|
0368 154d 5125  | MQ%|
036a 391c b949  |9  I|
036c 1558 d97c  | X ||
036e c17c c17d  | | }|
0370 5d3d 492d  |]=I-|
0372 2539 1cb9  |%9  |
0374 5539 2551  |U9%Q|
0376 4cb8 28c4  |L ( |
0378 d8e8 c4c8  |    |
037a e8cc c880  |    |
037c 8484 8480  |    |
037e b90d 3d39  |  =9|
0380 5915 4951  |Y IQ|
0382 1549 4cb9  | IL |
0384 0d59 517c  | YQ||
0386 c4cc c97d  |   }|
0388 4955 389d  |IU8 |
038a 4d41 150c  |MA  |
038c b828 c4d8  | (  |
038e e8c4 c8e8  |    |
0390 cccc 80e8  |    |
0392 e8e8 816d  |   m|
0394 19a5 b195  |    |
0396 7d55 d1a5  |}U  |
0398 b1a5 d1a5  |    |
039a 95cc b911  |    |
039c a599 9995  |    |
039e c995 b98d  |    |
03a0 9480 a088  |    |
03a2 8560 c4c4  | `  |
03a4 b961 7d51  | a}Q|
03a6 154d 5125  | MQ%|
03a8 391c b949  |9  I|
03aa 1558 d57c  | X ||
03ac d97c c97d  | | }|
03ae 5d3d 492d  |]=I-|
03b0 2539 1cb8  |%9  |
03b2 28c4 d8e8  |(   |
03b4 c4c8 e8cc  |    |
03b6 cc80 b8b8  |    |
03b8 b881 5539  |  U9|
03ba 2551 4cb9  |%QL |
03bc 0d3d 3959  | =9Y|
03be 1549 5115  | IQ |
03c0 494c b90d  |IL  |
03c2 5951 7d51  |YQ}Q|
03c4 154d 517d  | MQ}|
03c6 5551 2531  |UQ%1|
03c8 2551 2515  |%Q% |
03ca 4c9d 093d  |L  =|
03cc 1164 9d58  | d X|
03ce a0c4 a488  |    |
03d0 b080 8885  |    |
03d2 60c4 c4b9  |`   |
03d4 617d 5115  |a}Q |
03d6 4d51 2539  |MQ%9|
03d8 1cb8 28c4  |  ( |
03da d8e8 c4c8  |    |
03dc e8cc cc80  |    |
03de b8b8 b881  |    |
03e0 4915 58d9  |I X |
03e2 7cc1 7cc1  || | |
03e4 7d5d 3d49  |}]=I|
03e6 2d25 391c  |-%9 |
03e8 b955 3925  | U9%|
03ea 514c b90d  |QL  |
03ec 3d39 5915  |=9Y |
03ee 4951 1549  |IQ I|
03f0 4cb9 0d59  |L  Y|
03f2 517d 5115  |Q}Q |
03f4 4d51 7d55  |MQ}U|
03f6 5125 3125  |Q%1%|
03f8 5125 154c  |Q% L|
03fa 9d09 3d11  |  = |
03fc 649d 58a0  |d X |
03fe c4a4 88b0  |    |