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

⟦754586f1f⟧

    Length: 4096 (0x1000)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_191cd7

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦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 0638       | 8  |		.CONST	0x0638								; 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 0003       |    |		.CONST	0x0003								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0010       |    |		.CONST	0x0010								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0001       |    |		.CONST	0x0001								; Number of locals
000b			INIT_0008:
000b 029a 001b  |    |		Declare_Subprogram	INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 00bf       |    |		Action	Accept_Activation
000e 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
000f 00c7       |    |		Action	Elaborate_Subprogram
0010			BODY_0008:
0010 00bc       |    |		Action	Signal_Activated
0011 00bb       |    |		Action	Signal_Completion
0012 0000 0000  |    |		.BLANK	0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 018a       |    |		.CONST	0x018a								; Address of begin
0019 0004       |    |		.CONST	0x0004								; Address of exception handler
001a 006f       | o  |		.CONST	0x006f								; Number of locals
001b			INIT_0018:
001b 029f 0263  |   c|		Declare_Subprogram	INIT_0260,For_Call
001d 029f 0283  |    |		Declare_Subprogram	INIT_0280,For_Call
001f 029e 029b  |    |		Declare_Subprogram	INIT_0298,For_Call,Unelaborated
0021 4804       |H   |		Short_Literal	0x4
0022 4802       |H   |		Short_Literal	0x2
0023 0099       |    |		Action	Reference_Dynamic
0024 00c7       |    |		Action	Elaborate_Subprogram
0025 029e 03bb  |    |		Declare_Subprogram	INIT_03b8,For_Call,Unelaborated
0027 4805       |H   |		Short_Literal	0x5
0028 4802       |H   |		Short_Literal	0x2
0029 0099       |    |		Action	Reference_Dynamic
002a 00c7       |    |		Action	Elaborate_Subprogram
002b 029e 0423  |   #|		Declare_Subprogram	INIT_0420,For_Call,Unelaborated
002d 4806       |H   |		Short_Literal	0x6
002e 4802       |H   |		Short_Literal	0x2
002f 0099       |    |		Action	Reference_Dynamic
0030 00c7       |    |		Action	Elaborate_Subprogram
0031 029f 048b  |    |		Declare_Subprogram	INIT_0488,For_Call
0033 4804       |H   |		Short_Literal	0x4
0034 4802       |H   |		Short_Literal	0x2
0035 0099       |    |		Action	Reference_Dynamic
0036 00c6       |    |		Action	Check_Subprogram_Elaborated
0037 e002       |    |		Load	0x0,0x2
0038 4820       |H   |		Short_Literal	0x20
0039 0092 0625  |   %|		Action	Push_String_Extended,0x625					; "and"
003b 4807       |H   |		Short_Literal	0x7
003c 4802       |H   |		Short_Literal	0x2
003d 0099       |    |		Action	Reference_Dynamic
003e 0093 0000  |    |		push_full_address	0x0
0040 621b       |b   |		Indirect_Literal	Discrete,0x25c,{0x80000000, 0x000f0000}
0041 0273       | s  |		Execute	Discrete,Plus
0042 e003       |    |		Load	0x0,0x3
0043 0273       | s  |		Execute	Discrete,Plus
0044 e004       |    |		Load	0x0,0x4
0045 0273       | s  |		Execute	Discrete,Plus
0046 480d       |H   |		Short_Literal	0xd
0047 0007       |    |		Action	Break_Optional
0048 029f 04a3  |    |		Declare_Subprogram	INIT_04a0,For_Call
004a 4804       |H   |		Short_Literal	0x4
004b 4802       |H   |		Short_Literal	0x2
004c 0099       |    |		Action	Reference_Dynamic
004d 00c6       |    |		Action	Check_Subprogram_Elaborated
004e e005       |    |		Load	0x0,0x5
004f 4810       |H   |		Short_Literal	0x10
0050 0092 0625  |   %|		Action	Push_String_Extended,0x625					; "and"
0052 480e       |H   |		Short_Literal	0xe
0053 4802       |H   |		Short_Literal	0x2
0054 0099       |    |		Action	Reference_Dynamic
0055 0093 0000  |    |		push_full_address	0x0
0057 6200       |b   |		Indirect_Literal	Discrete,0x258,{0x80000000, 0x000e0000}
0058 0273       | s  |		Execute	Discrete,Plus
0059 e003       |    |		Load	0x0,0x3
005a 0273       | s  |		Execute	Discrete,Plus
005b e006       |    |		Load	0x0,0x6
005c 0273       | s  |		Execute	Discrete,Plus
005d 4814       |H   |		Short_Literal	0x14
005e 0007       |    |		Action	Break_Optional
005f 029f 04bb  |    |		Declare_Subprogram	INIT_04b8,For_Call
0061 4804       |H   |		Short_Literal	0x4
0062 4802       |H   |		Short_Literal	0x2
0063 0099       |    |		Action	Reference_Dynamic
0064 00c6       |    |		Action	Check_Subprogram_Elaborated
0065 e007       |    |		Load	0x0,0x7
0066 4808       |H   |		Short_Literal	0x8
0067 0092 0625  |   %|		Action	Push_String_Extended,0x625					; "and"
0069 4815       |H   |		Short_Literal	0x15
006a 4802       |H   |		Short_Literal	0x2
006b 0099       |    |		Action	Reference_Dynamic
006c 0093 0000  |    |		push_full_address	0x0
006e 61e5       |a   |		Indirect_Literal	Discrete,0x254,{0x80000000, 0x000d0000}
006f 0273       | s  |		Execute	Discrete,Plus
0070 e003       |    |		Load	0x0,0x3
0071 0273       | s  |		Execute	Discrete,Plus
0072 e008       |    |		Load	0x0,0x8
0073 0273       | s  |		Execute	Discrete,Plus
0074 481b       |H   |		Short_Literal	0x1b
0075 0007       |    |		Action	Break_Optional
0076 029f 04d3  |    |		Declare_Subprogram	INIT_04d0,For_Call
0078 4804       |H   |		Short_Literal	0x4
0079 4802       |H   |		Short_Literal	0x2
007a 0099       |    |		Action	Reference_Dynamic
007b 00c6       |    |		Action	Check_Subprogram_Elaborated
007c e002       |    |		Load	0x0,0x2
007d 4820       |H   |		Short_Literal	0x20
007e 0092 0626  |   &|		Action	Push_String_Extended,0x626					; "or"
0080 481c       |H   |		Short_Literal	0x1c
0081 4802       |H   |		Short_Literal	0x2
0082 0099       |    |		Action	Reference_Dynamic
0083 0093 0000  |    |		push_full_address	0x0
0085 61ca       |a   |		Indirect_Literal	Discrete,0x250,{0x80000000, 0x000c0000}
0086 0273       | s  |		Execute	Discrete,Plus
0087 e003       |    |		Load	0x0,0x3
0088 0273       | s  |		Execute	Discrete,Plus
0089 e009       |    |		Load	0x0,0x9
008a 0273       | s  |		Execute	Discrete,Plus
008b 4822       |H"  |		Short_Literal	0x22
008c 0007       |    |		Action	Break_Optional
008d 029f 04eb  |    |		Declare_Subprogram	INIT_04e8,For_Call
008f 4804       |H   |		Short_Literal	0x4
0090 4802       |H   |		Short_Literal	0x2
0091 0099       |    |		Action	Reference_Dynamic
0092 00c6       |    |		Action	Check_Subprogram_Elaborated
0093 e005       |    |		Load	0x0,0x5
0094 4810       |H   |		Short_Literal	0x10
0095 0092 0626  |   &|		Action	Push_String_Extended,0x626					; "or"
0097 4823       |H#  |		Short_Literal	0x23
0098 4802       |H   |		Short_Literal	0x2
0099 0099       |    |		Action	Reference_Dynamic
009a 0093 0000  |    |		push_full_address	0x0
009c 61af       |a   |		Indirect_Literal	Discrete,0x24c,{0x80000000, 0x000b0000}
009d 0273       | s  |		Execute	Discrete,Plus
009e e003       |    |		Load	0x0,0x3
009f 0273       | s  |		Execute	Discrete,Plus
00a0 e00a       |    |		Load	0x0,0xa
00a1 0273       | s  |		Execute	Discrete,Plus
00a2 4829       |H)  |		Short_Literal	0x29
00a3 0007       |    |		Action	Break_Optional
00a4 029f 0503  |    |		Declare_Subprogram	INIT_0500,For_Call
00a6 4804       |H   |		Short_Literal	0x4
00a7 4802       |H   |		Short_Literal	0x2
00a8 0099       |    |		Action	Reference_Dynamic
00a9 00c6       |    |		Action	Check_Subprogram_Elaborated
00aa e007       |    |		Load	0x0,0x7
00ab 4808       |H   |		Short_Literal	0x8
00ac 0092 0626  |   &|		Action	Push_String_Extended,0x626					; "or"
00ae 482a       |H*  |		Short_Literal	0x2a
00af 4802       |H   |		Short_Literal	0x2
00b0 0099       |    |		Action	Reference_Dynamic
00b1 0093 0000  |    |		push_full_address	0x0
00b3 6194       |a   |		Indirect_Literal	Discrete,0x248,{0x80000000, 0x000a0000}
00b4 0273       | s  |		Execute	Discrete,Plus
00b5 e003       |    |		Load	0x0,0x3
00b6 0273       | s  |		Execute	Discrete,Plus
00b7 e00b       |    |		Load	0x0,0xb
00b8 0273       | s  |		Execute	Discrete,Plus
00b9 4830       |H0  |		Short_Literal	0x30
00ba 0007       |    |		Action	Break_Optional
00bb 029f 051b  |    |		Declare_Subprogram	INIT_0518,For_Call
00bd 4804       |H   |		Short_Literal	0x4
00be 4802       |H   |		Short_Literal	0x2
00bf 0099       |    |		Action	Reference_Dynamic
00c0 00c6       |    |		Action	Check_Subprogram_Elaborated
00c1 e002       |    |		Load	0x0,0x2
00c2 4820       |H   |		Short_Literal	0x20
00c3 0092 0627  |   '|		Action	Push_String_Extended,0x627					; "xor"
00c5 4831       |H1  |		Short_Literal	0x31
00c6 4802       |H   |		Short_Literal	0x2
00c7 0099       |    |		Action	Reference_Dynamic
00c8 0093 0000  |    |		push_full_address	0x0
00ca 6179       |ay  |		Indirect_Literal	Discrete,0x244,{0x80000000, 0x00090000}
00cb 0273       | s  |		Execute	Discrete,Plus
00cc e003       |    |		Load	0x0,0x3
00cd 0273       | s  |		Execute	Discrete,Plus
00ce e00c       |    |		Load	0x0,0xc
00cf 0273       | s  |		Execute	Discrete,Plus
00d0 4837       |H7  |		Short_Literal	0x37
00d1 0007       |    |		Action	Break_Optional
00d2 029f 0533  |   3|		Declare_Subprogram	INIT_0530,For_Call
00d4 4804       |H   |		Short_Literal	0x4
00d5 4802       |H   |		Short_Literal	0x2
00d6 0099       |    |		Action	Reference_Dynamic
00d7 00c6       |    |		Action	Check_Subprogram_Elaborated
00d8 e005       |    |		Load	0x0,0x5
00d9 4810       |H   |		Short_Literal	0x10
00da 0092 0627  |   '|		Action	Push_String_Extended,0x627					; "xor"
00dc 4838       |H8  |		Short_Literal	0x38
00dd 4802       |H   |		Short_Literal	0x2
00de 0099       |    |		Action	Reference_Dynamic
00df 0093 0000  |    |		push_full_address	0x0
00e1 615e       |a^  |		Indirect_Literal	Discrete,0x240,{0x80000000, 0x00080000}
00e2 0273       | s  |		Execute	Discrete,Plus
00e3 e003       |    |		Load	0x0,0x3
00e4 0273       | s  |		Execute	Discrete,Plus
00e5 e00d       |    |		Load	0x0,0xd
00e6 0273       | s  |		Execute	Discrete,Plus
00e7 483e       |H>  |		Short_Literal	0x3e
00e8 0007       |    |		Action	Break_Optional
00e9 029f 054b  |   K|		Declare_Subprogram	INIT_0548,For_Call
00eb 4804       |H   |		Short_Literal	0x4
00ec 4802       |H   |		Short_Literal	0x2
00ed 0099       |    |		Action	Reference_Dynamic
00ee 00c6       |    |		Action	Check_Subprogram_Elaborated
00ef e007       |    |		Load	0x0,0x7
00f0 4808       |H   |		Short_Literal	0x8
00f1 0092 0627  |   '|		Action	Push_String_Extended,0x627					; "xor"
00f3 483f       |H?  |		Short_Literal	0x3f
00f4 4802       |H   |		Short_Literal	0x2
00f5 0099       |    |		Action	Reference_Dynamic
00f6 0093 0000  |    |		push_full_address	0x0
00f8 6143       |aC  |		Indirect_Literal	Discrete,0x23c,{0x80000000, 0x00070000}
00f9 0273       | s  |		Execute	Discrete,Plus
00fa e003       |    |		Load	0x0,0x3
00fb 0273       | s  |		Execute	Discrete,Plus
00fc e00e       |    |		Load	0x0,0xe
00fd 0273       | s  |		Execute	Discrete,Plus
00fe 4845       |HE  |		Short_Literal	0x45
00ff 0007       |    |		Action	Break_Optional
0100 029f 0563  |   c|		Declare_Subprogram	INIT_0560,For_Call
0102 4805       |H   |		Short_Literal	0x5
0103 4802       |H   |		Short_Literal	0x2
0104 0099       |    |		Action	Reference_Dynamic
0105 00c6       |    |		Action	Check_Subprogram_Elaborated
0106 e002       |    |		Load	0x0,0x2
0107 4820       |H   |		Short_Literal	0x20
0108 0092 0628  |   (|		Action	Push_String_Extended,0x628					; "not"
010a 4846       |HF  |		Short_Literal	0x46
010b 4802       |H   |		Short_Literal	0x2
010c 0099       |    |		Action	Reference_Dynamic
010d 0093 0000  |    |		push_full_address	0x0
010f 6128       |a(  |		Indirect_Literal	Discrete,0x238,{0x80000000, 0x00060000}
0110 0273       | s  |		Execute	Discrete,Plus
0111 e003       |    |		Load	0x0,0x3
0112 0273       | s  |		Execute	Discrete,Plus
0113 e00f       |    |		Load	0x0,0xf
0114 0273       | s  |		Execute	Discrete,Plus
0115 484c       |HL  |		Short_Literal	0x4c
0116 0007       |    |		Action	Break_Optional
0117 029f 0573  |   s|		Declare_Subprogram	INIT_0570,For_Call
0119 4805       |H   |		Short_Literal	0x5
011a 4802       |H   |		Short_Literal	0x2
011b 0099       |    |		Action	Reference_Dynamic
011c 00c6       |    |		Action	Check_Subprogram_Elaborated
011d e005       |    |		Load	0x0,0x5
011e 4810       |H   |		Short_Literal	0x10
011f 0092 0628  |   (|		Action	Push_String_Extended,0x628					; "not"
0121 484d       |HM  |		Short_Literal	0x4d
0122 4802       |H   |		Short_Literal	0x2
0123 0099       |    |		Action	Reference_Dynamic
0124 0093 0000  |    |		push_full_address	0x0
0126 610d       |a   |		Indirect_Literal	Discrete,0x234,{0x80000000, 0x00050000}
0127 0273       | s  |		Execute	Discrete,Plus
0128 e003       |    |		Load	0x0,0x3
0129 0273       | s  |		Execute	Discrete,Plus
012a e010       |    |		Load	0x0,0x10
012b 0273       | s  |		Execute	Discrete,Plus
012c 4853       |HS  |		Short_Literal	0x53
012d 0007       |    |		Action	Break_Optional
012e 029f 0583  |    |		Declare_Subprogram	INIT_0580,For_Call
0130 4805       |H   |		Short_Literal	0x5
0131 4802       |H   |		Short_Literal	0x2
0132 0099       |    |		Action	Reference_Dynamic
0133 00c6       |    |		Action	Check_Subprogram_Elaborated
0134 e007       |    |		Load	0x0,0x7
0135 4808       |H   |		Short_Literal	0x8
0136 0092 0628  |   (|		Action	Push_String_Extended,0x628					; "not"
0138 4854       |HT  |		Short_Literal	0x54
0139 4802       |H   |		Short_Literal	0x2
013a 0099       |    |		Action	Reference_Dynamic
013b 0093 0000  |    |		push_full_address	0x0
013d 60f2       |`   |		Indirect_Literal	Discrete,0x230,{0x80000000, 0x00040000}
013e 0273       | s  |		Execute	Discrete,Plus
013f e003       |    |		Load	0x0,0x3
0140 0273       | s  |		Execute	Discrete,Plus
0141 e011       |    |		Load	0x0,0x11
0142 0273       | s  |		Execute	Discrete,Plus
0143 485a       |HZ  |		Short_Literal	0x5a
0144 0007       |    |		Action	Break_Optional
0145 029f 0593  |    |		Declare_Subprogram	INIT_0590,For_Call
0147 4806       |H   |		Short_Literal	0x6
0148 4802       |H   |		Short_Literal	0x2
0149 0099       |    |		Action	Reference_Dynamic
014a 00c6       |    |		Action	Check_Subprogram_Elaborated
014b e002       |    |		Load	0x0,0x2
014c 4820       |H   |		Short_Literal	0x20
014d 0092 0629  |   )|		Action	Push_String_Extended,0x629					; "shift"
014f 485b       |H[  |		Short_Literal	0x5b
0150 4802       |H   |		Short_Literal	0x2
0151 0099       |    |		Action	Reference_Dynamic
0152 0093 0000  |    |		push_full_address	0x0
0154 60d7       |`   |		Indirect_Literal	Discrete,0x22c,{0x80000000, 0x00030000}
0155 0273       | s  |		Execute	Discrete,Plus
0156 e003       |    |		Load	0x0,0x3
0157 0273       | s  |		Execute	Discrete,Plus
0158 e012       |    |		Load	0x0,0x12
0159 0273       | s  |		Execute	Discrete,Plus
015a 4861       |Ha  |		Short_Literal	0x61
015b 0007       |    |		Action	Break_Optional
015c 029f 05a3  |    |		Declare_Subprogram	INIT_05a0,For_Call
015e 4806       |H   |		Short_Literal	0x6
015f 4802       |H   |		Short_Literal	0x2
0160 0099       |    |		Action	Reference_Dynamic
0161 00c6       |    |		Action	Check_Subprogram_Elaborated
0162 e005       |    |		Load	0x0,0x5
0163 4810       |H   |		Short_Literal	0x10
0164 0092 0629  |   )|		Action	Push_String_Extended,0x629					; "shift"
0166 4862       |Hb  |		Short_Literal	0x62
0167 4802       |H   |		Short_Literal	0x2
0168 0099       |    |		Action	Reference_Dynamic
0169 0093 0000  |    |		push_full_address	0x0
016b 60bc       |`   |		Indirect_Literal	Discrete,0x228,{0x80000000, 0x00020000}
016c 0273       | s  |		Execute	Discrete,Plus
016d e003       |    |		Load	0x0,0x3
016e 0273       | s  |		Execute	Discrete,Plus
016f e013       |    |		Load	0x0,0x13
0170 0273       | s  |		Execute	Discrete,Plus
0171 4868       |Hh  |		Short_Literal	0x68
0172 0007       |    |		Action	Break_Optional
0173 029f 05b3  |    |		Declare_Subprogram	INIT_05b0,For_Call
0175 4806       |H   |		Short_Literal	0x6
0176 4802       |H   |		Short_Literal	0x2
0177 0099       |    |		Action	Reference_Dynamic
0178 00c6       |    |		Action	Check_Subprogram_Elaborated
0179 e007       |    |		Load	0x0,0x7
017a 4808       |H   |		Short_Literal	0x8
017b 0092 0629  |   )|		Action	Push_String_Extended,0x629					; "shift"
017d 4869       |Hi  |		Short_Literal	0x69
017e 4802       |H   |		Short_Literal	0x2
017f 0099       |    |		Action	Reference_Dynamic
0180 0093 0000  |    |		push_full_address	0x0
0182 60a1       |`   |		Indirect_Literal	Discrete,0x224,{0x80000000, 0x00010000}
0183 0273       | s  |		Execute	Discrete,Plus
0184 e003       |    |		Load	0x0,0x3
0185 0273       | s  |		Execute	Discrete,Plus
0186 e014       |    |		Load	0x0,0x14
0187 0273       | s  |		Execute	Discrete,Plus
0188 486f       |Ho  |		Short_Literal	0x6f
0189 0007       |    |		Action	Break_Optional
018a			BODY_0018:
018a e408       |    |		Load	0x2,0x8
018b e409       |    |		Load	0x2,0x9
018c e40a       |    |		Load	0x2,0xa
018d 480b       |H   |		Short_Literal	0xb
018e 4802       |H   |		Short_Literal	0x2
018f 0099       |    |		Action	Reference_Dynamic
0190 480c       |H   |		Short_Literal	0xc
0191 4802       |H   |		Short_Literal	0x2
0192 0099       |    |		Action	Reference_Dynamic
0193 8404       |    |		Call	0x2,0x4
0194 e40f       |    |		Load	0x2,0xf
0195 e410       |    |		Load	0x2,0x10
0196 e411       |    |		Load	0x2,0x11
0197 4812       |H   |		Short_Literal	0x12
0198 4802       |H   |		Short_Literal	0x2
0199 0099       |    |		Action	Reference_Dynamic
019a 4813       |H   |		Short_Literal	0x13
019b 4802       |H   |		Short_Literal	0x2
019c 0099       |    |		Action	Reference_Dynamic
019d 8404       |    |		Call	0x2,0x4
019e e416       |    |		Load	0x2,0x16
019f e417       |    |		Load	0x2,0x17
01a0 e418       |    |		Load	0x2,0x18
01a1 4819       |H   |		Short_Literal	0x19
01a2 4802       |H   |		Short_Literal	0x2
01a3 0099       |    |		Action	Reference_Dynamic
01a4 481a       |H   |		Short_Literal	0x1a
01a5 4802       |H   |		Short_Literal	0x2
01a6 0099       |    |		Action	Reference_Dynamic
01a7 8404       |    |		Call	0x2,0x4
01a8 e41d       |    |		Load	0x2,0x1d
01a9 e41e       |    |		Load	0x2,0x1e
01aa e41f       |    |		Load	0x2,0x1f
01ab 4820       |H   |		Short_Literal	0x20
01ac 4802       |H   |		Short_Literal	0x2
01ad 0099       |    |		Action	Reference_Dynamic
01ae 4821       |H!  |		Short_Literal	0x21
01af 4802       |H   |		Short_Literal	0x2
01b0 0099       |    |		Action	Reference_Dynamic
01b1 8404       |    |		Call	0x2,0x4
01b2 e424       | $  |		Load	0x2,0x24
01b3 e425       | %  |		Load	0x2,0x25
01b4 e426       | &  |		Load	0x2,0x26
01b5 4827       |H'  |		Short_Literal	0x27
01b6 4802       |H   |		Short_Literal	0x2
01b7 0099       |    |		Action	Reference_Dynamic
01b8 4828       |H(  |		Short_Literal	0x28
01b9 4802       |H   |		Short_Literal	0x2
01ba 0099       |    |		Action	Reference_Dynamic
01bb 8404       |    |		Call	0x2,0x4
01bc e42b       | +  |		Load	0x2,0x2b
01bd e42c       | ,  |		Load	0x2,0x2c
01be e42d       | -  |		Load	0x2,0x2d
01bf 482e       |H.  |		Short_Literal	0x2e
01c0 4802       |H   |		Short_Literal	0x2
01c1 0099       |    |		Action	Reference_Dynamic
01c2 482f       |H/  |		Short_Literal	0x2f
01c3 4802       |H   |		Short_Literal	0x2
01c4 0099       |    |		Action	Reference_Dynamic
01c5 8404       |    |		Call	0x2,0x4
01c6 e432       | 2  |		Load	0x2,0x32
01c7 e433       | 3  |		Load	0x2,0x33
01c8 e434       | 4  |		Load	0x2,0x34
01c9 4835       |H5  |		Short_Literal	0x35
01ca 4802       |H   |		Short_Literal	0x2
01cb 0099       |    |		Action	Reference_Dynamic
01cc 4836       |H6  |		Short_Literal	0x36
01cd 4802       |H   |		Short_Literal	0x2
01ce 0099       |    |		Action	Reference_Dynamic
01cf 8404       |    |		Call	0x2,0x4
01d0 e439       | 9  |		Load	0x2,0x39
01d1 e43a       | :  |		Load	0x2,0x3a
01d2 e43b       | ;  |		Load	0x2,0x3b
01d3 483c       |H<  |		Short_Literal	0x3c
01d4 4802       |H   |		Short_Literal	0x2
01d5 0099       |    |		Action	Reference_Dynamic
01d6 483d       |H=  |		Short_Literal	0x3d
01d7 4802       |H   |		Short_Literal	0x2
01d8 0099       |    |		Action	Reference_Dynamic
01d9 8404       |    |		Call	0x2,0x4
01da e440       | @  |		Load	0x2,0x40
01db e441       | A  |		Load	0x2,0x41
01dc e442       | B  |		Load	0x2,0x42
01dd 4843       |HC  |		Short_Literal	0x43
01de 4802       |H   |		Short_Literal	0x2
01df 0099       |    |		Action	Reference_Dynamic
01e0 4844       |HD  |		Short_Literal	0x44
01e1 4802       |H   |		Short_Literal	0x2
01e2 0099       |    |		Action	Reference_Dynamic
01e3 8404       |    |		Call	0x2,0x4
01e4 e447       | G  |		Load	0x2,0x47
01e5 e448       | H  |		Load	0x2,0x48
01e6 e449       | I  |		Load	0x2,0x49
01e7 484a       |HJ  |		Short_Literal	0x4a
01e8 4802       |H   |		Short_Literal	0x2
01e9 0099       |    |		Action	Reference_Dynamic
01ea 484b       |HK  |		Short_Literal	0x4b
01eb 4802       |H   |		Short_Literal	0x2
01ec 0099       |    |		Action	Reference_Dynamic
01ed 8405       |    |		Call	0x2,0x5
01ee e44e       | N  |		Load	0x2,0x4e
01ef e44f       | O  |		Load	0x2,0x4f
01f0 e450       | P  |		Load	0x2,0x50
01f1 4851       |HQ  |		Short_Literal	0x51
01f2 4802       |H   |		Short_Literal	0x2
01f3 0099       |    |		Action	Reference_Dynamic
01f4 4852       |HR  |		Short_Literal	0x52
01f5 4802       |H   |		Short_Literal	0x2
01f6 0099       |    |		Action	Reference_Dynamic
01f7 8405       |    |		Call	0x2,0x5
01f8 e455       | U  |		Load	0x2,0x55
01f9 e456       | V  |		Load	0x2,0x56
01fa e457       | W  |		Load	0x2,0x57
01fb 4858       |HX  |		Short_Literal	0x58
01fc 4802       |H   |		Short_Literal	0x2
01fd 0099       |    |		Action	Reference_Dynamic
01fe 4859       |HY  |		Short_Literal	0x59
01ff 4802       |H   |		Short_Literal	0x2
0200 0099       |    |		Action	Reference_Dynamic
0201 8405       |    |		Call	0x2,0x5
0202 e45c       | \  |		Load	0x2,0x5c
0203 e45d       | ]  |		Load	0x2,0x5d
0204 e45e       | ^  |		Load	0x2,0x5e
0205 485f       |H_  |		Short_Literal	0x5f
0206 4802       |H   |		Short_Literal	0x2
0207 0099       |    |		Action	Reference_Dynamic
0208 4860       |H`  |		Short_Literal	0x60
0209 4802       |H   |		Short_Literal	0x2
020a 0099       |    |		Action	Reference_Dynamic
020b 8406       |    |		Call	0x2,0x6
020c e463       | c  |		Load	0x2,0x63
020d e464       | d  |		Load	0x2,0x64
020e e465       | e  |		Load	0x2,0x65
020f 4866       |Hf  |		Short_Literal	0x66
0210 4802       |H   |		Short_Literal	0x2
0211 0099       |    |		Action	Reference_Dynamic
0212 4867       |Hg  |		Short_Literal	0x67
0213 4802       |H   |		Short_Literal	0x2
0214 0099       |    |		Action	Reference_Dynamic
0215 8406       |    |		Call	0x2,0x6
0216 e46a       | j  |		Load	0x2,0x6a
0217 e46b       | k  |		Load	0x2,0x6b
0218 e46c       | l  |		Load	0x2,0x6c
0219 486d       |Hm  |		Short_Literal	0x6d
021a 4802       |H   |		Short_Literal	0x2
021b 0099       |    |		Action	Reference_Dynamic
021c 486e       |Hn  |		Short_Literal	0x6e
021d 4802       |H   |		Short_Literal	0x2
021e 0099       |    |		Action	Reference_Dynamic
021f 8406       |    |		Call	0x2,0x6
0220 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0221 0000 0000  |    |		.XXX[0x3]
0223 0000       |    |
0224 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
0228 8000 0000  |    |		.LITERAL	{0x80000000, 0x00020000}
022c 8000 0000  |    |		.LITERAL	{0x80000000, 0x00030000}
0230 8000 0000  |    |		.LITERAL	{0x80000000, 0x00040000}
0234 8000 0000  |    |		.LITERAL	{0x80000000, 0x00050000}
0238 8000 0000  |    |		.LITERAL	{0x80000000, 0x00060000}
023c 8000 0000  |    |		.LITERAL	{0x80000000, 0x00070000}
0240 8000 0000  |    |		.LITERAL	{0x80000000, 0x00080000}
0244 8000 0000  |    |		.LITERAL	{0x80000000, 0x00090000}
0248 8000 0000  |    |		.LITERAL	{0x80000000, 0x000a0000}
024c 8000 0000  |    |		.LITERAL	{0x80000000, 0x000b0000}
0250 8000 0000  |    |		.LITERAL	{0x80000000, 0x000c0000}
0254 8000 0000  |    |		.LITERAL	{0x80000000, 0x000d0000}
0258 8000 0000  |    |		.LITERAL	{0x80000000, 0x000e0000}
025c 8000 0000  |    |		.LITERAL	{0x80000000, 0x000f0000}
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0263       | c  |		.CONST	0x0263								; Address of begin
0261 0004       |    |		.CONST	0x0004								; Address of exception handler
0262 0001       |    |		.CONST	0x0001								; Number of locals
0263			BODY_0260:
0263			INIT_0260:
0263 4810       |H   |		Short_Literal	0x10
0264 e7fb       |    |		Load	0x3,-0x5
0265 e7ff       |    |		Load	0x3,-0x1
0266 8015       |    |		Call	0x0,0x15
0267 4820       |H   |		Short_Literal	0x20
0268 8016       |    |		Call	0x0,0x16
0269 00db       |    |		Load_Top	At_Offset_3
026a 8017       |    |		Call	0x0,0x17
026b 4820       |H   |		Short_Literal	0x20
026c 8016       |    |		Call	0x0,0x16
026d 4810       |H   |		Short_Literal	0x10
026e e7fb       |    |		Load	0x3,-0x5
026f e7fd       |    |		Load	0x3,-0x3
0270 8015       |    |		Call	0x0,0x15
0271 0092 062a  |   *|		Action	Push_String_Extended,0x62a					; " => "
0273 8017       |    |		Call	0x0,0x17
0274 4810       |H   |		Short_Literal	0x10
0275 e7fb       |    |		Load	0x3,-0x5
0276 e7fc       |    |		Load	0x3,-0x4
0277 8015       |    |		Call	0x0,0x15
0278 4801       |H   |		Short_Literal	0x1
0279 8018       |    |		Call	0x0,0x18
027a 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
027b 0000 0000  |    |		.BLANK	0000[0x5]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0283       |    |		.CONST	0x0283								; Address of begin
0281 0004       |    |		.CONST	0x0004								; Address of exception handler
0282 0001       |    |		.CONST	0x0001								; Number of locals
0283			BODY_0280:
0283			INIT_0280:
0283 00da       |    |		Load_Top	At_Offset_2
0284 8017       |    |		Call	0x0,0x17
0285 4820       |H   |		Short_Literal	0x20
0286 8016       |    |		Call	0x0,0x16
0287 4810       |H   |		Short_Literal	0x10
0288 e7fc       |    |		Load	0x3,-0x4
0289 e7fe       |    |		Load	0x3,-0x2
028a 8015       |    |		Call	0x0,0x15
028b 0092 062a  |   *|		Action	Push_String_Extended,0x62a					; " => "
028d 8017       |    |		Call	0x0,0x17
028e 4810       |H   |		Short_Literal	0x10
028f e7fc       |    |		Load	0x3,-0x4
0290 e7fd       |    |		Load	0x3,-0x3
0291 8015       |    |		Call	0x0,0x15
0292 4801       |H   |		Short_Literal	0x1
0293 8018       |    |		Call	0x0,0x18
0294 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0295 0000 0000  |    |		.XXX[0x3]
0297 0000       |    |
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029d       |    |		.CONST	0x029d								; Address of begin
0299 0004       |    |		.CONST	0x0004								; Address of exception handler
029a 0002       |    |		.CONST	0x0002								; Number of locals
029b			INIT_0298:
029b 029f 05c3  |    |		Declare_Subprogram	INIT_05c0,For_Call
029d			BODY_0298:
029d e7fb       |    |		Load	0x3,-0x5
029e 0269       | i  |		Execute	Discrete,Last
029f 00d8       |    |		Load_Top	At_Offset_0
02a0 e7fb       |    |		Load	0x3,-0x5
02a1 0260       | `  |		Execute	Discrete,In_Type
02a2 7001       |p   |		Jump_Nonzero	0x2a4
02a3 0801       |    |		Execute_Immediate	Raise,0x1
02a4 e7fb       |    |		Load	0x3,-0x5
02a5 026a       | j  |		Execute	Discrete,First
02a6 00d8       |    |		Load_Top	At_Offset_0
02a7 e7fb       |    |		Load	0x3,-0x5
02a8 0260       | `  |		Execute	Discrete,In_Type
02a9 7001       |p   |		Jump_Nonzero	0x2ab
02aa 0801       |    |		Execute_Immediate	Raise,0x1
02ab 8602       |    |		Call	0x3,0x2
02ac e7fb       |    |		Load	0x3,-0x5
02ad 026a       | j  |		Execute	Discrete,First
02ae 00d8       |    |		Load_Top	At_Offset_0
02af e7fb       |    |		Load	0x3,-0x5
02b0 0260       | `  |		Execute	Discrete,In_Type
02b1 7001       |p   |		Jump_Nonzero	0x2b3
02b2 0801       |    |		Execute_Immediate	Raise,0x1
02b3 e7fb       |    |		Load	0x3,-0x5
02b4 0269       | i  |		Execute	Discrete,Last
02b5 00d8       |    |		Load_Top	At_Offset_0
02b6 e7fb       |    |		Load	0x3,-0x5
02b7 0260       | `  |		Execute	Discrete,In_Type
02b8 7001       |p   |		Jump_Nonzero	0x2ba
02b9 0801       |    |		Execute_Immediate	Raise,0x1
02ba 8602       |    |		Call	0x3,0x2
02bb 4801       |H   |		Short_Literal	0x1
02bc 00d8       |    |		Load_Top	At_Offset_0
02bd e7fb       |    |		Load	0x3,-0x5
02be 0260       | `  |		Execute	Discrete,In_Type
02bf 7001       |p   |		Jump_Nonzero	0x2c1
02c0 0801       |    |		Execute_Immediate	Raise,0x1
02c1 e7fb       |    |		Load	0x3,-0x5
02c2 026a       | j  |		Execute	Discrete,First
02c3 00d8       |    |		Load_Top	At_Offset_0
02c4 e7fb       |    |		Load	0x3,-0x5
02c5 0260       | `  |		Execute	Discrete,In_Type
02c6 7001       |p   |		Jump_Nonzero	0x2c8
02c7 0801       |    |		Execute_Immediate	Raise,0x1
02c8 8602       |    |		Call	0x3,0x2
02c9 e7fb       |    |		Load	0x3,-0x5
02ca 026a       | j  |		Execute	Discrete,First
02cb 00d8       |    |		Load_Top	At_Offset_0
02cc e7fb       |    |		Load	0x3,-0x5
02cd 0260       | `  |		Execute	Discrete,In_Type
02ce 7001       |p   |		Jump_Nonzero	0x2d0
02cf 0801       |    |		Execute_Immediate	Raise,0x1
02d0 4801       |H   |		Short_Literal	0x1
02d1 00d8       |    |		Load_Top	At_Offset_0
02d2 e7fb       |    |		Load	0x3,-0x5
02d3 0260       | `  |		Execute	Discrete,In_Type
02d4 7001       |p   |		Jump_Nonzero	0x2d6
02d5 0801       |    |		Execute_Immediate	Raise,0x1
02d6 8602       |    |		Call	0x3,0x2
02d7 4801       |H   |		Short_Literal	0x1
02d8 00d8       |    |		Load_Top	At_Offset_0
02d9 e7fb       |    |		Load	0x3,-0x5
02da 0260       | `  |		Execute	Discrete,In_Type
02db 7001       |p   |		Jump_Nonzero	0x2dd
02dc 0801       |    |		Execute_Immediate	Raise,0x1
02dd e7fb       |    |		Load	0x3,-0x5
02de 0269       | i  |		Execute	Discrete,Last
02df 00d8       |    |		Load_Top	At_Offset_0
02e0 e7fb       |    |		Load	0x3,-0x5
02e1 0260       | `  |		Execute	Discrete,In_Type
02e2 7001       |p   |		Jump_Nonzero	0x2e4
02e3 0801       |    |		Execute_Immediate	Raise,0x1
02e4 8602       |    |		Call	0x3,0x2
02e5 e7fb       |    |		Load	0x3,-0x5
02e6 0269       | i  |		Execute	Discrete,Last
02e7 00d8       |    |		Load_Top	At_Offset_0
02e8 e7fb       |    |		Load	0x3,-0x5
02e9 0260       | `  |		Execute	Discrete,In_Type
02ea 7001       |p   |		Jump_Nonzero	0x2ec
02eb 0801       |    |		Execute_Immediate	Raise,0x1
02ec 4801       |H   |		Short_Literal	0x1
02ed 00d8       |    |		Load_Top	At_Offset_0
02ee e7fb       |    |		Load	0x3,-0x5
02ef 0260       | `  |		Execute	Discrete,In_Type
02f0 7001       |p   |		Jump_Nonzero	0x2f2
02f1 0801       |    |		Execute_Immediate	Raise,0x1
02f2 8602       |    |		Call	0x3,0x2
02f3 4801       |H   |		Short_Literal	0x1
02f4 00d8       |    |		Load_Top	At_Offset_0
02f5 e7fb       |    |		Load	0x3,-0x5
02f6 0260       | `  |		Execute	Discrete,In_Type
02f7 7001       |p   |		Jump_Nonzero	0x2f9
02f8 0801       |    |		Execute_Immediate	Raise,0x1
02f9 480f       |H   |		Short_Literal	0xf
02fa 00d8       |    |		Load_Top	At_Offset_0
02fb e7fb       |    |		Load	0x3,-0x5
02fc 0260       | `  |		Execute	Discrete,In_Type
02fd 7001       |p   |		Jump_Nonzero	0x2ff
02fe 0801       |    |		Execute_Immediate	Raise,0x1
02ff 8602       |    |		Call	0x3,0x2
0300 480f       |H   |		Short_Literal	0xf
0301 00d8       |    |		Load_Top	At_Offset_0
0302 e7fb       |    |		Load	0x3,-0x5
0303 0260       | `  |		Execute	Discrete,In_Type
0304 7001       |p   |		Jump_Nonzero	0x306
0305 0801       |    |		Execute_Immediate	Raise,0x1
0306 4801       |H   |		Short_Literal	0x1
0307 00d8       |    |		Load_Top	At_Offset_0
0308 e7fb       |    |		Load	0x3,-0x5
0309 0260       | `  |		Execute	Discrete,In_Type
030a 7001       |p   |		Jump_Nonzero	0x30c
030b 0801       |    |		Execute_Immediate	Raise,0x1
030c 8602       |    |		Call	0x3,0x2
030d 4800       |H   |		Short_Literal	0x0
030e 00d8       |    |		Load_Top	At_Offset_0
030f e7fb       |    |		Load	0x3,-0x5
0310 0260       | `  |		Execute	Discrete,In_Type
0311 7001       |p   |		Jump_Nonzero	0x313
0312 0801       |    |		Execute_Immediate	Raise,0x1
0313 480f       |H   |		Short_Literal	0xf
0314 00d8       |    |		Load_Top	At_Offset_0
0315 e7fb       |    |		Load	0x3,-0x5
0316 0260       | `  |		Execute	Discrete,In_Type
0317 7001       |p   |		Jump_Nonzero	0x319
0318 0801       |    |		Execute_Immediate	Raise,0x1
0319 8602       |    |		Call	0x3,0x2
031a 480f       |H   |		Short_Literal	0xf
031b 00d8       |    |		Load_Top	At_Offset_0
031c e7fb       |    |		Load	0x3,-0x5
031d 0260       | `  |		Execute	Discrete,In_Type
031e 7001       |p   |		Jump_Nonzero	0x320
031f 0801       |    |		Execute_Immediate	Raise,0x1
0320 4800       |H   |		Short_Literal	0x0
0321 00d8       |    |		Load_Top	At_Offset_0
0322 e7fb       |    |		Load	0x3,-0x5
0323 0260       | `  |		Execute	Discrete,In_Type
0324 7001       |p   |		Jump_Nonzero	0x326
0325 0801       |    |		Execute_Immediate	Raise,0x1
0326 8602       |    |		Call	0x3,0x2
0327 4801       |H   |		Short_Literal	0x1
0328 00d8       |    |		Load_Top	At_Offset_0
0329 e7fb       |    |		Load	0x3,-0x5
032a 0260       | `  |		Execute	Discrete,In_Type
032b 7001       |p   |		Jump_Nonzero	0x32d
032c 0801       |    |		Execute_Immediate	Raise,0x1
032d 480d       |H   |		Short_Literal	0xd
032e 00d8       |    |		Load_Top	At_Offset_0
032f e7fb       |    |		Load	0x3,-0x5
0330 0260       | `  |		Execute	Discrete,In_Type
0331 7001       |p   |		Jump_Nonzero	0x333
0332 0801       |    |		Execute_Immediate	Raise,0x1
0333 8602       |    |		Call	0x3,0x2
0334 480d       |H   |		Short_Literal	0xd
0335 00d8       |    |		Load_Top	At_Offset_0
0336 e7fb       |    |		Load	0x3,-0x5
0337 0260       | `  |		Execute	Discrete,In_Type
0338 7001       |p   |		Jump_Nonzero	0x33a
0339 0801       |    |		Execute_Immediate	Raise,0x1
033a 4801       |H   |		Short_Literal	0x1
033b 00d8       |    |		Load_Top	At_Offset_0
033c e7fb       |    |		Load	0x3,-0x5
033d 0260       | `  |		Execute	Discrete,In_Type
033e 7001       |p   |		Jump_Nonzero	0x340
033f 0801       |    |		Execute_Immediate	Raise,0x1
0340 8602       |    |		Call	0x3,0x2
0341 4800       |H   |		Short_Literal	0x0
0342 00d8       |    |		Load_Top	At_Offset_0
0343 e7fb       |    |		Load	0x3,-0x5
0344 0260       | `  |		Execute	Discrete,In_Type
0345 7001       |p   |		Jump_Nonzero	0x347
0346 0801       |    |		Execute_Immediate	Raise,0x1
0347 480d       |H   |		Short_Literal	0xd
0348 00d8       |    |		Load_Top	At_Offset_0
0349 e7fb       |    |		Load	0x3,-0x5
034a 0260       | `  |		Execute	Discrete,In_Type
034b 7001       |p   |		Jump_Nonzero	0x34d
034c 0801       |    |		Execute_Immediate	Raise,0x1
034d 8602       |    |		Call	0x3,0x2
034e 480d       |H   |		Short_Literal	0xd
034f 00d8       |    |		Load_Top	At_Offset_0
0350 e7fb       |    |		Load	0x3,-0x5
0351 0260       | `  |		Execute	Discrete,In_Type
0352 7001       |p   |		Jump_Nonzero	0x354
0353 0801       |    |		Execute_Immediate	Raise,0x1
0354 4800       |H   |		Short_Literal	0x0
0355 00d8       |    |		Load_Top	At_Offset_0
0356 e7fb       |    |		Load	0x3,-0x5
0357 0260       | `  |		Execute	Discrete,In_Type
0358 7001       |p   |		Jump_Nonzero	0x35a
0359 0801       |    |		Execute_Immediate	Raise,0x1
035a 8602       |    |		Call	0x3,0x2
035b 00cf       |    |		Action	Mark_Auxiliary
035c e7fc       |    |		Load	0x3,-0x4
035d 0afe       |    |		Execute_Immediate	Plus,-0x2
035e 4800       |H   |		Short_Literal	0x0
035f 0263       | c  |		Execute	Discrete,Above_Bound
0360 7056       |pV  |		Jump_Nonzero	0x3b7
0361 4801       |H   |		Short_Literal	0x1
0362 00d9       |    |		Load_Top	At_Offset_1
0363 0253       | S  |		Execute	Discrete,Binary_Scale
0364 00d8       |    |		Load_Top	At_Offset_0
0365 e7fb       |    |		Load	0x3,-0x5
0366 0260       | `  |		Execute	Discrete,In_Type
0367 7001       |p   |		Jump_Nonzero	0x369
0368 0801       |    |		Execute_Immediate	Raise,0x1
0369 e7fb       |    |		Load	0x3,-0x5
036a 0269       | i  |		Execute	Discrete,Last
036b 00d8       |    |		Load_Top	At_Offset_0
036c e7fb       |    |		Load	0x3,-0x5
036d 0260       | `  |		Execute	Discrete,In_Type
036e 7001       |p   |		Jump_Nonzero	0x370
036f 0801       |    |		Execute_Immediate	Raise,0x1
0370 8602       |    |		Call	0x3,0x2
0371 e7fb       |    |		Load	0x3,-0x5
0372 0269       | i  |		Execute	Discrete,Last
0373 00d8       |    |		Load_Top	At_Offset_0
0374 e7fb       |    |		Load	0x3,-0x5
0375 0260       | `  |		Execute	Discrete,In_Type
0376 7001       |p   |		Jump_Nonzero	0x378
0377 0801       |    |		Execute_Immediate	Raise,0x1
0378 4801       |H   |		Short_Literal	0x1
0379 00da       |    |		Load_Top	At_Offset_2
037a 0253       | S  |		Execute	Discrete,Binary_Scale
037b 00d8       |    |		Load_Top	At_Offset_0
037c e7fb       |    |		Load	0x3,-0x5
037d 0260       | `  |		Execute	Discrete,In_Type
037e 7001       |p   |		Jump_Nonzero	0x380
037f 0801       |    |		Execute_Immediate	Raise,0x1
0380 8602       |    |		Call	0x3,0x2
0381 4801       |H   |		Short_Literal	0x1
0382 00d9       |    |		Load_Top	At_Offset_1
0383 0253       | S  |		Execute	Discrete,Binary_Scale
0384 00d8       |    |		Load_Top	At_Offset_0
0385 e7fb       |    |		Load	0x3,-0x5
0386 0260       | `  |		Execute	Discrete,In_Type
0387 7001       |p   |		Jump_Nonzero	0x389
0388 0801       |    |		Execute_Immediate	Raise,0x1
0389 4802       |H   |		Short_Literal	0x2
038a e7fc       |    |		Load	0x3,-0x4
038b 4803       |H   |		Short_Literal	0x3
038c 0270       | p  |		Execute	Discrete,Divide
038d 026d       | m  |		Execute	Discrete,Exponentiate
038e 0aff       |    |		Execute_Immediate	Plus,-0x1
038f 4802       |H   |		Short_Literal	0x2
0390 e7fc       |    |		Load	0x3,-0x4
0391 4803       |H   |		Short_Literal	0x3
0392 0270       | p  |		Execute	Discrete,Divide
0393 026d       | m  |		Execute	Discrete,Exponentiate
0394 0271       | q  |		Execute	Discrete,Times
0395 00d8       |    |		Load_Top	At_Offset_0
0396 e7fb       |    |		Load	0x3,-0x5
0397 0260       | `  |		Execute	Discrete,In_Type
0398 7001       |p   |		Jump_Nonzero	0x39a
0399 0801       |    |		Execute_Immediate	Raise,0x1
039a 8602       |    |		Call	0x3,0x2
039b 4802       |H   |		Short_Literal	0x2
039c e7fc       |    |		Load	0x3,-0x4
039d 4803       |H   |		Short_Literal	0x3
039e 0270       | p  |		Execute	Discrete,Divide
039f 026d       | m  |		Execute	Discrete,Exponentiate
03a0 0aff       |    |		Execute_Immediate	Plus,-0x1
03a1 4802       |H   |		Short_Literal	0x2
03a2 e7fc       |    |		Load	0x3,-0x4
03a3 4803       |H   |		Short_Literal	0x3
03a4 0270       | p  |		Execute	Discrete,Divide
03a5 026d       | m  |		Execute	Discrete,Exponentiate
03a6 0271       | q  |		Execute	Discrete,Times
03a7 00d8       |    |		Load_Top	At_Offset_0
03a8 e7fb       |    |		Load	0x3,-0x5
03a9 0260       | `  |		Execute	Discrete,In_Type
03aa 7001       |p   |		Jump_Nonzero	0x3ac
03ab 0801       |    |		Execute_Immediate	Raise,0x1
03ac 4801       |H   |		Short_Literal	0x1
03ad 00da       |    |		Load_Top	At_Offset_2
03ae 0253       | S  |		Execute	Discrete,Binary_Scale
03af 00d8       |    |		Load_Top	At_Offset_0
03b0 e7fb       |    |		Load	0x3,-0x5
03b1 0260       | `  |		Execute	Discrete,In_Type
03b2 7001       |p   |		Jump_Nonzero	0x3b4
03b3 0801       |    |		Execute_Immediate	Raise,0x1
03b4 8602       |    |		Call	0x3,0x2
03b5 00c8       |    |		Action	Pop_Auxiliary_Range
03b6 3faa       |?   |		Loop_Increasing	0x361
03b7 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03bd       |    |		.CONST	0x03bd								; Address of begin
03b9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ba 0002       |    |		.CONST	0x0002								; Number of locals
03bb			INIT_03b8:
03bb 029f 05eb  |    |		Declare_Subprogram	INIT_05e8,For_Call
03bd			BODY_03b8:
03bd e7fb       |    |		Load	0x3,-0x5
03be 026a       | j  |		Execute	Discrete,First
03bf 00d8       |    |		Load_Top	At_Offset_0
03c0 e7fb       |    |		Load	0x3,-0x5
03c1 0260       | `  |		Execute	Discrete,In_Type
03c2 7001       |p   |		Jump_Nonzero	0x3c4
03c3 0801       |    |		Execute_Immediate	Raise,0x1
03c4 8602       |    |		Call	0x3,0x2
03c5 e7fb       |    |		Load	0x3,-0x5
03c6 0269       | i  |		Execute	Discrete,Last
03c7 00d8       |    |		Load_Top	At_Offset_0
03c8 e7fb       |    |		Load	0x3,-0x5
03c9 0260       | `  |		Execute	Discrete,In_Type
03ca 7001       |p   |		Jump_Nonzero	0x3cc
03cb 0801       |    |		Execute_Immediate	Raise,0x1
03cc 8602       |    |		Call	0x3,0x2
03cd 4801       |H   |		Short_Literal	0x1
03ce 00d8       |    |		Load_Top	At_Offset_0
03cf e7fb       |    |		Load	0x3,-0x5
03d0 0260       | `  |		Execute	Discrete,In_Type
03d1 7001       |p   |		Jump_Nonzero	0x3d3
03d2 0801       |    |		Execute_Immediate	Raise,0x1
03d3 8602       |    |		Call	0x3,0x2
03d4 4802       |H   |		Short_Literal	0x2
03d5 00d8       |    |		Load_Top	At_Offset_0
03d6 e7fb       |    |		Load	0x3,-0x5
03d7 0260       | `  |		Execute	Discrete,In_Type
03d8 7001       |p   |		Jump_Nonzero	0x3da
03d9 0801       |    |		Execute_Immediate	Raise,0x1
03da 8602       |    |		Call	0x3,0x2
03db 4803       |H   |		Short_Literal	0x3
03dc 00d8       |    |		Load_Top	At_Offset_0
03dd e7fb       |    |		Load	0x3,-0x5
03de 0260       | `  |		Execute	Discrete,In_Type
03df 7001       |p   |		Jump_Nonzero	0x3e1
03e0 0801       |    |		Execute_Immediate	Raise,0x1
03e1 8602       |    |		Call	0x3,0x2
03e2 480f       |H   |		Short_Literal	0xf
03e3 00d8       |    |		Load_Top	At_Offset_0
03e4 e7fb       |    |		Load	0x3,-0x5
03e5 0260       | `  |		Execute	Discrete,In_Type
03e6 7001       |p   |		Jump_Nonzero	0x3e8
03e7 0801       |    |		Execute_Immediate	Raise,0x1
03e8 8602       |    |		Call	0x3,0x2
03e9 4800       |H   |		Short_Literal	0x0
03ea 00d8       |    |		Load_Top	At_Offset_0
03eb e7fb       |    |		Load	0x3,-0x5
03ec 0260       | `  |		Execute	Discrete,In_Type
03ed 7001       |p   |		Jump_Nonzero	0x3ef
03ee 0801       |    |		Execute_Immediate	Raise,0x1
03ef 8602       |    |		Call	0x3,0x2
03f0 480d       |H   |		Short_Literal	0xd
03f1 00d8       |    |		Load_Top	At_Offset_0
03f2 e7fb       |    |		Load	0x3,-0x5
03f3 0260       | `  |		Execute	Discrete,In_Type
03f4 7001       |p   |		Jump_Nonzero	0x3f6
03f5 0801       |    |		Execute_Immediate	Raise,0x1
03f6 8602       |    |		Call	0x3,0x2
03f7 4802       |H   |		Short_Literal	0x2
03f8 e7fc       |    |		Load	0x3,-0x4
03f9 4803       |H   |		Short_Literal	0x3
03fa 0270       | p  |		Execute	Discrete,Divide
03fb 026d       | m  |		Execute	Discrete,Exponentiate
03fc 0aff       |    |		Execute_Immediate	Plus,-0x1
03fd 4802       |H   |		Short_Literal	0x2
03fe e7fc       |    |		Load	0x3,-0x4
03ff 4803       |H   |		Short_Literal	0x3
0400 0270       | p  |		Execute	Discrete,Divide
0401 026d       | m  |		Execute	Discrete,Exponentiate
0402 0271       | q  |		Execute	Discrete,Times
0403 00d8       |    |		Load_Top	At_Offset_0
0404 e7fb       |    |		Load	0x3,-0x5
0405 0260       | `  |		Execute	Discrete,In_Type
0406 7001       |p   |		Jump_Nonzero	0x408
0407 0801       |    |		Execute_Immediate	Raise,0x1
0408 8602       |    |		Call	0x3,0x2
0409 00cf       |    |		Action	Mark_Auxiliary
040a e7fc       |    |		Load	0x3,-0x4
040b 0afe       |    |		Execute_Immediate	Plus,-0x2
040c 4800       |H   |		Short_Literal	0x0
040d 0263       | c  |		Execute	Discrete,Above_Bound
040e 700b       |p   |		Jump_Nonzero	0x41a
040f 4801       |H   |		Short_Literal	0x1
0410 00d9       |    |		Load_Top	At_Offset_1
0411 0253       | S  |		Execute	Discrete,Binary_Scale
0412 00d8       |    |		Load_Top	At_Offset_0
0413 e7fb       |    |		Load	0x3,-0x5
0414 0260       | `  |		Execute	Discrete,In_Type
0415 7001       |p   |		Jump_Nonzero	0x417
0416 0801       |    |		Execute_Immediate	Raise,0x1
0417 8602       |    |		Call	0x3,0x2
0418 00c8       |    |		Action	Pop_Auxiliary_Range
0419 3ff5       |?   |		Loop_Increasing	0x40f
041a 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
041b 0000 0000  |    |		.BLANK	0000[0x5]
0420 ; --------------------------------------------------------------------------------------
0420 ; SUBPROGRAM
0420 ; --------------------------------------------------------------------------------------
0420 0425       | %  |		.CONST	0x0425								; Address of begin
0421 0004       |    |		.CONST	0x0004								; Address of exception handler
0422 0002       |    |		.CONST	0x0002								; Number of locals
0423			INIT_0420:
0423 029f 060b  |    |		Declare_Subprogram	INIT_0608,For_Call
0425			BODY_0420:
0425 00cf       |    |		Action	Mark_Auxiliary
0426 e7fc       |    |		Load	0x3,-0x4
0427 4800       |H   |		Short_Literal	0x0
0428 0263       | c  |		Execute	Discrete,Above_Bound
0429 705b       |p[  |		Jump_Nonzero	0x485
042a 00d8       |    |		Load_Top	At_Offset_0
042b e7fb       |    |		Load	0x3,-0x5
042c 026a       | j  |		Execute	Discrete,First
042d 00d8       |    |		Load_Top	At_Offset_0
042e e7fb       |    |		Load	0x3,-0x5
042f 0260       | `  |		Execute	Discrete,In_Type
0430 7001       |p   |		Jump_Nonzero	0x432
0431 0801       |    |		Execute_Immediate	Raise,0x1
0432 8602       |    |		Call	0x3,0x2
0433 00d8       |    |		Load_Top	At_Offset_0
0434 0275       | u  |		Execute	Discrete,Unary_Minus
0435 e7fb       |    |		Load	0x3,-0x5
0436 026a       | j  |		Execute	Discrete,First
0437 00d8       |    |		Load_Top	At_Offset_0
0438 e7fb       |    |		Load	0x3,-0x5
0439 0260       | `  |		Execute	Discrete,In_Type
043a 7001       |p   |		Jump_Nonzero	0x43c
043b 0801       |    |		Execute_Immediate	Raise,0x1
043c 8602       |    |		Call	0x3,0x2
043d 00d8       |    |		Load_Top	At_Offset_0
043e e7fb       |    |		Load	0x3,-0x5
043f 0269       | i  |		Execute	Discrete,Last
0440 00d8       |    |		Load_Top	At_Offset_0
0441 e7fb       |    |		Load	0x3,-0x5
0442 0260       | `  |		Execute	Discrete,In_Type
0443 7001       |p   |		Jump_Nonzero	0x445
0444 0801       |    |		Execute_Immediate	Raise,0x1
0445 8602       |    |		Call	0x3,0x2
0446 00d8       |    |		Load_Top	At_Offset_0
0447 0275       | u  |		Execute	Discrete,Unary_Minus
0448 e7fb       |    |		Load	0x3,-0x5
0449 0269       | i  |		Execute	Discrete,Last
044a 00d8       |    |		Load_Top	At_Offset_0
044b e7fb       |    |		Load	0x3,-0x5
044c 0260       | `  |		Execute	Discrete,In_Type
044d 7001       |p   |		Jump_Nonzero	0x44f
044e 0801       |    |		Execute_Immediate	Raise,0x1
044f 8602       |    |		Call	0x3,0x2
0450 00d8       |    |		Load_Top	At_Offset_0
0451 4800       |H   |		Short_Literal	0x0
0452 00d8       |    |		Load_Top	At_Offset_0
0453 e7fb       |    |		Load	0x3,-0x5
0454 0260       | `  |		Execute	Discrete,In_Type
0455 7001       |p   |		Jump_Nonzero	0x457
0456 0801       |    |		Execute_Immediate	Raise,0x1
0457 8602       |    |		Call	0x3,0x2
0458 00d8       |    |		Load_Top	At_Offset_0
0459 0275       | u  |		Execute	Discrete,Unary_Minus
045a 4800       |H   |		Short_Literal	0x0
045b 00d8       |    |		Load_Top	At_Offset_0
045c e7fb       |    |		Load	0x3,-0x5
045d 0260       | `  |		Execute	Discrete,In_Type
045e 7001       |p   |		Jump_Nonzero	0x460
045f 0801       |    |		Execute_Immediate	Raise,0x1
0460 8602       |    |		Call	0x3,0x2
0461 00d8       |    |		Load_Top	At_Offset_0
0462 4801       |H   |		Short_Literal	0x1
0463 00d8       |    |		Load_Top	At_Offset_0
0464 e7fb       |    |		Load	0x3,-0x5
0465 0260       | `  |		Execute	Discrete,In_Type
0466 7001       |p   |		Jump_Nonzero	0x468
0467 0801       |    |		Execute_Immediate	Raise,0x1
0468 8602       |    |		Call	0x3,0x2
0469 00d8       |    |		Load_Top	At_Offset_0
046a 0275       | u  |		Execute	Discrete,Unary_Minus
046b 4801       |H   |		Short_Literal	0x1
046c 00d8       |    |		Load_Top	At_Offset_0
046d e7fb       |    |		Load	0x3,-0x5
046e 0260       | `  |		Execute	Discrete,In_Type
046f 7001       |p   |		Jump_Nonzero	0x471
0470 0801       |    |		Execute_Immediate	Raise,0x1
0471 8602       |    |		Call	0x3,0x2
0472 00d8       |    |		Load_Top	At_Offset_0
0473 480f       |H   |		Short_Literal	0xf
0474 00d8       |    |		Load_Top	At_Offset_0
0475 e7fb       |    |		Load	0x3,-0x5
0476 0260       | `  |		Execute	Discrete,In_Type
0477 7001       |p   |		Jump_Nonzero	0x479
0478 0801       |    |		Execute_Immediate	Raise,0x1
0479 8602       |    |		Call	0x3,0x2
047a 00d8       |    |		Load_Top	At_Offset_0
047b 0275       | u  |		Execute	Discrete,Unary_Minus
047c 480f       |H   |		Short_Literal	0xf
047d 00d8       |    |		Load_Top	At_Offset_0
047e e7fb       |    |		Load	0x3,-0x5
047f 0260       | `  |		Execute	Discrete,In_Type
0480 7001       |p   |		Jump_Nonzero	0x482
0481 0801       |    |		Execute_Immediate	Raise,0x1
0482 8602       |    |		Call	0x3,0x2
0483 00c8       |    |		Action	Pop_Auxiliary_Range
0484 3fa5       |?   |		Loop_Increasing	0x42a
0485 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0486 0000 0000  |    |		.XXX[0x2]
0488 ; --------------------------------------------------------------------------------------
0488 ; SUBPROGRAM
0488 ; --------------------------------------------------------------------------------------
0488 048b       |    |		.CONST	0x048b								; Address of begin
0489 0004       |    |		.CONST	0x0004								; Address of exception handler
048a 0001       |    |		.CONST	0x0001								; Number of locals
048b			BODY_0488:
048b			INIT_0488:
048b 00db       |    |		Load_Top	At_Offset_3
048c 00d8       |    |		Load_Top	At_Offset_0
048d e002       |    |		Load	0x0,0x2
048e 0260       | `  |		Execute	Discrete,In_Type
048f 7001       |p   |		Jump_Nonzero	0x491
0490 0801       |    |		Execute_Immediate	Raise,0x1
0491 00db       |    |		Load_Top	At_Offset_3
0492 00d8       |    |		Load_Top	At_Offset_0
0493 e002       |    |		Load	0x0,0x2
0494 0260       | `  |		Execute	Discrete,In_Type
0495 7001       |p   |		Jump_Nonzero	0x497
0496 0801       |    |		Execute_Immediate	Raise,0x1
0497 8019       |    |		Call	0x0,0x19
0498 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0499 0000 0000  |    |		.BLANK	0000[0x7]
04a0 ; --------------------------------------------------------------------------------------
04a0 ; SUBPROGRAM
04a0 ; --------------------------------------------------------------------------------------
04a0 04a3       |    |		.CONST	0x04a3								; Address of begin
04a1 0004       |    |		.CONST	0x0004								; Address of exception handler
04a2 0001       |    |		.CONST	0x0001								; Number of locals
04a3			BODY_04a0:
04a3			INIT_04a0:
04a3 00db       |    |		Load_Top	At_Offset_3
04a4 00d8       |    |		Load_Top	At_Offset_0
04a5 e005       |    |		Load	0x0,0x5
04a6 0260       | `  |		Execute	Discrete,In_Type
04a7 7001       |p   |		Jump_Nonzero	0x4a9
04a8 0801       |    |		Execute_Immediate	Raise,0x1
04a9 00db       |    |		Load_Top	At_Offset_3
04aa 00d8       |    |		Load_Top	At_Offset_0
04ab e005       |    |		Load	0x0,0x5
04ac 0260       | `  |		Execute	Discrete,In_Type
04ad 7001       |p   |		Jump_Nonzero	0x4af
04ae 0801       |    |		Execute_Immediate	Raise,0x1
04af 801a       |    |		Call	0x0,0x1a
04b0 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
04b1 0000 0000  |    |		.BLANK	0000[0x7]
04b8 ; --------------------------------------------------------------------------------------
04b8 ; SUBPROGRAM
04b8 ; --------------------------------------------------------------------------------------
04b8 04bb       |    |		.CONST	0x04bb								; Address of begin
04b9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ba 0001       |    |		.CONST	0x0001								; Number of locals
04bb			BODY_04b8:
04bb			INIT_04b8:
04bb 00db       |    |		Load_Top	At_Offset_3
04bc 00d8       |    |		Load_Top	At_Offset_0
04bd e007       |    |		Load	0x0,0x7
04be 0260       | `  |		Execute	Discrete,In_Type
04bf 7001       |p   |		Jump_Nonzero	0x4c1
04c0 0801       |    |		Execute_Immediate	Raise,0x1
04c1 00db       |    |		Load_Top	At_Offset_3
04c2 00d8       |    |		Load_Top	At_Offset_0
04c3 e007       |    |		Load	0x0,0x7
04c4 0260       | `  |		Execute	Discrete,In_Type
04c5 7001       |p   |		Jump_Nonzero	0x4c7
04c6 0801       |    |		Execute_Immediate	Raise,0x1
04c7 801b       |    |		Call	0x0,0x1b
04c8 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
04c9 0000 0000  |    |		.BLANK	0000[0x7]
04d0 ; --------------------------------------------------------------------------------------
04d0 ; SUBPROGRAM
04d0 ; --------------------------------------------------------------------------------------
04d0 04d3       |    |		.CONST	0x04d3								; Address of begin
04d1 0004       |    |		.CONST	0x0004								; Address of exception handler
04d2 0001       |    |		.CONST	0x0001								; Number of locals
04d3			BODY_04d0:
04d3			INIT_04d0:
04d3 00db       |    |		Load_Top	At_Offset_3
04d4 00d8       |    |		Load_Top	At_Offset_0
04d5 e002       |    |		Load	0x0,0x2
04d6 0260       | `  |		Execute	Discrete,In_Type
04d7 7001       |p   |		Jump_Nonzero	0x4d9
04d8 0801       |    |		Execute_Immediate	Raise,0x1
04d9 00db       |    |		Load_Top	At_Offset_3
04da 00d8       |    |		Load_Top	At_Offset_0
04db e002       |    |		Load	0x0,0x2
04dc 0260       | `  |		Execute	Discrete,In_Type
04dd 7001       |p   |		Jump_Nonzero	0x4df
04de 0801       |    |		Execute_Immediate	Raise,0x1
04df 801c       |    |		Call	0x0,0x1c
04e0 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
04e1 0000 0000  |    |		.BLANK	0000[0x7]
04e8 ; --------------------------------------------------------------------------------------
04e8 ; SUBPROGRAM
04e8 ; --------------------------------------------------------------------------------------
04e8 04eb       |    |		.CONST	0x04eb								; Address of begin
04e9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ea 0001       |    |		.CONST	0x0001								; Number of locals
04eb			BODY_04e8:
04eb			INIT_04e8:
04eb 00db       |    |		Load_Top	At_Offset_3
04ec 00d8       |    |		Load_Top	At_Offset_0
04ed e005       |    |		Load	0x0,0x5
04ee 0260       | `  |		Execute	Discrete,In_Type
04ef 7001       |p   |		Jump_Nonzero	0x4f1
04f0 0801       |    |		Execute_Immediate	Raise,0x1
04f1 00db       |    |		Load_Top	At_Offset_3
04f2 00d8       |    |		Load_Top	At_Offset_0
04f3 e005       |    |		Load	0x0,0x5
04f4 0260       | `  |		Execute	Discrete,In_Type
04f5 7001       |p   |		Jump_Nonzero	0x4f7
04f6 0801       |    |		Execute_Immediate	Raise,0x1
04f7 801d       |    |		Call	0x0,0x1d
04f8 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
04f9 0000 0000  |    |		.BLANK	0000[0x7]
0500 ; --------------------------------------------------------------------------------------
0500 ; SUBPROGRAM
0500 ; --------------------------------------------------------------------------------------
0500 0503       |    |		.CONST	0x0503								; Address of begin
0501 0004       |    |		.CONST	0x0004								; Address of exception handler
0502 0001       |    |		.CONST	0x0001								; Number of locals
0503			BODY_0500:
0503			INIT_0500:
0503 00db       |    |		Load_Top	At_Offset_3
0504 00d8       |    |		Load_Top	At_Offset_0
0505 e007       |    |		Load	0x0,0x7
0506 0260       | `  |		Execute	Discrete,In_Type
0507 7001       |p   |		Jump_Nonzero	0x509
0508 0801       |    |		Execute_Immediate	Raise,0x1
0509 00db       |    |		Load_Top	At_Offset_3
050a 00d8       |    |		Load_Top	At_Offset_0
050b e007       |    |		Load	0x0,0x7
050c 0260       | `  |		Execute	Discrete,In_Type
050d 7001       |p   |		Jump_Nonzero	0x50f
050e 0801       |    |		Execute_Immediate	Raise,0x1
050f 801e       |    |		Call	0x0,0x1e
0510 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0511 0000 0000  |    |		.BLANK	0000[0x7]
0518 ; --------------------------------------------------------------------------------------
0518 ; SUBPROGRAM
0518 ; --------------------------------------------------------------------------------------
0518 051b       |    |		.CONST	0x051b								; Address of begin
0519 0004       |    |		.CONST	0x0004								; Address of exception handler
051a 0001       |    |		.CONST	0x0001								; Number of locals
051b			BODY_0518:
051b			INIT_0518:
051b 00db       |    |		Load_Top	At_Offset_3
051c 00d8       |    |		Load_Top	At_Offset_0
051d e002       |    |		Load	0x0,0x2
051e 0260       | `  |		Execute	Discrete,In_Type
051f 7001       |p   |		Jump_Nonzero	0x521
0520 0801       |    |		Execute_Immediate	Raise,0x1
0521 00db       |    |		Load_Top	At_Offset_3
0522 00d8       |    |		Load_Top	At_Offset_0
0523 e002       |    |		Load	0x0,0x2
0524 0260       | `  |		Execute	Discrete,In_Type
0525 7001       |p   |		Jump_Nonzero	0x527
0526 0801       |    |		Execute_Immediate	Raise,0x1
0527 801f       |    |		Call	0x0,0x1f
0528 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0529 0000 0000  |    |		.BLANK	0000[0x7]
0530 ; --------------------------------------------------------------------------------------
0530 ; SUBPROGRAM
0530 ; --------------------------------------------------------------------------------------
0530 0533       | 3  |		.CONST	0x0533								; Address of begin
0531 0004       |    |		.CONST	0x0004								; Address of exception handler
0532 0001       |    |		.CONST	0x0001								; Number of locals
0533			BODY_0530:
0533			INIT_0530:
0533 00db       |    |		Load_Top	At_Offset_3
0534 00d8       |    |		Load_Top	At_Offset_0
0535 e005       |    |		Load	0x0,0x5
0536 0260       | `  |		Execute	Discrete,In_Type
0537 7001       |p   |		Jump_Nonzero	0x539
0538 0801       |    |		Execute_Immediate	Raise,0x1
0539 00db       |    |		Load_Top	At_Offset_3
053a 00d8       |    |		Load_Top	At_Offset_0
053b e005       |    |		Load	0x0,0x5
053c 0260       | `  |		Execute	Discrete,In_Type
053d 7001       |p   |		Jump_Nonzero	0x53f
053e 0801       |    |		Execute_Immediate	Raise,0x1
053f 8020       |    |		Call	0x0,0x20
0540 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0541 0000 0000  |    |		.BLANK	0000[0x7]
0548 ; --------------------------------------------------------------------------------------
0548 ; SUBPROGRAM
0548 ; --------------------------------------------------------------------------------------
0548 054b       | K  |		.CONST	0x054b								; Address of begin
0549 0004       |    |		.CONST	0x0004								; Address of exception handler
054a 0001       |    |		.CONST	0x0001								; Number of locals
054b			BODY_0548:
054b			INIT_0548:
054b 00db       |    |		Load_Top	At_Offset_3
054c 00d8       |    |		Load_Top	At_Offset_0
054d e007       |    |		Load	0x0,0x7
054e 0260       | `  |		Execute	Discrete,In_Type
054f 7001       |p   |		Jump_Nonzero	0x551
0550 0801       |    |		Execute_Immediate	Raise,0x1
0551 00db       |    |		Load_Top	At_Offset_3
0552 00d8       |    |		Load_Top	At_Offset_0
0553 e007       |    |		Load	0x0,0x7
0554 0260       | `  |		Execute	Discrete,In_Type
0555 7001       |p   |		Jump_Nonzero	0x557
0556 0801       |    |		Execute_Immediate	Raise,0x1
0557 8021       | !  |		Call	0x0,0x21
0558 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0559 0000 0000  |    |		.BLANK	0000[0x7]
0560 ; --------------------------------------------------------------------------------------
0560 ; SUBPROGRAM
0560 ; --------------------------------------------------------------------------------------
0560 0563       | c  |		.CONST	0x0563								; Address of begin
0561 0004       |    |		.CONST	0x0004								; Address of exception handler
0562 0001       |    |		.CONST	0x0001								; Number of locals
0563			BODY_0560:
0563			INIT_0560:
0563 00da       |    |		Load_Top	At_Offset_2
0564 00d8       |    |		Load_Top	At_Offset_0
0565 e002       |    |		Load	0x0,0x2
0566 0260       | `  |		Execute	Discrete,In_Type
0567 7001       |p   |		Jump_Nonzero	0x569
0568 0801       |    |		Execute_Immediate	Raise,0x1
0569 8022       | "  |		Call	0x0,0x22
056a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
056b 0000 0000  |    |		.BLANK	0000[0x5]
0570 ; --------------------------------------------------------------------------------------
0570 ; SUBPROGRAM
0570 ; --------------------------------------------------------------------------------------
0570 0573       | s  |		.CONST	0x0573								; Address of begin
0571 0004       |    |		.CONST	0x0004								; Address of exception handler
0572 0001       |    |		.CONST	0x0001								; Number of locals
0573			BODY_0570:
0573			INIT_0570:
0573 00da       |    |		Load_Top	At_Offset_2
0574 00d8       |    |		Load_Top	At_Offset_0
0575 e005       |    |		Load	0x0,0x5
0576 0260       | `  |		Execute	Discrete,In_Type
0577 7001       |p   |		Jump_Nonzero	0x579
0578 0801       |    |		Execute_Immediate	Raise,0x1
0579 8023       | #  |		Call	0x0,0x23
057a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
057b 0000 0000  |    |		.BLANK	0000[0x5]
0580 ; --------------------------------------------------------------------------------------
0580 ; SUBPROGRAM
0580 ; --------------------------------------------------------------------------------------
0580 0583       |    |		.CONST	0x0583								; Address of begin
0581 0004       |    |		.CONST	0x0004								; Address of exception handler
0582 0001       |    |		.CONST	0x0001								; Number of locals
0583			BODY_0580:
0583			INIT_0580:
0583 00da       |    |		Load_Top	At_Offset_2
0584 00d8       |    |		Load_Top	At_Offset_0
0585 e007       |    |		Load	0x0,0x7
0586 0260       | `  |		Execute	Discrete,In_Type
0587 7001       |p   |		Jump_Nonzero	0x589
0588 0801       |    |		Execute_Immediate	Raise,0x1
0589 8024       | $  |		Call	0x0,0x24
058a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
058b 0000 0000  |    |		.BLANK	0000[0x5]
0590 ; --------------------------------------------------------------------------------------
0590 ; SUBPROGRAM
0590 ; --------------------------------------------------------------------------------------
0590 0593       |    |		.CONST	0x0593								; Address of begin
0591 0004       |    |		.CONST	0x0004								; Address of exception handler
0592 0001       |    |		.CONST	0x0001								; Number of locals
0593			BODY_0590:
0593			INIT_0590:
0593 00db       |    |		Load_Top	At_Offset_3
0594 00db       |    |		Load_Top	At_Offset_3
0595 00d8       |    |		Load_Top	At_Offset_0
0596 e002       |    |		Load	0x0,0x2
0597 0260       | `  |		Execute	Discrete,In_Type
0598 7001       |p   |		Jump_Nonzero	0x59a
0599 0801       |    |		Execute_Immediate	Raise,0x1
059a 8025       | %  |		Call	0x0,0x25
059b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
059c 0000 0000  |    |		.BLANK	0000[0x4]
05a0 ; --------------------------------------------------------------------------------------
05a0 ; SUBPROGRAM
05a0 ; --------------------------------------------------------------------------------------
05a0 05a3       |    |		.CONST	0x05a3								; Address of begin
05a1 0004       |    |		.CONST	0x0004								; Address of exception handler
05a2 0001       |    |		.CONST	0x0001								; Number of locals
05a3			BODY_05a0:
05a3			INIT_05a0:
05a3 00db       |    |		Load_Top	At_Offset_3
05a4 00db       |    |		Load_Top	At_Offset_3
05a5 00d8       |    |		Load_Top	At_Offset_0
05a6 e005       |    |		Load	0x0,0x5
05a7 0260       | `  |		Execute	Discrete,In_Type
05a8 7001       |p   |		Jump_Nonzero	0x5aa
05a9 0801       |    |		Execute_Immediate	Raise,0x1
05aa 8026       | &  |		Call	0x0,0x26
05ab 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
05ac 0000 0000  |    |		.BLANK	0000[0x4]
05b0 ; --------------------------------------------------------------------------------------
05b0 ; SUBPROGRAM
05b0 ; --------------------------------------------------------------------------------------
05b0 05b3       |    |		.CONST	0x05b3								; Address of begin
05b1 0004       |    |		.CONST	0x0004								; Address of exception handler
05b2 0001       |    |		.CONST	0x0001								; Number of locals
05b3			BODY_05b0:
05b3			INIT_05b0:
05b3 00db       |    |		Load_Top	At_Offset_3
05b4 00db       |    |		Load_Top	At_Offset_3
05b5 00d8       |    |		Load_Top	At_Offset_0
05b6 e007       |    |		Load	0x0,0x7
05b7 0260       | `  |		Execute	Discrete,In_Type
05b8 7001       |p   |		Jump_Nonzero	0x5ba
05b9 0801       |    |		Execute_Immediate	Raise,0x1
05ba 8027       | '  |		Call	0x0,0x27
05bb 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
05bc 0000 0000  |    |		.BLANK	0000[0x4]
05c0 ; --------------------------------------------------------------------------------------
05c0 ; SUBPROGRAM
05c0 ; --------------------------------------------------------------------------------------
05c0 05c3       |    |		.CONST	0x05c3								; Address of begin
05c1 0004       |    |		.CONST	0x0004								; Address of exception handler
05c2 0001       |    |		.CONST	0x0001								; Number of locals
05c3			BODY_05c0:
05c3			INIT_05c0:
05c3 e7fc       |    |		Load	0x3,-0x4
05c4 09fe       |    |		Execute_Immediate	Binary_Scale,-0x2
05c5 0a04       |    |		Execute_Immediate	Plus,0x4
05c6 00d8       |    |		Load_Top	At_Offset_0
05c7 00e3       |    |		Load_Encached	Natural_Cache
05c8 0260       | `  |		Execute	Discrete,In_Type
05c9 7001       |p   |		Jump_Nonzero	0x5cb
05ca 0801       |    |		Execute_Immediate	Raise,0x1
05cb e9fe       |    |		Load	0x4,-0x2
05cc e9ff       |    |		Load	0x4,-0x1
05cd 87fe       |    |		Call	0x3,-0x2
05ce 00d8       |    |		Load_Top	At_Offset_0
05cf e002       |    |		Load	0x0,0x2
05d0 0260       | `  |		Execute	Discrete,In_Type
05d1 7001       |p   |		Jump_Nonzero	0x5d3
05d2 0801       |    |		Execute_Immediate	Raise,0x1
05d3 e9fe       |    |		Load	0x4,-0x2
05d4 00d8       |    |		Load_Top	At_Offset_0
05d5 e002       |    |		Load	0x0,0x2
05d6 0260       | `  |		Execute	Discrete,In_Type
05d7 7001       |p   |		Jump_Nonzero	0x5d9
05d8 0801       |    |		Execute_Immediate	Raise,0x1
05d9 e7fd       |    |		Load	0x3,-0x3
05da e9ff       |    |		Load	0x4,-0x1
05db 00d8       |    |		Load_Top	At_Offset_0
05dc e002       |    |		Load	0x0,0x2
05dd 0260       | `  |		Execute	Discrete,In_Type
05de 7001       |p   |		Jump_Nonzero	0x5e0
05df 0801       |    |		Execute_Immediate	Raise,0x1
05e0 8402       |    |		Call	0x2,0x2
05e1 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05e2 0000 0000  |    |		.BLANK	0000[0x6]
05e8 ; --------------------------------------------------------------------------------------
05e8 ; SUBPROGRAM
05e8 ; --------------------------------------------------------------------------------------
05e8 05eb       |    |		.CONST	0x05eb								; Address of begin
05e9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ea 0001       |    |		.CONST	0x0001								; Number of locals
05eb			BODY_05e8:
05eb			INIT_05e8:
05eb e7fc       |    |		Load	0x3,-0x4
05ec 09fe       |    |		Execute_Immediate	Binary_Scale,-0x2
05ed 0a04       |    |		Execute_Immediate	Plus,0x4
05ee 00d8       |    |		Load_Top	At_Offset_0
05ef 00e3       |    |		Load_Encached	Natural_Cache
05f0 0260       | `  |		Execute	Discrete,In_Type
05f1 7001       |p   |		Jump_Nonzero	0x5f3
05f2 0801       |    |		Execute_Immediate	Raise,0x1
05f3 00db       |    |		Load_Top	At_Offset_3
05f4 87fe       |    |		Call	0x3,-0x2
05f5 00d8       |    |		Load_Top	At_Offset_0
05f6 e002       |    |		Load	0x0,0x2
05f7 0260       | `  |		Execute	Discrete,In_Type
05f8 7001       |p   |		Jump_Nonzero	0x5fa
05f9 0801       |    |		Execute_Immediate	Raise,0x1
05fa e9ff       |    |		Load	0x4,-0x1
05fb 00d8       |    |		Load_Top	At_Offset_0
05fc e002       |    |		Load	0x0,0x2
05fd 0260       | `  |		Execute	Discrete,In_Type
05fe 7001       |p   |		Jump_Nonzero	0x600
05ff 0801       |    |		Execute_Immediate	Raise,0x1
0600 e7fd       |    |		Load	0x3,-0x3
0601 8403       |    |		Call	0x2,0x3
0602 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0603 0000 0000  |    |		.BLANK	0000[0x5]
0608 ; --------------------------------------------------------------------------------------
0608 ; SUBPROGRAM
0608 ; --------------------------------------------------------------------------------------
0608 060b       |    |		.CONST	0x060b								; Address of begin
0609 0004       |    |		.CONST	0x0004								; Address of exception handler
060a 0001       |    |		.CONST	0x0001								; Number of locals
060b			BODY_0608:
060b			INIT_0608:
060b e7fc       |    |		Load	0x3,-0x4
060c 09fe       |    |		Execute_Immediate	Binary_Scale,-0x2
060d 0a04       |    |		Execute_Immediate	Plus,0x4
060e 00d8       |    |		Load_Top	At_Offset_0
060f 00e3       |    |		Load_Encached	Natural_Cache
0610 0260       | `  |		Execute	Discrete,In_Type
0611 7001       |p   |		Jump_Nonzero	0x613
0612 0801       |    |		Execute_Immediate	Raise,0x1
0613 e9fe       |    |		Load	0x4,-0x2
0614 e9ff       |    |		Load	0x4,-0x1
0615 87fe       |    |		Call	0x3,-0x2
0616 00d8       |    |		Load_Top	At_Offset_0
0617 e002       |    |		Load	0x0,0x2
0618 0260       | `  |		Execute	Discrete,In_Type
0619 7001       |p   |		Jump_Nonzero	0x61b
061a 0801       |    |		Execute_Immediate	Raise,0x1
061b e9fe       |    |		Load	0x4,-0x2
061c e7fd       |    |		Load	0x3,-0x3
061d e9ff       |    |		Load	0x4,-0x1
061e 00d8       |    |		Load_Top	At_Offset_0
061f e002       |    |		Load	0x0,0x2
0620 0260       | `  |		Execute	Discrete,In_Type
0621 7001       |p   |		Jump_Nonzero	0x623
0622 0801       |    |		Execute_Immediate	Raise,0x1
0623 8402       |    |		Call	0x2,0x2
0624 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0625 ; --------------------------------------------------------------------------------------
0625 ; STRING TABLE
0625 ; --------------------------------------------------------------------------------------
0625 000e       |    |		.STRTAB	0x000e->0x062c							; "and"
0626 000f       |    |		.STRTAB	0x000f->0x062d							; "or"
0627 000f       |    |		.STRTAB	0x000f->0x062e							; "xor"
0628 0010       |    |		.STRTAB	0x0010->0x0630							; "not"
0629 0011       |    |		.STRTAB	0x0011->0x0631							; "shift"
062a 0014       |    |		.STRTAB	0x0014->0x0634							; " => "
062b 0016       |    |		.STREND 0x0016->0x0636
062c 616e 646f  |ando|		.STRTAB_STRINGS
0636 0000 0000  |    |		.XXX[0x2]
0638 ; --------------------------------------------------------------------------------------
0638 ; Debug Table
0638 ; --------------------------------------------------------------------------------------
0638 0004 0000  |    |		.DEBUG4	0x0004,0x0000,0x4c70,0x0000,0x0001,0x0019
063e 000b 0000  |    |		.DBG4T	0x000b,0x0000,0x8000,0x0000
0642 001b 06a2  |    |		.DBG4T	0x001b,0x06a2,0x8001,0x0000
0646 0263 06ca  | c  |		.DBG4T	0x0263,0x06ca,0x0001,0x0000
064a 0283 06d4  |    |		.DBG4T	0x0283,0x06d4,0x0001,0x0000
064e 029b 06dc  |    |		.DBG4T	0x029b,0x06dc,0x2801,0x0003
0652 03bb 06f2  |    |		.DBG4T	0x03bb,0x06f2,0x2801,0x0003
0656 0423 0700  | #  |		.DBG4T	0x0423,0x0700,0x2801,0x0003
065a 048b 0000  |    |		.DBG4T	0x048b,0x0000,0x000c,0x0000
065e 04a3 0000  |    |		.DBG4T	0x04a3,0x0000,0x000c,0x0000
0662 04bb 0000  |    |		.DBG4T	0x04bb,0x0000,0x000c,0x0000
0666 04d3 0000  |    |		.DBG4T	0x04d3,0x0000,0x000c,0x0000
066a 04eb 0000  |    |		.DBG4T	0x04eb,0x0000,0x000c,0x0000
066e 0503 0000  |    |		.DBG4T	0x0503,0x0000,0x000c,0x0000
0672 051b 0000  |    |		.DBG4T	0x051b,0x0000,0x000c,0x0000
0676 0533 0000  | 3  |		.DBG4T	0x0533,0x0000,0x000c,0x0000
067a 054b 0000  | K  |		.DBG4T	0x054b,0x0000,0x000c,0x0000
067e 0563 0000  | c  |		.DBG4T	0x0563,0x0000,0x000c,0x0000
0682 0573 0000  | s  |		.DBG4T	0x0573,0x0000,0x000c,0x0000
0686 0583 0000  |    |		.DBG4T	0x0583,0x0000,0x000c,0x0000
068a 0593 0000  |    |		.DBG4T	0x0593,0x0000,0x000c,0x0000
068e 05a3 0000  |    |		.DBG4T	0x05a3,0x0000,0x000c,0x0000
0692 05b3 0000  |    |		.DBG4T	0x05b3,0x0000,0x000c,0x0000
0696 05c3 070e  |    |		.DBG4T	0x05c3,0x070e,0x0801,0x0003
069a 05eb 0711  |    |		.DBG4T	0x05eb,0x0711,0x0801,0x0003
069e 060b 0714  |    |		.DBG4T	0x060b,0x0714,0x0801,0x0003
06a2 ; --------------------------------------------------------------------------------------
06a2 ; Debug chain
06a2 ; --------------------------------------------------------------------------------------
06a2 0017 000f  |    |		.DBGLEN	0x0017,0x000f
06a4 001b 001d  |    |		.DBGLNO	0x001b,0x001d,0x001f,0x0021,0x0025,0x0027,0x002b,0x002d,0x0031,0x0048,0x005f,0x0076,0x008d,0x00a4,0x00bb,0x00d2,0x00e9,0x0100,0x0117,0x012e,0x0145,0x015c,0x0173,0x018a,0x0194,0x019e,0x01a8,0x01b2,0x01bc,0x01c6,0x01d0,0x01da,0x01e4,0x01ee,0x01f8,0x0202,0x020c,0x0216
06ca ; --------------------------------------------------------------------------------------
06ca ; Debug chain
06ca ; --------------------------------------------------------------------------------------
06ca 0000 0008  |    |		.DBGLEN	0x0000,0x0008
06cc 0263 0267  | c g|		.DBGLNO	0x0263,0x0267,0x0269,0x026b,0x026d,0x0271,0x0274,0x0278
06d4 ; --------------------------------------------------------------------------------------
06d4 ; Debug chain
06d4 ; --------------------------------------------------------------------------------------
06d4 0000 0006  |    |		.DBGLEN	0x0000,0x0006
06d6 0283 0285  |    |		.DBGLNO	0x0283,0x0285,0x0287,0x028b,0x028e,0x0292
06dc ; --------------------------------------------------------------------------------------
06dc ; Debug chain
06dc ; --------------------------------------------------------------------------------------
06dc 0001 0013  |    |		.DBGLEN	0x0001,0x0013
06de 029b 029d  |    |		.DBGLNO	0x029b,0x029d,0x02ac,0x02bb,0x02c9,0x02d7,0x02e5,0x02f3,0x0300,0x030d,0x031a,0x0327,0x0334,0x0341,0x034e,0x035c,0x0361,0x0371,0x0381,0x039b
06f2 ; --------------------------------------------------------------------------------------
06f2 ; Debug chain
06f2 ; --------------------------------------------------------------------------------------
06f2 0001 000b  |    |		.DBGLEN	0x0001,0x000b
06f4 03bb 03bd  |    |		.DBGLNO	0x03bb,0x03bd,0x03c5,0x03cd,0x03d4,0x03db,0x03e2,0x03e9,0x03f0,0x03f7,0x040a,0x040f
0700 ; --------------------------------------------------------------------------------------
0700 ; Debug chain
0700 ; --------------------------------------------------------------------------------------
0700 0001 000b  |    |		.DBGLEN	0x0001,0x000b
0702 0423 0426  | # &|		.DBGLNO	0x0423,0x0426,0x042a,0x0433,0x043d,0x0446,0x0450,0x0458,0x0461,0x0469,0x0472,0x047a
070e ; --------------------------------------------------------------------------------------
070e ; Debug chain
070e ; --------------------------------------------------------------------------------------
070e 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0710 05c3       |    |		.DBGLNO	0x05c3
0711 ; --------------------------------------------------------------------------------------
0711 ; Debug chain
0711 ; --------------------------------------------------------------------------------------
0711 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0713 05eb       |    |		.DBGLNO	0x05eb
0714 ; --------------------------------------------------------------------------------------
0714 ; Debug chain
0714 ; --------------------------------------------------------------------------------------
0714 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0716 060b       |    |		.DBGLNO	0x060b
0717 0000 0000  |    |		.BLANK	0000[0xe9]