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

⟦5e4f4a5aa⟧

    Length: 6144 (0x1800)
    Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_65acc1

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 5900       |Y   |		.CONST	0x5900								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0898       |    |		.CONST	0x0898								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 0005       |    |		.CONST	0x0005								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0243       | C  |		.CONST	0x0243								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0046       | F  |		.CONST	0x0046								; Number of locals
000b			INIT_0008:
000b 4800       |H   |		Short_Literal	0x0
000c 480b       |H   |		Short_Literal	0xb
000d 029f 024b  |   K|		Declare_Subprogram	INIT_0248,For_Call
000f 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0010 4801       |H   |		Short_Literal	0x1
0011 480c       |H   |		Short_Literal	0xc
0012 00e2       |    |		Load_Encached	Integer_Cache
0013 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
0014 4800       |H   |		Short_Literal	0x0
0015 483b       |H;  |		Short_Literal	0x3b
0016 00e2       |    |		Load_Encached	Integer_Cache
0017 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
0018 4800       |H   |		Short_Literal	0x0
0019 483b       |H;  |		Short_Literal	0x3b
001a 00e2       |    |		Load_Encached	Integer_Cache
001b 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
001c 4800       |H   |		Short_Literal	0x0
001d 4801       |H   |		Short_Literal	0x1
001e 029f 0283  |    |		Declare_Subprogram	INIT_0280,For_Call
0020 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0021 e002       |    |		Load	0x0,0x2
0022 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0023 e20d       |    |		Load	0x1,0xd
0024 e002       |    |		Load	0x0,0x2
0025 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0026 e20e       |    |		Load	0x1,0xe
0027 e20f       |    |		Load	0x1,0xf
0028 e210       |    |		Load	0x1,0x10
0029 e211       |    |		Load	0x1,0x11
002a 02a0       |    |		Declare_Subprogram	Null_Subprogram
002b 4807       |H   |		Short_Literal	0x7
002c 032e       | .  |		Declare_Type	Record,Defined,Visible
002d 029a 02ab  |    |		Declare_Subprogram	INIT_02a8,For_Outer_Call,Visible,Unelaborated
002f 029a 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Outer_Call,Visible,Unelaborated
0031 029a 034b  |   K|		Declare_Subprogram	INIT_0348,For_Outer_Call,Visible,Unelaborated
0033 029a 039b  |    |		Declare_Subprogram	INIT_0398,For_Outer_Call,Visible,Unelaborated
0035 029a 03a3  |    |		Declare_Subprogram	INIT_03a0,For_Outer_Call,Visible,Unelaborated
0037 029a 03ab  |    |		Declare_Subprogram	INIT_03a8,For_Outer_Call,Visible,Unelaborated
0039 029a 03bb  |    |		Declare_Subprogram	INIT_03b8,For_Outer_Call,Visible,Unelaborated
003b 4800       |H   |		Short_Literal	0x0
003c 4803       |H   |		Short_Literal	0x3
003d 029f 03c3  |    |		Declare_Subprogram	INIT_03c0,For_Call
003f 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0040 4800       |H   |		Short_Literal	0x0
0041 4804       |H   |		Short_Literal	0x4
0042 029f 03eb  |    |		Declare_Subprogram	INIT_03e8,For_Call
0044 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0045 4800       |H   |		Short_Literal	0x0
0046 4802       |H   |		Short_Literal	0x2
0047 029f 0413  |    |		Declare_Subprogram	INIT_0410,For_Call
0049 03fe       |    |		Declare_Type	Discrete,Defined,Visible
004a 029a 043b  |   ;|		Declare_Subprogram	INIT_0438,For_Outer_Call,Visible,Unelaborated
004c 029a 045b  |   [|		Declare_Subprogram	INIT_0458,For_Outer_Call,Visible,Unelaborated
004e 4800       |H   |		Short_Literal	0x0
004f 6228       |b(  |		Indirect_Literal	Discrete,0x278,{0x00000000, 0x7fffffff}
0050 00e2       |    |		Load_Encached	Integer_Cache
0051 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
0052 4800       |H   |		Short_Literal	0x0
0053 4817       |H   |		Short_Literal	0x17
0054 00e2       |    |		Load_Encached	Integer_Cache
0055 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
0056 4800       |H   |		Short_Literal	0x0
0057 4be7       |K   |		Short_Literal	0x3e7
0058 00e2       |    |		Load_Encached	Integer_Cache
0059 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
005a 00da       |    |		Load_Top	At_Offset_2
005b 00da       |    |		Load_Top	At_Offset_2
005c e20f       |    |		Load	0x1,0xf
005d e210       |    |		Load	0x1,0x10
005e e221       | !  |		Load	0x1,0x21
005f 02a0       |    |		Declare_Subprogram	Null_Subprogram
0060 4805       |H   |		Short_Literal	0x5
0061 032e       | .  |		Declare_Type	Record,Defined,Visible
0062 029a 0463  |   c|		Declare_Subprogram	INIT_0460,For_Outer_Call,Visible,Unelaborated
0064 029a 04ab  |    |		Declare_Subprogram	INIT_04a8,For_Outer_Call,Visible,Unelaborated
0066 029a 052b  |   +|		Declare_Subprogram	INIT_0528,For_Outer_Call,Visible,Unelaborated
0068 029a 05bb  |    |		Declare_Subprogram	INIT_05b8,For_Outer_Call,Visible,Unelaborated
006a 029a 05c3  |    |		Declare_Subprogram	INIT_05c0,For_Outer_Call,Visible,Unelaborated
006c 029a 05cb  |    |		Declare_Subprogram	INIT_05c8,For_Outer_Call,Visible,Unelaborated
006e 029a 05d3  |    |		Declare_Subprogram	INIT_05d0,For_Outer_Call,Visible,Unelaborated
0070 029a 05e3  |    |		Declare_Subprogram	INIT_05e0,For_Outer_Call,Visible,Unelaborated
0072 4801       |H   |		Short_Literal	0x1
0073 4807       |H   |		Short_Literal	0x7
0074 00e4       |    |		Load_Encached	Positive_Cache
0075 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
0076 029a 0623  |   #|		Declare_Subprogram	INIT_0620,For_Outer_Call,Visible,Unelaborated
0078 029a 062b  |   +|		Declare_Subprogram	INIT_0628,For_Outer_Call,Visible,Unelaborated
007a 029a 066b  |   k|		Declare_Subprogram	INIT_0668,For_Outer_Call,Visible,Unelaborated
007c 029a 0693  |    |		Declare_Subprogram	INIT_0690,For_Outer_Call,Visible,Unelaborated
007e 029a 06a3  |    |		Declare_Subprogram	INIT_06a0,For_Outer_Call,Visible,Unelaborated
0080 00bf       |    |		Action	Accept_Activation
0081 e002       |    |		Load	0x0,0x2
0082 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0083 02c7       |    |		Declare_Variable	Any
0084 00d8       |    |		Load_Top	At_Offset_0
0085 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0086 00e4       |    |		Load_Encached	Positive_Cache
0087 0266       | f  |		Execute	Discrete,Bounds
0088 00e3       |    |		Load_Encached	Natural_Cache
0089 02a0       |    |		Declare_Subprogram	Null_Subprogram
008a 4801       |H   |		Short_Literal	0x1
008b 0350       | P  |		Declare_Type	Array,Defined,Bounds_With_Object
008c 00e8       |    |		Load_Encached	Character_Cache
008d 0266       | f  |		Execute	Discrete,Bounds
008e 00e1       |    |		Load_Encached	Boolean_Cache
008f 02a0       |    |		Declare_Subprogram	Null_Subprogram
0090 4801       |H   |		Short_Literal	0x1
0091 035d       | ]  |		Declare_Type	Array,Defined
0092 00d8       |    |		Load_Top	At_Offset_0
0093 0337       | 7  |		Declare_Variable	Array
0094 4801       |H   |		Short_Literal	0x1
0095 4830       |H0  |		Short_Literal	0x30
0096 00da       |    |		Load_Top	At_Offset_2
0097 01d6       |    |		Execute	Vector,Field_Write
0098 4801       |H   |		Short_Literal	0x1
0099 4831       |H1  |		Short_Literal	0x31
009a 00da       |    |		Load_Top	At_Offset_2
009b 01d6       |    |		Execute	Vector,Field_Write
009c 4801       |H   |		Short_Literal	0x1
009d 4832       |H2  |		Short_Literal	0x32
009e 00da       |    |		Load_Top	At_Offset_2
009f 01d6       |    |		Execute	Vector,Field_Write
00a0 4801       |H   |		Short_Literal	0x1
00a1 4833       |H3  |		Short_Literal	0x33
00a2 00da       |    |		Load_Top	At_Offset_2
00a3 01d6       |    |		Execute	Vector,Field_Write
00a4 4801       |H   |		Short_Literal	0x1
00a5 4834       |H4  |		Short_Literal	0x34
00a6 00da       |    |		Load_Top	At_Offset_2
00a7 01d6       |    |		Execute	Vector,Field_Write
00a8 4801       |H   |		Short_Literal	0x1
00a9 4835       |H5  |		Short_Literal	0x35
00aa 00da       |    |		Load_Top	At_Offset_2
00ab 01d6       |    |		Execute	Vector,Field_Write
00ac 4801       |H   |		Short_Literal	0x1
00ad 4836       |H6  |		Short_Literal	0x36
00ae 00da       |    |		Load_Top	At_Offset_2
00af 01d6       |    |		Execute	Vector,Field_Write
00b0 4801       |H   |		Short_Literal	0x1
00b1 4837       |H7  |		Short_Literal	0x37
00b2 00da       |    |		Load_Top	At_Offset_2
00b3 01d6       |    |		Execute	Vector,Field_Write
00b4 4801       |H   |		Short_Literal	0x1
00b5 4838       |H8  |		Short_Literal	0x38
00b6 00da       |    |		Load_Top	At_Offset_2
00b7 01d6       |    |		Execute	Vector,Field_Write
00b8 4801       |H   |		Short_Literal	0x1
00b9 4839       |H9  |		Short_Literal	0x39
00ba 00da       |    |		Load_Top	At_Offset_2
00bb 01d6       |    |		Execute	Vector,Field_Write
00bc 482f       |H/  |		Short_Literal	0x2f
00bd 4800       |H   |		Short_Literal	0x0
00be 4800       |H   |		Short_Literal	0x0
00bf 00d9       |    |		Load_Top	At_Offset_1
00c0 e234       | 4  |		Load	0x1,0x34
00c1 01d6       |    |		Execute	Vector,Field_Write
00c2 3ffb       |?   |		Loop_Increasing	0xbe
00c3 487f       |H   |		Short_Literal	0x7f
00c4 483a       |H:  |		Short_Literal	0x3a
00c5 4800       |H   |		Short_Literal	0x0
00c6 00d9       |    |		Load_Top	At_Offset_1
00c7 e234       | 4  |		Load	0x1,0x34
00c8 01d6       |    |		Execute	Vector,Field_Write
00c9 3ffb       |?   |		Loop_Increasing	0xc5
00ca 00d9       |    |		Load_Top	At_Offset_1
00cb 01c3       |    |		Execute	Vector,Check_In_Type
00cc 0007       |    |		Action	Break_Optional
00cd 00d9       |    |		Load_Top	At_Offset_1
00ce 0337       | 7  |		Declare_Variable	Array
00cf 487a       |Hz  |		Short_Literal	0x7a
00d0 4861       |Ha  |		Short_Literal	0x61
00d1 4801       |H   |		Short_Literal	0x1
00d2 00d9       |    |		Load_Top	At_Offset_1
00d3 e235       | 5  |		Load	0x1,0x35
00d4 01d6       |    |		Execute	Vector,Field_Write
00d5 3ffb       |?   |		Loop_Increasing	0xd1
00d6 485a       |HZ  |		Short_Literal	0x5a
00d7 4841       |HA  |		Short_Literal	0x41
00d8 4801       |H   |		Short_Literal	0x1
00d9 00d9       |    |		Load_Top	At_Offset_1
00da e235       | 5  |		Load	0x1,0x35
00db 01d6       |    |		Execute	Vector,Field_Write
00dc 3ffb       |?   |		Loop_Increasing	0xd8
00dd 4840       |H@  |		Short_Literal	0x40
00de 4800       |H   |		Short_Literal	0x0
00df 4800       |H   |		Short_Literal	0x0
00e0 00d9       |    |		Load_Top	At_Offset_1
00e1 e235       | 5  |		Load	0x1,0x35
00e2 01d6       |    |		Execute	Vector,Field_Write
00e3 3ffb       |?   |		Loop_Increasing	0xdf
00e4 4860       |H`  |		Short_Literal	0x60
00e5 485b       |H[  |		Short_Literal	0x5b
00e6 4800       |H   |		Short_Literal	0x0
00e7 00d9       |    |		Load_Top	At_Offset_1
00e8 e235       | 5  |		Load	0x1,0x35
00e9 01d6       |    |		Execute	Vector,Field_Write
00ea 3ffb       |?   |		Loop_Increasing	0xe6
00eb 487f       |H   |		Short_Literal	0x7f
00ec 487b       |H{  |		Short_Literal	0x7b
00ed 4800       |H   |		Short_Literal	0x0
00ee 00d9       |    |		Load_Top	At_Offset_1
00ef e235       | 5  |		Load	0x1,0x35
00f0 01d6       |    |		Execute	Vector,Field_Write
00f1 3ffb       |?   |		Loop_Increasing	0xed
00f2 00da       |    |		Load_Top	At_Offset_2
00f3 01c3       |    |		Execute	Vector,Check_In_Type
00f4 0007       |    |		Action	Break_Optional
00f5 e212       |    |		Load	0x1,0x12
00f6 0322       | "  |		Declare_Variable	Record
00f7 617c       |a|  |		Indirect_Literal	Discrete,0x274,{0x00000000, 0x0000076d}
00f8 00d9       |    |		Load_Top	At_Offset_1
00f9 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00fa 4800       |H   |		Short_Literal	0x0
00fb 00d9       |    |		Load_Top	At_Offset_1
00fc 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00fd 4801       |H   |		Short_Literal	0x1
00fe 00d9       |    |		Load_Top	At_Offset_1
00ff 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0100 4801       |H   |		Short_Literal	0x1
0101 00d9       |    |		Load_Top	At_Offset_1
0102 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0103 4800       |H   |		Short_Literal	0x0
0104 00d9       |    |		Load_Top	At_Offset_1
0105 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0106 4800       |H   |		Short_Literal	0x0
0107 00d9       |    |		Load_Top	At_Offset_1
0108 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0109 4800       |H   |		Short_Literal	0x0
010a 00d9       |    |		Load_Top	At_Offset_1
010b 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
010c e222       | "  |		Load	0x1,0x22
010d 0322       | "  |		Declare_Variable	Record
010e 4800       |H   |		Short_Literal	0x0
010f 00d9       |    |		Load_Top	At_Offset_1
0110 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0111 4800       |H   |		Short_Literal	0x0
0112 00d9       |    |		Load_Top	At_Offset_1
0113 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0114 4800       |H   |		Short_Literal	0x0
0115 00d9       |    |		Load_Top	At_Offset_1
0116 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0117 4800       |H   |		Short_Literal	0x0
0118 00d9       |    |		Load_Top	At_Offset_1
0119 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
011a 4800       |H   |		Short_Literal	0x0
011b 00d9       |    |		Load_Top	At_Offset_1
011c 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
011d e211       |    |		Load	0x1,0x11
011e 0266       | f  |		Execute	Discrete,Bounds
011f 4801       |H   |		Short_Literal	0x1
0120 480c       |H   |		Short_Literal	0xc
0121 e220       |    |		Load	0x1,0x20
0122 02a0       |    |		Declare_Subprogram	Null_Subprogram
0123 4802       |H   |		Short_Literal	0x2
0124 035d       | ]  |		Declare_Type	Array,Defined
0125 00d8       |    |		Load_Top	At_Offset_0
0126 0337       | 7  |		Declare_Variable	Array
0127 00d8       |    |		Load_Top	At_Offset_0
0128 0335       | 5  |		Declare_Variable	Array,Duplicate
0129 00cd       |    |		Action	Spare6_Action
012a 4801       |H   |		Short_Literal	0x1
012b 4801       |H   |		Short_Literal	0x1
012c 4800       |H   |		Short_Literal	0x0
012d 00db       |    |		Load_Top	At_Offset_3
012e 01a6       |    |		Execute	Matrix,Field_Write
012f 4802       |H   |		Short_Literal	0x2
0130 4802       |H   |		Short_Literal	0x2
0131 4800       |H   |		Short_Literal	0x0
0132 00db       |    |		Load_Top	At_Offset_3
0133 01a6       |    |		Execute	Matrix,Field_Write
0134 4803       |H   |		Short_Literal	0x3
0135 4803       |H   |		Short_Literal	0x3
0136 4800       |H   |		Short_Literal	0x0
0137 00db       |    |		Load_Top	At_Offset_3
0138 01a6       |    |		Execute	Matrix,Field_Write
0139 4804       |H   |		Short_Literal	0x4
013a 4804       |H   |		Short_Literal	0x4
013b 4800       |H   |		Short_Literal	0x0
013c 00db       |    |		Load_Top	At_Offset_3
013d 01a6       |    |		Execute	Matrix,Field_Write
013e 4805       |H   |		Short_Literal	0x5
013f 4805       |H   |		Short_Literal	0x5
0140 4800       |H   |		Short_Literal	0x0
0141 00db       |    |		Load_Top	At_Offset_3
0142 01a6       |    |		Execute	Matrix,Field_Write
0143 4806       |H   |		Short_Literal	0x6
0144 4806       |H   |		Short_Literal	0x6
0145 4800       |H   |		Short_Literal	0x0
0146 00db       |    |		Load_Top	At_Offset_3
0147 01a6       |    |		Execute	Matrix,Field_Write
0148 4807       |H   |		Short_Literal	0x7
0149 4807       |H   |		Short_Literal	0x7
014a 4800       |H   |		Short_Literal	0x0
014b 00db       |    |		Load_Top	At_Offset_3
014c 01a6       |    |		Execute	Matrix,Field_Write
014d 4808       |H   |		Short_Literal	0x8
014e 4808       |H   |		Short_Literal	0x8
014f 4800       |H   |		Short_Literal	0x0
0150 00db       |    |		Load_Top	At_Offset_3
0151 01a6       |    |		Execute	Matrix,Field_Write
0152 4809       |H   |		Short_Literal	0x9
0153 4809       |H   |		Short_Literal	0x9
0154 4800       |H   |		Short_Literal	0x0
0155 00db       |    |		Load_Top	At_Offset_3
0156 01a6       |    |		Execute	Matrix,Field_Write
0157 480a       |H   |		Short_Literal	0xa
0158 480a       |H   |		Short_Literal	0xa
0159 4800       |H   |		Short_Literal	0x0
015a 00db       |    |		Load_Top	At_Offset_3
015b 01a6       |    |		Execute	Matrix,Field_Write
015c 480b       |H   |		Short_Literal	0xb
015d 480b       |H   |		Short_Literal	0xb
015e 4800       |H   |		Short_Literal	0x0
015f 00db       |    |		Load_Top	At_Offset_3
0160 01a6       |    |		Execute	Matrix,Field_Write
0161 4800       |H   |		Short_Literal	0x0
0162 480c       |H   |		Short_Literal	0xc
0163 4800       |H   |		Short_Literal	0x0
0164 00db       |    |		Load_Top	At_Offset_3
0165 01a6       |    |		Execute	Matrix,Field_Write
0166 480d       |H   |		Short_Literal	0xd
0167 4801       |H   |		Short_Literal	0x1
0168 4801       |H   |		Short_Literal	0x1
0169 00db       |    |		Load_Top	At_Offset_3
016a 01a6       |    |		Execute	Matrix,Field_Write
016b 480e       |H   |		Short_Literal	0xe
016c 4802       |H   |		Short_Literal	0x2
016d 4801       |H   |		Short_Literal	0x1
016e 00db       |    |		Load_Top	At_Offset_3
016f 01a6       |    |		Execute	Matrix,Field_Write
0170 480f       |H   |		Short_Literal	0xf
0171 4803       |H   |		Short_Literal	0x3
0172 4801       |H   |		Short_Literal	0x1
0173 00db       |    |		Load_Top	At_Offset_3
0174 01a6       |    |		Execute	Matrix,Field_Write
0175 4810       |H   |		Short_Literal	0x10
0176 4804       |H   |		Short_Literal	0x4
0177 4801       |H   |		Short_Literal	0x1
0178 00db       |    |		Load_Top	At_Offset_3
0179 01a6       |    |		Execute	Matrix,Field_Write
017a 4811       |H   |		Short_Literal	0x11
017b 4805       |H   |		Short_Literal	0x5
017c 4801       |H   |		Short_Literal	0x1
017d 00db       |    |		Load_Top	At_Offset_3
017e 01a6       |    |		Execute	Matrix,Field_Write
017f 4812       |H   |		Short_Literal	0x12
0180 4806       |H   |		Short_Literal	0x6
0181 4801       |H   |		Short_Literal	0x1
0182 00db       |    |		Load_Top	At_Offset_3
0183 01a6       |    |		Execute	Matrix,Field_Write
0184 4813       |H   |		Short_Literal	0x13
0185 4807       |H   |		Short_Literal	0x7
0186 4801       |H   |		Short_Literal	0x1
0187 00db       |    |		Load_Top	At_Offset_3
0188 01a6       |    |		Execute	Matrix,Field_Write
0189 4814       |H   |		Short_Literal	0x14
018a 4808       |H   |		Short_Literal	0x8
018b 4801       |H   |		Short_Literal	0x1
018c 00db       |    |		Load_Top	At_Offset_3
018d 01a6       |    |		Execute	Matrix,Field_Write
018e 4815       |H   |		Short_Literal	0x15
018f 4809       |H   |		Short_Literal	0x9
0190 4801       |H   |		Short_Literal	0x1
0191 00db       |    |		Load_Top	At_Offset_3
0192 01a6       |    |		Execute	Matrix,Field_Write
0193 4816       |H   |		Short_Literal	0x16
0194 480a       |H   |		Short_Literal	0xa
0195 4801       |H   |		Short_Literal	0x1
0196 00db       |    |		Load_Top	At_Offset_3
0197 01a6       |    |		Execute	Matrix,Field_Write
0198 4817       |H   |		Short_Literal	0x17
0199 480b       |H   |		Short_Literal	0xb
019a 4801       |H   |		Short_Literal	0x1
019b 00db       |    |		Load_Top	At_Offset_3
019c 01a6       |    |		Execute	Matrix,Field_Write
019d 480c       |H   |		Short_Literal	0xc
019e 480c       |H   |		Short_Literal	0xc
019f 4801       |H   |		Short_Literal	0x1
01a0 00db       |    |		Load_Top	At_Offset_3
01a1 01a6       |    |		Execute	Matrix,Field_Write
01a2 00d9       |    |		Load_Top	At_Offset_1
01a3 01a4       |    |		Execute	Matrix,Structure_Write
01a4 e20d       |    |		Load	0x1,0xd
01a5 0266       | f  |		Execute	Discrete,Bounds
01a6 00e2       |    |		Load_Encached	Integer_Cache
01a7 02a0       |    |		Declare_Subprogram	Null_Subprogram
01a8 4801       |H   |		Short_Literal	0x1
01a9 035d       | ]  |		Declare_Type	Array,Defined
01aa 00d8       |    |		Load_Top	At_Offset_0
01ab 0337       | 7  |		Declare_Variable	Array
01ac 00d8       |    |		Load_Top	At_Offset_0
01ad 0335       | 5  |		Declare_Variable	Array,Duplicate
01ae 00cd       |    |		Action	Spare6_Action
01af 481f       |H   |		Short_Literal	0x1f
01b0 4800       |H   |		Short_Literal	0x0
01b1 00da       |    |		Load_Top	At_Offset_2
01b2 01d6       |    |		Execute	Vector,Field_Write
01b3 481f       |H   |		Short_Literal	0x1f
01b4 4802       |H   |		Short_Literal	0x2
01b5 00da       |    |		Load_Top	At_Offset_2
01b6 01d6       |    |		Execute	Vector,Field_Write
01b7 481f       |H   |		Short_Literal	0x1f
01b8 4804       |H   |		Short_Literal	0x4
01b9 00da       |    |		Load_Top	At_Offset_2
01ba 01d6       |    |		Execute	Vector,Field_Write
01bb 481f       |H   |		Short_Literal	0x1f
01bc 4806       |H   |		Short_Literal	0x6
01bd 00da       |    |		Load_Top	At_Offset_2
01be 01d6       |    |		Execute	Vector,Field_Write
01bf 481f       |H   |		Short_Literal	0x1f
01c0 4807       |H   |		Short_Literal	0x7
01c1 00da       |    |		Load_Top	At_Offset_2
01c2 01d6       |    |		Execute	Vector,Field_Write
01c3 481f       |H   |		Short_Literal	0x1f
01c4 4809       |H   |		Short_Literal	0x9
01c5 00da       |    |		Load_Top	At_Offset_2
01c6 01d6       |    |		Execute	Vector,Field_Write
01c7 481f       |H   |		Short_Literal	0x1f
01c8 480b       |H   |		Short_Literal	0xb
01c9 00da       |    |		Load_Top	At_Offset_2
01ca 01d6       |    |		Execute	Vector,Field_Write
01cb 481e       |H   |		Short_Literal	0x1e
01cc 4803       |H   |		Short_Literal	0x3
01cd 00da       |    |		Load_Top	At_Offset_2
01ce 01d6       |    |		Execute	Vector,Field_Write
01cf 481e       |H   |		Short_Literal	0x1e
01d0 4805       |H   |		Short_Literal	0x5
01d1 00da       |    |		Load_Top	At_Offset_2
01d2 01d6       |    |		Execute	Vector,Field_Write
01d3 481e       |H   |		Short_Literal	0x1e
01d4 4808       |H   |		Short_Literal	0x8
01d5 00da       |    |		Load_Top	At_Offset_2
01d6 01d6       |    |		Execute	Vector,Field_Write
01d7 481e       |H   |		Short_Literal	0x1e
01d8 480a       |H   |		Short_Literal	0xa
01d9 00da       |    |		Load_Top	At_Offset_2
01da 01d6       |    |		Execute	Vector,Field_Write
01db 481c       |H   |		Short_Literal	0x1c
01dc 4801       |H   |		Short_Literal	0x1
01dd 00da       |    |		Load_Top	At_Offset_2
01de 01d6       |    |		Execute	Vector,Field_Write
01df 00d9       |    |		Load_Top	At_Offset_1
01e0 01d4       |    |		Execute	Vector,Structure_Write
01e1 4800       |H   |		Short_Literal	0x0
01e2 4802       |H   |		Short_Literal	0x2
01e3 e001       |    |		Load	0x0,0x1
01e4 01d7       |    |		Execute	Vector,Field_Read
01e5 02a0       |    |		Declare_Subprogram	Null_Subprogram
01e6 038e       |    |		Declare_Type	Package,Defined
01e7 e001       |    |		Load	0x0,0x1
01e8 4801       |H   |		Short_Literal	0x1
01e9 e001       |    |		Load	0x0,0x1
01ea 01d7       |    |		Execute	Vector,Field_Read
01eb 4802       |H   |		Short_Literal	0x2
01ec 00db       |    |		Load_Top	At_Offset_3
01ed 020e       |    |		Execute	Module,Augment_Imports
01ee 0387       |    |		Declare_Variable	Package
01ef a003       |    |		Store_Unchecked	0x0,0x3
01f0 00c6       |    |		Action	Check_Subprogram_Elaborated
01f1 e20d       |    |		Load	0x1,0xd
01f2 0093 0000  |    |		push_full_address	0x0
01f4 607b       |`{  |		Indirect_Literal	Discrete,0x270,{0x80000000, 0x00010000}
01f5 0273       | s  |		Execute	Discrete,Plus
01f6 e004       |    |		Load	0x0,0x4
01f7 0273       | s  |		Execute	Discrete,Plus
01f8 e005       |    |		Load	0x0,0x5
01f9 0273       | s  |		Execute	Discrete,Plus
01fa 4800       |H   |		Short_Literal	0x0
01fb 0007       |    |		Action	Break_Optional
01fc 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
01fd 00c7       |    |		Action	Elaborate_Subprogram
01fe 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
01ff 00c7       |    |		Action	Elaborate_Subprogram
0200 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0201 00c7       |    |		Action	Elaborate_Subprogram
0202 029d 06b3  |    |		Declare_Subprogram	INIT_06b0,For_Outer_Call
0204 029d 06d3  |    |		Declare_Subprogram	INIT_06d0,For_Outer_Call
0206 029d 0733  |   3|		Declare_Subprogram	INIT_0730,For_Outer_Call
0208 029d 07b3  |    |		Declare_Subprogram	INIT_07b0,For_Outer_Call
020a 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
020b 00c7       |    |		Action	Elaborate_Subprogram
020c 029d 07cb  |    |		Declare_Subprogram	INIT_07c8,For_Outer_Call
020e 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
020f 00c7       |    |		Action	Elaborate_Subprogram
0210 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
0211 00c7       |    |		Action	Elaborate_Subprogram
0212 e222       | "  |		Load	0x1,0x22
0213 e237       | 7  |		Load	0x1,0x37
0214 e220       |    |		Load	0x1,0x20
0215 e20f       |    |		Load	0x1,0xf
0216 e210       |    |		Load	0x1,0x10
0217 e221       | !  |		Load	0x1,0x21
0218 4806       |H   |		Short_Literal	0x6
0219 e23c       | <  |		Load	0x1,0x3c
021a 020e       |    |		Execute	Module,Augment_Imports
021b e23c       | <  |		Load	0x1,0x3c
021c 020f       |    |		Execute	Module,Activate
021d 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26
021e 00c7       |    |		Action	Elaborate_Subprogram
021f 4804       |H   |		Short_Literal	0x4
0220 e001       |    |		Load	0x0,0x1
0221 01d7       |    |		Execute	Vector,Field_Read
0222 02a5       |    |		Declare_Subprogram	For_Outer_Call,With_Address
0223 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
0224 00c7       |    |		Action	Elaborate_Subprogram
0225 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
0226 00c7       |    |		Action	Elaborate_Subprogram
0227 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25
0228 00c7       |    |		Action	Elaborate_Subprogram
0229 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
022a 00c7       |    |		Action	Elaborate_Subprogram
022b 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
022c 00c7       |    |		Action	Elaborate_Subprogram
022d 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
022e 00c7       |    |		Action	Elaborate_Subprogram
022f 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
0230 00c7       |    |		Action	Elaborate_Subprogram
0231 1d2e       | .  |		Execute_Immediate	Reference_Lex_1,0x2e
0232 00c7       |    |		Action	Elaborate_Subprogram
0233 029d 07eb  |    |		Declare_Subprogram	INIT_07e8,For_Outer_Call
0235 1d2d       | -  |		Execute_Immediate	Reference_Lex_1,0x2d
0236 00c7       |    |		Action	Elaborate_Subprogram
0237 1d2c       | ,  |		Execute_Immediate	Reference_Lex_1,0x2c
0238 00c7       |    |		Action	Elaborate_Subprogram
0239 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f
023a 00c7       |    |		Action	Elaborate_Subprogram
023b 1d30       | 0  |		Execute_Immediate	Reference_Lex_1,0x30
023c 00c7       |    |		Action	Elaborate_Subprogram
023d 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29
023e 00c7       |    |		Action	Elaborate_Subprogram
023f 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
0240 00c7       |    |		Action	Elaborate_Subprogram
0241 1d2a       | *  |		Execute_Immediate	Reference_Lex_1,0x2a
0242 00c7       |    |		Action	Elaborate_Subprogram
0243			BODY_0008:
0243 e236       | 6  |		Load	0x1,0x36
0244 8215       |    |		Call	0x1,0x15
0245 c231       | 1  |		Store	0x1,0x31
0246 00bc       |    |		Action	Signal_Activated
0247 00bb       |    |		Action	Signal_Completion
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024b       | K  |		.CONST	0x024b								; Address of begin
0249 0004       |    |		.CONST	0x0004								; Address of exception handler
024a 0001       |    |		.CONST	0x0001								; Number of locals
024b			BODY_0248:
024b			INIT_0248:
024b 4607       |F   |		Jump_Case	0x8
024c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
024d 7807       |x   |		Jump	0x255								; case 0x1
024e 780a       |x   |		Jump	0x259								; case 0x2
024f 780e       |x   |		Jump	0x25e								; case 0x3
0250 7811       |x   |		Jump	0x262								; case 0x4
0251 7812       |x   |		Jump	0x264								; case 0x5
0252 7813       |x   |		Jump	0x266								; case 0x6
0253 7816       |x   |		Jump	0x26a								; case 0x7
0254 4302       |C   |		.XXX[0x1]
0255 00da       |    |		Load_Top	At_Offset_2
0256 0091 07fb  |    |		Action	Push_String_Extended_Indexed,0x7fb				; "JANUARY"
0258 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0259 00db       |    |		Load_Top	At_Offset_3
025a 00db       |    |		Load_Top	At_Offset_3
025b 00e0       |    |		Load_Encached	Standard_Cache
025c 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
025d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
025e 00da       |    |		Load_Top	At_Offset_2
025f 00e0       |    |		Load_Encached	Standard_Cache
0260 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0261 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0262 00db       |    |		Load_Top	At_Offset_3
0263 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0264 00db       |    |		Load_Top	At_Offset_3
0265 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0266 e20d       |    |		Load	0x1,0xd
0267 00dc       |    |		Load_Top	At_Offset_4
0268 0267       | g  |		Execute	Discrete,Predecessor
0269 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
026a e20d       |    |		Load	0x1,0xd
026b 00dc       |    |		Load_Top	At_Offset_4
026c 0268       | h  |		Execute	Discrete,Successor
026d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
026e 0000 0000  |    |		.XXX[0x2]
0270 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
0274 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000076d}
0278 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffffff}
027c 0000 0000  |    |		.BLANK	0000[0x4]
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 4607       |F   |		Jump_Case	0x8
0284 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0285 7807       |x   |		Jump	0x28d								; case 0x1
0286 780a       |x   |		Jump	0x291								; case 0x2
0287 780e       |x   |		Jump	0x296								; case 0x3
0288 7811       |x   |		Jump	0x29a								; case 0x4
0289 7812       |x   |		Jump	0x29c								; case 0x5
028a 7813       |x   |		Jump	0x29e								; case 0x6
028b 7816       |x   |		Jump	0x2a2								; case 0x7
028c 4302       |C   |		.XXX[0x1]
028d 00da       |    |		Load_Top	At_Offset_2
028e 0091 0807  |    |		Action	Push_String_Extended_Indexed,0x807				; "AM"
0290 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0291 00db       |    |		Load_Top	At_Offset_3
0292 00db       |    |		Load_Top	At_Offset_3
0293 00e0       |    |		Load_Encached	Standard_Cache
0294 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0295 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0296 00da       |    |		Load_Top	At_Offset_2
0297 00e0       |    |		Load_Encached	Standard_Cache
0298 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0299 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
029a 00db       |    |		Load_Top	At_Offset_3
029b 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
029c 00db       |    |		Load_Top	At_Offset_3
029d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
029e e211       |    |		Load	0x1,0x11
029f 00dc       |    |		Load_Top	At_Offset_4
02a0 0267       | g  |		Execute	Discrete,Predecessor
02a1 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
02a2 e211       |    |		Load	0x1,0x11
02a3 00dc       |    |		Load_Top	At_Offset_4
02a4 0268       | h  |		Execute	Discrete,Successor
02a5 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
02a6 0000 0000  |    |		.XXX[0x2]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ab       |    |		.CONST	0x02ab								; Address of begin
02a9 0004       |    |		.CONST	0x0004								; Address of exception handler
02aa 0001       |    |		.CONST	0x0001								; Number of locals
02ab			BODY_02a8:
02ab			INIT_02a8:
02ab e002       |    |		Load	0x0,0x2
02ac 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02ad 8214       |    |		Call	0x1,0x14
02ae 00ca       |    |		Action	Exit_Nullary_Function
02af 0000       |    |		.XXX[0x1]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02c4       |    |		.CONST	0x02c4								; Address of begin
02b1 0004       |    |		.CONST	0x0004								; Address of exception handler
02b2 000b       |    |		.CONST	0x000b								; Number of locals
02b3			INIT_02b0:
02b3 e212       |    |		Load	0x1,0x12
02b4 0322       | "  |		Declare_Variable	Record
02b5 e002       |    |		Load	0x0,0x2
02b6 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02b7 e002       |    |		Load	0x0,0x2
02b8 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
02b9 e002       |    |		Load	0x0,0x2
02ba 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
02bb e002       |    |		Load	0x0,0x2
02bc 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
02bd e006       |    |		Load	0x0,0x6
02be 0007       |    |		Action	Break_Optional
02bf 00d8       |    |		Load_Top	At_Offset_0
02c0 0007       |    |		Action	Break_Optional
02c1 e006       |    |		Load	0x0,0x6
02c2 03e9       |    |		Declare_Variable	Discrete,Duplicate
02c3 03e9       |    |		Declare_Variable	Discrete,Duplicate
02c4			BODY_02b0:
02c4 e002       |    |		Load	0x0,0x2
02c5 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
02c6 e002       |    |		Load	0x0,0x2
02c7 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
02c8 e002       |    |		Load	0x0,0x2
02c9 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
02ca e002       |    |		Load	0x0,0x2
02cb 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02cc e5ff       |    |		Load	0x2,-0x1
02cd e002       |    |		Load	0x0,0x2
02ce 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
02cf c403       |    |		Store	0x2,0x3
02d0 c404       |    |		Store	0x2,0x4
02d1 c405       |    |		Store	0x2,0x5
02d2 c406       |    |		Store	0x2,0x6
02d3 e403       |    |		Load	0x2,0x3
02d4 e402       |    |		Load	0x2,0x2
02d5 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
02d6 e404       |    |		Load	0x2,0x4
02d7 0aff       |    |		Execute_Immediate	Plus,-0x1
02d8 00d8       |    |		Load_Top	At_Offset_0
02d9 e20d       |    |		Load	0x1,0xd
02da 0260       | `  |		Execute	Discrete,In_Type
02db 7001       |p   |		Jump_Nonzero	0x2dd
02dc 0801       |    |		Execute_Immediate	Raise,0x1
02dd e402       |    |		Load	0x2,0x2
02de 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
02df e405       |    |		Load	0x2,0x5
02e0 e402       |    |		Load	0x2,0x2
02e1 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
02e2 e406       |    |		Load	0x2,0x6
02e3 00d8       |    |		Load_Top	At_Offset_0
02e4 0c00       |    |		Execute_Immediate	Greater_Equal,0x0
02e5 7002       |p   |		Jump_Nonzero	0x2e8
02e6 6059       |`Y  |		Indirect_Literal	Discrete,0x340,{0xffffffff, 0xffffc000}
02e7 7801       |x   |		Jump	0x2e9
02e8 6053       |`S  |		Indirect_Literal	Discrete,0x33c,{0x00000000, 0x00004000}
02e9 0273       | s  |		Execute	Discrete,Plus
02ea 09f1       |    |		Execute_Immediate	Binary_Scale,-0xf
02eb a407       |    |		Store_Unchecked	0x2,0x7
02ec e407       |    |		Load	0x2,0x7
02ed 604a       |`J  |		Indirect_Literal	Discrete,0x338,{0x00000000, 0x0000a8c0}
02ee 027c       | |  |		Execute	Discrete,Less
02ef 6804       |h   |		Jump_Zero	0x2f4
02f0 4800       |H   |		Short_Literal	0x0
02f1 e402       |    |		Load	0x2,0x2
02f2 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
02f3 7807       |x   |		Jump	0x2fb
02f4 4801       |H   |		Short_Literal	0x1
02f5 e402       |    |		Load	0x2,0x2
02f6 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
02f7 e407       |    |		Load	0x2,0x7
02f8 603b       |`;  |		Indirect_Literal	Discrete,0x334,{0xffffffff, 0xffff5740}
02f9 0273       | s  |		Execute	Discrete,Plus
02fa c407       |    |		Store	0x2,0x7
02fb 6034       |`4  |		Indirect_Literal	Discrete,0x330,{0x00000000, 0x00000e10}
02fc e407       |    |		Load	0x2,0x7
02fd 8007       |    |		Call	0x0,0x7
02fe a408       |    |		Store_Unchecked	0x2,0x8
02ff 00db       |    |		Load_Top	At_Offset_3
0300 7007       |p   |		Jump_Nonzero	0x308
0301 480c       |H   |		Short_Literal	0xc
0302 e402       |    |		Load	0x2,0x2
0303 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0304 4801       |H   |		Short_Literal	0x1
0305 e402       |    |		Load	0x2,0x2
0306 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0307 7808       |x   |		Jump	0x310
0308 00db       |    |		Load_Top	At_Offset_3
0309 00d8       |    |		Load_Top	At_Offset_0
030a e20e       |    |		Load	0x1,0xe
030b 0260       | `  |		Execute	Discrete,In_Type
030c 7001       |p   |		Jump_Nonzero	0x30e
030d 0801       |    |		Execute_Immediate	Raise,0x1
030e e402       |    |		Load	0x2,0x2
030f 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0310 e006       |    |		Load	0x0,0x6
0311 00d8       |    |		Load_Top	At_Offset_0
0312 601d       |`   |		Indirect_Literal	Discrete,0x330,{0x00000000, 0x00000e10}
0313 e407       |    |		Load	0x2,0x7
0314 8008       |    |		Call	0x0,0x8
0315 c409       |    |		Store	0x2,0x9
0316 c407       |    |		Store	0x2,0x7
0317 e006       |    |		Load	0x0,0x6
0318 00d8       |    |		Load_Top	At_Offset_0
0319 483c       |H<  |		Short_Literal	0x3c
031a e407       |    |		Load	0x2,0x7
031b 8008       |    |		Call	0x0,0x8
031c 005b       | [  |		Store_Top	Discrete,At_Offset_3
031d 0059       | Y  |		Store_Top	Discrete,At_Offset_1
031e 00d9       |    |		Load_Top	At_Offset_1
031f 00d8       |    |		Load_Top	At_Offset_0
0320 e20f       |    |		Load	0x1,0xf
0321 0260       | `  |		Execute	Discrete,In_Type
0322 7001       |p   |		Jump_Nonzero	0x324
0323 0801       |    |		Execute_Immediate	Raise,0x1
0324 e402       |    |		Load	0x2,0x2
0325 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0326 00d8       |    |		Load_Top	At_Offset_0
0327 00d8       |    |		Load_Top	At_Offset_0
0328 e210       |    |		Load	0x1,0x10
0329 0260       | `  |		Execute	Discrete,In_Type
032a 7001       |p   |		Jump_Nonzero	0x32c
032b 0801       |    |		Execute_Immediate	Raise,0x1
032c e402       |    |		Load	0x2,0x2
032d 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
032e e402       |    |		Load	0x2,0x2
032f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0330 0000 0000  |    |		.LITERAL	{0x00000000, 0x00000e10}
0334 ffff ffff  |    |		.LITERAL	{0xffffffff, 0xffff5740}
0338 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000a8c0}
033c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0340 ffff ffff  |    |		.LITERAL	{0xffffffff, 0xffffc000}
0344 0000 0000  |    |		.BLANK	0000[0x4]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 0353       | S  |		.CONST	0x0353								; Address of begin
0349 038d       |    |		.CONST	0x038d								; Address of exception handler
034a 0005       |    |		.CONST	0x0005								; Number of locals
034b			INIT_0348:
034b e002       |    |		Load	0x0,0x2
034c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
034d e002       |    |		Load	0x0,0x2
034e 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
034f e002       |    |		Load	0x0,0x2
0350 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0351 e006       |    |		Load	0x0,0x6
0352 0007       |    |		Action	Break_Optional
0353			BODY_0348:
0353 e5ff       |    |		Load	0x2,-0x1
0354 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0355 a402       |    |		Store_Unchecked	0x2,0x2
0356 e5ff       |    |		Load	0x2,-0x1
0357 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0358 0a01       |    |		Execute_Immediate	Plus,0x1
0359 00d8       |    |		Load_Top	At_Offset_0
035a e002       |    |		Load	0x0,0x2
035b 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
035c 0260       | `  |		Execute	Discrete,In_Type
035d 7001       |p   |		Jump_Nonzero	0x35f
035e 0801       |    |		Execute_Immediate	Raise,0x1
035f 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0360 e5ff       |    |		Load	0x2,-0x1
0361 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0362 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0363 e5ff       |    |		Load	0x2,-0x1
0364 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0365 483c       |H<  |		Short_Literal	0x3c
0366 e5ff       |    |		Load	0x2,-0x1
0367 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0368 8009       |    |		Call	0x0,0x9
0369 0273       | s  |		Execute	Discrete,Plus
036a 0059       | Y  |		Store_Top	Discrete,At_Offset_1
036b e5ff       |    |		Load	0x2,-0x1
036c 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
036d 0e0c       |    |		Execute_Immediate	Not_Equal,0xc
036e 6807       |h   |		Jump_Zero	0x376
036f 00d8       |    |		Load_Top	At_Offset_0
0370 67bf       |g   |		Indirect_Literal	Discrete,0x330,{0x00000000, 0x00000e10}
0371 e5ff       |    |		Load	0x2,-0x1
0372 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0373 8009       |    |		Call	0x0,0x9
0374 0273       | s  |		Execute	Discrete,Plus
0375 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0376 e5ff       |    |		Load	0x2,-0x1
0377 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0378 0f01       |    |		Execute_Immediate	Equal,0x1
0379 6804       |h   |		Jump_Zero	0x37e
037a 00d8       |    |		Load_Top	At_Offset_0
037b 67bc       |g   |		Indirect_Literal	Discrete,0x338,{0x00000000, 0x0000a8c0}
037c 0273       | s  |		Execute	Discrete,Plus
037d 0059       | Y  |		Store_Top	Discrete,At_Offset_1
037e 00d8       |    |		Load_Top	At_Offset_0
037f 090f       |    |		Execute_Immediate	Binary_Scale,0xf
0380 e002       |    |		Load	0x0,0x2
0381 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0382 00d9       |    |		Load_Top	At_Offset_1
0383 00d0       |    |		Action	Swap_Control
0384 0260       | `  |		Execute	Discrete,In_Type
0385 7001       |p   |		Jump_Nonzero	0x387
0386 0801       |    |		Execute_Immediate	Raise,0x1
0387 00da       |    |		Load_Top	At_Offset_2
0388 e403       |    |		Load	0x2,0x3
0389 e402       |    |		Load	0x2,0x2
038a e002       |    |		Load	0x0,0x2
038b 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
038c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
038d			TRAP_0348:
038d e002       |    |		Load	0x0,0x2
038e 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
038f 010f       |    |		Execute	Exception,Equal
0390 6803       |h   |		Jump_Zero	0x394
0391 e002       |    |		Load	0x0,0x2
0392 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0393 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0394 0100       |    |		Execute	Exception,Raise
0395 0000 0000  |    |		.XXX[0x3]
0397 0000       |    |
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 039b       |    |		.CONST	0x039b								; Address of begin
0399 0004       |    |		.CONST	0x0004								; Address of exception handler
039a 0001       |    |		.CONST	0x0001								; Number of locals
039b			BODY_0398:
039b			INIT_0398:
039b e236       | 6  |		Load	0x1,0x36
039c 00ca       |    |		Action	Exit_Nullary_Function
039d 0000 0000  |    |		.XXX[0x3]
039f 0000       |    |
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03a3       |    |		.CONST	0x03a3								; Address of begin
03a1 0004       |    |		.CONST	0x0004								; Address of exception handler
03a2 0001       |    |		.CONST	0x0001								; Number of locals
03a3			BODY_03a0:
03a3			INIT_03a0:
03a3 00da       |    |		Load_Top	At_Offset_2
03a4 8216       |    |		Call	0x1,0x16
03a5 017f       |    |		Execute	Record,Equal
03a6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03a7 0000       |    |		.XXX[0x1]
03a8 ; --------------------------------------------------------------------------------------
03a8 ; SUBPROGRAM
03a8 ; --------------------------------------------------------------------------------------
03a8 03ab       |    |		.CONST	0x03ab								; Address of begin
03a9 0004       |    |		.CONST	0x0004								; Address of exception handler
03aa 0001       |    |		.CONST	0x0001								; Number of locals
03ab			BODY_03a8:
03ab			INIT_03a8:
03ab e231       | 1  |		Load	0x1,0x31
03ac 00d8       |    |		Load_Top	At_Offset_0
03ad 0120       |    |		Execute	Any,Is_Value
03ae 7002       |p   |		Jump_Nonzero	0x3b1
03af 00d8       |    |		Load_Top	At_Offset_0
03b0 011e       |    |		Execute	Any,Convert
03b1 00ca       |    |		Action	Exit_Nullary_Function
03b2 0000 0000  |    |		.BLANK	0000[0x6]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03bb       |    |		.CONST	0x03bb								; Address of begin
03b9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ba 0001       |    |		.CONST	0x0001								; Number of locals
03bb			BODY_03b8:
03bb			INIT_03b8:
03bb 00da       |    |		Load_Top	At_Offset_2
03bc 8218       |    |		Call	0x1,0x18
03bd 012f       | /  |		Execute	Any,Equal
03be 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03bf 0000       |    |		.XXX[0x1]
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03c3       |    |		.CONST	0x03c3								; Address of begin
03c1 0004       |    |		.CONST	0x0004								; Address of exception handler
03c2 0001       |    |		.CONST	0x0001								; Number of locals
03c3			BODY_03c0:
03c3			INIT_03c0:
03c3 4607       |F   |		Jump_Case	0x8
03c4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
03c5 7807       |x   |		Jump	0x3cd								; case 0x1
03c6 780a       |x   |		Jump	0x3d1								; case 0x2
03c7 780e       |x   |		Jump	0x3d6								; case 0x3
03c8 7811       |x   |		Jump	0x3da								; case 0x4
03c9 7812       |x   |		Jump	0x3dc								; case 0x5
03ca 7813       |x   |		Jump	0x3de								; case 0x6
03cb 7816       |x   |		Jump	0x3e2								; case 0x7
03cc 4302       |C   |		.XXX[0x1]
03cd 00da       |    |		Load_Top	At_Offset_2
03ce 0091 0809  |    |		Action	Push_String_Extended_Indexed,0x809				; "EXPANDED"
03d0 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
03d1 00db       |    |		Load_Top	At_Offset_3
03d2 00db       |    |		Load_Top	At_Offset_3
03d3 00e0       |    |		Load_Encached	Standard_Cache
03d4 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
03d5 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
03d6 00da       |    |		Load_Top	At_Offset_2
03d7 00e0       |    |		Load_Encached	Standard_Cache
03d8 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
03d9 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
03da 00db       |    |		Load_Top	At_Offset_3
03db 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
03dc 00db       |    |		Load_Top	At_Offset_3
03dd 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
03de e21a       |    |		Load	0x1,0x1a
03df 00dc       |    |		Load_Top	At_Offset_4
03e0 0267       | g  |		Execute	Discrete,Predecessor
03e1 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
03e2 e21a       |    |		Load	0x1,0x1a
03e3 00dc       |    |		Load_Top	At_Offset_4
03e4 0268       | h  |		Execute	Discrete,Successor
03e5 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
03e6 0000 0000  |    |		.XXX[0x2]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03eb       |    |		.CONST	0x03eb								; Address of begin
03e9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ea 0001       |    |		.CONST	0x0001								; Number of locals
03eb			BODY_03e8:
03eb			INIT_03e8:
03eb 4607       |F   |		Jump_Case	0x8
03ec 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
03ed 7807       |x   |		Jump	0x3f5								; case 0x1
03ee 780a       |x   |		Jump	0x3f9								; case 0x2
03ef 780e       |x   |		Jump	0x3fe								; case 0x3
03f0 7811       |x   |		Jump	0x402								; case 0x4
03f1 7812       |x   |		Jump	0x404								; case 0x5
03f2 7813       |x   |		Jump	0x406								; case 0x6
03f3 7816       |x   |		Jump	0x40a								; case 0x7
03f4 4302       |C   |		.XXX[0x1]
03f5 00da       |    |		Load_Top	At_Offset_2
03f6 0091 080d  |    |		Action	Push_String_Extended_Indexed,0x80d				; "EXPANDED"
03f8 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
03f9 00db       |    |		Load_Top	At_Offset_3
03fa 00db       |    |		Load_Top	At_Offset_3
03fb 00e0       |    |		Load_Encached	Standard_Cache
03fc 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
03fd 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
03fe 00da       |    |		Load_Top	At_Offset_2
03ff 00e0       |    |		Load_Encached	Standard_Cache
0400 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0401 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0402 00db       |    |		Load_Top	At_Offset_3
0403 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0404 00db       |    |		Load_Top	At_Offset_3
0405 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0406 e21b       |    |		Load	0x1,0x1b
0407 00dc       |    |		Load_Top	At_Offset_4
0408 0267       | g  |		Execute	Discrete,Predecessor
0409 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
040a e21b       |    |		Load	0x1,0x1b
040b 00dc       |    |		Load_Top	At_Offset_4
040c 0268       | h  |		Execute	Discrete,Successor
040d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
040e 0000 0000  |    |		.XXX[0x2]
0410 ; --------------------------------------------------------------------------------------
0410 ; SUBPROGRAM
0410 ; --------------------------------------------------------------------------------------
0410 0413       |    |		.CONST	0x0413								; Address of begin
0411 0004       |    |		.CONST	0x0004								; Address of exception handler
0412 0001       |    |		.CONST	0x0001								; Number of locals
0413			BODY_0410:
0413			INIT_0410:
0413 4607       |F   |		Jump_Case	0x8
0414 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0415 7807       |x   |		Jump	0x41d								; case 0x1
0416 780a       |x   |		Jump	0x421								; case 0x2
0417 780e       |x   |		Jump	0x426								; case 0x3
0418 7811       |x   |		Jump	0x42a								; case 0x4
0419 7812       |x   |		Jump	0x42c								; case 0x5
041a 7813       |x   |		Jump	0x42e								; case 0x6
041b 7816       |x   |		Jump	0x432								; case 0x7
041c 4302       |C   |		.XXX[0x1]
041d 00da       |    |		Load_Top	At_Offset_2
041e 0091 0812  |    |		Action	Push_String_Extended_Indexed,0x812				; "BOTH"
0420 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0421 00db       |    |		Load_Top	At_Offset_3
0422 00db       |    |		Load_Top	At_Offset_3
0423 00e0       |    |		Load_Encached	Standard_Cache
0424 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0425 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0426 00da       |    |		Load_Top	At_Offset_2
0427 00e0       |    |		Load_Encached	Standard_Cache
0428 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0429 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
042a 00db       |    |		Load_Top	At_Offset_3
042b 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
042c 00db       |    |		Load_Top	At_Offset_3
042d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
042e e21c       |    |		Load	0x1,0x1c
042f 00dc       |    |		Load_Top	At_Offset_4
0430 0267       | g  |		Execute	Discrete,Predecessor
0431 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0432 e21c       |    |		Load	0x1,0x1c
0433 00dc       |    |		Load_Top	At_Offset_4
0434 0268       | h  |		Execute	Discrete,Successor
0435 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0436 0000 0000  |    |		.XXX[0x2]
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 043b       | ;  |		.CONST	0x043b								; Address of begin
0439 0004       |    |		.CONST	0x0004								; Address of exception handler
043a 0001       |    |		.CONST	0x0001								; Number of locals
043b			BODY_0438:
043b			INIT_0438:
043b e5fc       |    |		Load	0x2,-0x4
043c 4602       |F   |		Jump_Case	0x3
043d 7806       |x   |		Jump	0x444								; case 0x0
043e 7811       |x   |		Jump	0x450								; case 0x1
043f 7800       |x   |		Jump	0x440								; case 0x2
0440 00db       |    |		Load_Top	At_Offset_3
0441 00db       |    |		Load_Top	At_Offset_3
0442 8242       | B  |		Call	0x1,0x42
0443 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0444 00db       |    |		Load_Top	At_Offset_3
0445 00db       |    |		Load_Top	At_Offset_3
0446 8242       | B  |		Call	0x1,0x42
0447 e5fd       |    |		Load	0x2,-0x3
0448 e5fe       |    |		Load	0x2,-0x2
0449 8243       | C  |		Call	0x1,0x43
044a 01cc       |    |		Execute	Vector,Catenate
044b e5fd       |    |		Load	0x2,-0x3
044c e5ff       |    |		Load	0x2,-0x1
044d 8241       | A  |		Call	0x1,0x41
044e 01cc       |    |		Execute	Vector,Catenate
044f 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0450 e5fd       |    |		Load	0x2,-0x3
0451 00db       |    |		Load_Top	At_Offset_3
0452 8241       | A  |		Call	0x1,0x41
0453 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0454 0000 0000  |    |		.BLANK	0000[0x4]
0458 ; --------------------------------------------------------------------------------------
0458 ; SUBPROGRAM
0458 ; --------------------------------------------------------------------------------------
0458 045b       | [  |		.CONST	0x045b								; Address of begin
0459 0004       |    |		.CONST	0x0004								; Address of exception handler
045a 0001       |    |		.CONST	0x0001								; Number of locals
045b			BODY_0458:
045b			INIT_0458:
045b 00da       |    |		Load_Top	At_Offset_2
045c 8245       | E  |		Call	0x1,0x45
045d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
045e 0000 0000  |    |		.XXX[0x2]
0460 ; --------------------------------------------------------------------------------------
0460 ; SUBPROGRAM
0460 ; --------------------------------------------------------------------------------------
0460 046a       | j  |		.CONST	0x046a								; Address of begin
0461 0004       |    |		.CONST	0x0004								; Address of exception handler
0462 0002       |    |		.CONST	0x0002								; Number of locals
0463			INIT_0460:
0463 00da       |    |		Load_Top	At_Offset_2
0464 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0465 090f       |    |		Execute_Immediate	Binary_Scale,0xf
0466 4be8       |K   |		Short_Literal	0x3e8
0467 0270       | p  |		Execute	Discrete,Divide
0468 00e7       |    |		Load_Encached	Duration_Cache
0469 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
046a			BODY_0460:
046a 00db       |    |		Load_Top	At_Offset_3
046b 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
046c 090f       |    |		Execute_Immediate	Binary_Scale,0xf
046d 00d9       |    |		Load_Top	At_Offset_1
046e 0273       | s  |		Execute	Discrete,Plus
046f 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0470 4ff1       |O   |		Short_Literal	-0xf
0471 e5ff       |    |		Load	0x2,-0x1
0472 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0473 090f       |    |		Execute_Immediate	Binary_Scale,0xf
0474 602f       |`/  |		Indirect_Literal	Discrete,0x4a4,{0x00000000, 0x001e0000}
0475 0141       | A  |		Execute	Discrete,Multiply_And_Scale
0476 00d8       |    |		Load_Top	At_Offset_0
0477 00e7       |    |		Load_Encached	Duration_Cache
0478 0260       | `  |		Execute	Discrete,In_Type
0479 7001       |p   |		Jump_Nonzero	0x47b
047a 0801       |    |		Execute_Immediate	Raise,0x1
047b 00d9       |    |		Load_Top	At_Offset_1
047c 0273       | s  |		Execute	Discrete,Plus
047d 0059       | Y  |		Store_Top	Discrete,At_Offset_1
047e 4ff1       |O   |		Short_Literal	-0xf
047f e5ff       |    |		Load	0x2,-0x1
0480 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0481 090f       |    |		Execute_Immediate	Binary_Scale,0xf
0482 601d       |`   |		Indirect_Literal	Discrete,0x4a0,{0x00000000, 0x07080000}
0483 0141       | A  |		Execute	Discrete,Multiply_And_Scale
0484 00d8       |    |		Load_Top	At_Offset_0
0485 00e7       |    |		Load_Encached	Duration_Cache
0486 0260       | `  |		Execute	Discrete,In_Type
0487 7001       |p   |		Jump_Nonzero	0x489
0488 0801       |    |		Execute_Immediate	Raise,0x1
0489 00d9       |    |		Load_Top	At_Offset_1
048a 0273       | s  |		Execute	Discrete,Plus
048b 0059       | Y  |		Store_Top	Discrete,At_Offset_1
048c 4ff1       |O   |		Short_Literal	-0xf
048d e5ff       |    |		Load	0x2,-0x1
048e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
048f 090f       |    |		Execute_Immediate	Binary_Scale,0xf
0490 600b       |`   |		Indirect_Literal	Discrete,0x49c,{0x00000000, 0xa8c00000}
0491 0141       | A  |		Execute	Discrete,Multiply_And_Scale
0492 00d8       |    |		Load_Top	At_Offset_0
0493 00e7       |    |		Load_Encached	Duration_Cache
0494 0260       | `  |		Execute	Discrete,In_Type
0495 7001       |p   |		Jump_Nonzero	0x497
0496 0801       |    |		Execute_Immediate	Raise,0x1
0497 00d9       |    |		Load_Top	At_Offset_1
0498 0273       | s  |		Execute	Discrete,Plus
0499 0059       | Y  |		Store_Top	Discrete,At_Offset_1
049a 00d8       |    |		Load_Top	At_Offset_0
049b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
049c 0000 0000  |    |		.LITERAL	{0x00000000, 0xa8c00000}
04a0 0000 0000  |    |		.LITERAL	{0x00000000, 0x07080000}
04a4 0000 0000  |    |		.LITERAL	{0x00000000, 0x001e0000}
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04bc       |    |		.CONST	0x04bc								; Address of begin
04a9 0004       |    |		.CONST	0x0004								; Address of exception handler
04aa 0003       |    |		.CONST	0x0003								; Number of locals
04ab			INIT_04a8:
04ab e222       | "  |		Load	0x1,0x22
04ac 0322       | "  |		Declare_Variable	Record
04ad 4be8       |K   |		Short_Literal	0x3e8
04ae e5ff       |    |		Load	0x2,-0x1
04af 00d8       |    |		Load_Top	At_Offset_0
04b0 0c00       |    |		Execute_Immediate	Greater_Equal,0x0
04b1 7002       |p   |		Jump_Nonzero	0x4b4
04b2 606d       |`m  |		Indirect_Literal	Discrete,0x520,{0xffffffff, 0xffffc000}
04b3 7801       |x   |		Jump	0x4b5
04b4 6067       |`g  |		Indirect_Literal	Discrete,0x51c,{0x00000000, 0x00004000}
04b5 0273       | s  |		Execute	Discrete,Plus
04b6 09f1       |    |		Execute_Immediate	Binary_Scale,-0xf
04b7 e006       |    |		Load	0x0,0x6
04b8 025e       | ^  |		Execute	Discrete,Convert
04b9 8009       |    |		Call	0x0,0x9
04ba e006       |    |		Load	0x0,0x6
04bb 03f1       |    |		Declare_Variable	Discrete,With_Value
04bc			BODY_04a8:
04bc e5ff       |    |		Load	0x2,-0x1
04bd 0d00       |    |		Execute_Immediate	Less,0x0
04be 6802       |h   |		Jump_Zero	0x4c1
04bf e237       | 7  |		Load	0x1,0x37
04c0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04c1 6056       |`V  |		Indirect_Literal	Discrete,0x518,{0x00000000, 0x05265c00}
04c2 00d9       |    |		Load_Top	At_Offset_1
04c3 8007       |    |		Call	0x0,0x7
04c4 00d8       |    |		Load_Top	At_Offset_0
04c5 e21f       |    |		Load	0x1,0x1f
04c6 0260       | `  |		Execute	Discrete,In_Type
04c7 7001       |p   |		Jump_Nonzero	0x4c9
04c8 0801       |    |		Execute_Immediate	Raise,0x1
04c9 00da       |    |		Load_Top	At_Offset_2
04ca 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
04cb 00d8       |    |		Load_Top	At_Offset_0
04cc 604b       |`K  |		Indirect_Literal	Discrete,0x518,{0x00000000, 0x05265c00}
04cd 00db       |    |		Load_Top	At_Offset_3
04ce 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
04cf 8009       |    |		Call	0x0,0x9
04d0 0272       | r  |		Execute	Discrete,Minus
04d1 0059       | Y  |		Store_Top	Discrete,At_Offset_1
04d2 6041       |`A  |		Indirect_Literal	Discrete,0x514,{0x00000000, 0x0036ee80}
04d3 00d9       |    |		Load_Top	At_Offset_1
04d4 8007       |    |		Call	0x0,0x7
04d5 00d8       |    |		Load_Top	At_Offset_0
04d6 e220       |    |		Load	0x1,0x20
04d7 0260       | `  |		Execute	Discrete,In_Type
04d8 7001       |p   |		Jump_Nonzero	0x4da
04d9 0801       |    |		Execute_Immediate	Raise,0x1
04da 00da       |    |		Load_Top	At_Offset_2
04db 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
04dc 00d8       |    |		Load_Top	At_Offset_0
04dd 6036       |`6  |		Indirect_Literal	Discrete,0x514,{0x00000000, 0x0036ee80}
04de 00db       |    |		Load_Top	At_Offset_3
04df 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
04e0 8009       |    |		Call	0x0,0x9
04e1 0272       | r  |		Execute	Discrete,Minus
04e2 0059       | Y  |		Store_Top	Discrete,At_Offset_1
04e3 602c       |`,  |		Indirect_Literal	Discrete,0x510,{0x00000000, 0x0000ea60}
04e4 00d9       |    |		Load_Top	At_Offset_1
04e5 8007       |    |		Call	0x0,0x7
04e6 00d8       |    |		Load_Top	At_Offset_0
04e7 e20f       |    |		Load	0x1,0xf
04e8 0260       | `  |		Execute	Discrete,In_Type
04e9 7001       |p   |		Jump_Nonzero	0x4eb
04ea 0801       |    |		Execute_Immediate	Raise,0x1
04eb 00da       |    |		Load_Top	At_Offset_2
04ec 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
04ed 00d8       |    |		Load_Top	At_Offset_0
04ee 6021       |`!  |		Indirect_Literal	Discrete,0x510,{0x00000000, 0x0000ea60}
04ef 00db       |    |		Load_Top	At_Offset_3
04f0 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
04f1 8009       |    |		Call	0x0,0x9
04f2 0272       | r  |		Execute	Discrete,Minus
04f3 0059       | Y  |		Store_Top	Discrete,At_Offset_1
04f4 4be8       |K   |		Short_Literal	0x3e8
04f5 00d9       |    |		Load_Top	At_Offset_1
04f6 8007       |    |		Call	0x0,0x7
04f7 00d8       |    |		Load_Top	At_Offset_0
04f8 e210       |    |		Load	0x1,0x10
04f9 0260       | `  |		Execute	Discrete,In_Type
04fa 7001       |p   |		Jump_Nonzero	0x4fc
04fb 0801       |    |		Execute_Immediate	Raise,0x1
04fc 00da       |    |		Load_Top	At_Offset_2
04fd 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
04fe 00d8       |    |		Load_Top	At_Offset_0
04ff 4be8       |K   |		Short_Literal	0x3e8
0500 00db       |    |		Load_Top	At_Offset_3
0501 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0502 8009       |    |		Call	0x0,0x9
0503 0272       | r  |		Execute	Discrete,Minus
0504 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0505 00d8       |    |		Load_Top	At_Offset_0
0506 00d8       |    |		Load_Top	At_Offset_0
0507 e221       | !  |		Load	0x1,0x21
0508 0260       | `  |		Execute	Discrete,In_Type
0509 7001       |p   |		Jump_Nonzero	0x50b
050a 0801       |    |		Execute_Immediate	Raise,0x1
050b 00da       |    |		Load_Top	At_Offset_2
050c 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
050d 00d9       |    |		Load_Top	At_Offset_1
050e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
050f 0000       |    |		.XXX[0x1]
0510 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000ea60}
0514 0000 0000  |    |		.LITERAL	{0x00000000, 0x0036ee80}
0518 0000 0000  |    |		.LITERAL	{0x00000000, 0x05265c00}
051c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0520 ffff ffff  |    |		.LITERAL	{0xffffffff, 0xffffc000}
0524 0000 0000  |    |		.BLANK	0000[0x4]
0528 ; --------------------------------------------------------------------------------------
0528 ; SUBPROGRAM
0528 ; --------------------------------------------------------------------------------------
0528 052b       | +  |		.CONST	0x052b								; Address of begin
0529 0004       |    |		.CONST	0x0004								; Address of exception handler
052a 0001       |    |		.CONST	0x0001								; Number of locals
052b			BODY_0528:
052b			INIT_0528:
052b 00da       |    |		Load_Top	At_Offset_2
052c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
052d 6086       |`   |		Indirect_Literal	Discrete,0x5b4,{0x00000000, 0x0001869f}
052e 027d       | }  |		Execute	Discrete,Greater
052f 6809       |h   |		Jump_Zero	0x539
0530 4844       |HD  |		Short_Literal	0x44
0531 4830       |H0  |		Short_Literal	0x30
0532 4800       |H   |		Short_Literal	0x0
0533 480a       |H   |		Short_Literal	0xa
0534 e5ff       |    |		Load	0x2,-0x1
0535 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0536 800a       |    |		Call	0x0,0xa
0537 01cb       |    |		Execute	Vector,Append
0538 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0539 00da       |    |		Load_Top	At_Offset_2
053a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
053b 0c64       | d  |		Execute_Immediate	Greater_Equal,0x64
053c 6810       |h   |		Jump_Zero	0x54d
053d 482f       |H/  |		Short_Literal	0x2f
053e 4820       |H   |		Short_Literal	0x20
053f 4805       |H   |		Short_Literal	0x5
0540 480a       |H   |		Short_Literal	0xa
0541 e5ff       |    |		Load	0x2,-0x1
0542 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0543 800a       |    |		Call	0x0,0xa
0544 01cb       |    |		Execute	Vector,Append
0545 4830       |H0  |		Short_Literal	0x30
0546 4802       |H   |		Short_Literal	0x2
0547 480a       |H   |		Short_Literal	0xa
0548 e5ff       |    |		Load	0x2,-0x1
0549 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
054a 800a       |    |		Call	0x0,0xa
054b 01cc       |    |		Execute	Vector,Catenate
054c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
054d 00da       |    |		Load_Top	At_Offset_2
054e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
054f 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0550 6819       |h   |		Jump_Zero	0x56a
0551 483a       |H:  |		Short_Literal	0x3a
0552 482f       |H/  |		Short_Literal	0x2f
0553 4820       |H   |		Short_Literal	0x20
0554 4802       |H   |		Short_Literal	0x2
0555 480a       |H   |		Short_Literal	0xa
0556 e5ff       |    |		Load	0x2,-0x1
0557 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0558 800a       |    |		Call	0x0,0xa
0559 01cb       |    |		Execute	Vector,Append
055a 4830       |H0  |		Short_Literal	0x30
055b 4802       |H   |		Short_Literal	0x2
055c 480a       |H   |		Short_Literal	0xa
055d e5ff       |    |		Load	0x2,-0x1
055e 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
055f 800a       |    |		Call	0x0,0xa
0560 01cc       |    |		Execute	Vector,Catenate
0561 01cb       |    |		Execute	Vector,Append
0562 4830       |H0  |		Short_Literal	0x30
0563 4802       |H   |		Short_Literal	0x2
0564 480a       |H   |		Short_Literal	0xa
0565 e5ff       |    |		Load	0x2,-0x1
0566 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0567 800a       |    |		Call	0x0,0xa
0568 01cc       |    |		Execute	Vector,Catenate
0569 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
056a 00da       |    |		Load_Top	At_Offset_2
056b 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
056c 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
056d 6819       |h   |		Jump_Zero	0x587
056e 483a       |H:  |		Short_Literal	0x3a
056f 483a       |H:  |		Short_Literal	0x3a
0570 4820       |H   |		Short_Literal	0x20
0571 4802       |H   |		Short_Literal	0x2
0572 480a       |H   |		Short_Literal	0xa
0573 e5ff       |    |		Load	0x2,-0x1
0574 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0575 800a       |    |		Call	0x0,0xa
0576 01cb       |    |		Execute	Vector,Append
0577 4830       |H0  |		Short_Literal	0x30
0578 4802       |H   |		Short_Literal	0x2
0579 480a       |H   |		Short_Literal	0xa
057a e5ff       |    |		Load	0x2,-0x1
057b 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
057c 800a       |    |		Call	0x0,0xa
057d 01cc       |    |		Execute	Vector,Catenate
057e 01cb       |    |		Execute	Vector,Append
057f 4830       |H0  |		Short_Literal	0x30
0580 4802       |H   |		Short_Literal	0x2
0581 480a       |H   |		Short_Literal	0xa
0582 e5ff       |    |		Load	0x2,-0x1
0583 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0584 800a       |    |		Call	0x0,0xa
0585 01cc       |    |		Execute	Vector,Catenate
0586 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0587 00da       |    |		Load_Top	At_Offset_2
0588 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0589 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
058a 6819       |h   |		Jump_Zero	0x5a4
058b 482e       |H.  |		Short_Literal	0x2e
058c 483a       |H:  |		Short_Literal	0x3a
058d 4820       |H   |		Short_Literal	0x20
058e 4802       |H   |		Short_Literal	0x2
058f 480a       |H   |		Short_Literal	0xa
0590 e5ff       |    |		Load	0x2,-0x1
0591 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0592 800a       |    |		Call	0x0,0xa
0593 01cb       |    |		Execute	Vector,Append
0594 4830       |H0  |		Short_Literal	0x30
0595 4802       |H   |		Short_Literal	0x2
0596 480a       |H   |		Short_Literal	0xa
0597 e5ff       |    |		Load	0x2,-0x1
0598 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0599 800a       |    |		Call	0x0,0xa
059a 01cc       |    |		Execute	Vector,Catenate
059b 01cb       |    |		Execute	Vector,Append
059c 4830       |H0  |		Short_Literal	0x30
059d 4803       |H   |		Short_Literal	0x3
059e 480a       |H   |		Short_Literal	0xa
059f e5ff       |    |		Load	0x2,-0x1
05a0 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
05a1 800a       |    |		Call	0x0,0xa
05a2 01cc       |    |		Execute	Vector,Catenate
05a3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05a4 482e       |H.  |		Short_Literal	0x2e
05a5 4820       |H   |		Short_Literal	0x20
05a6 4802       |H   |		Short_Literal	0x2
05a7 480a       |H   |		Short_Literal	0xa
05a8 e5ff       |    |		Load	0x2,-0x1
05a9 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
05aa 800a       |    |		Call	0x0,0xa
05ab 01cb       |    |		Execute	Vector,Append
05ac 4830       |H0  |		Short_Literal	0x30
05ad 4803       |H   |		Short_Literal	0x3
05ae 480a       |H   |		Short_Literal	0xa
05af e5ff       |    |		Load	0x2,-0x1
05b0 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
05b1 800a       |    |		Call	0x0,0xa
05b2 01cc       |    |		Execute	Vector,Catenate
05b3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05b4 0000 0000  |    |		.LITERAL	{0x00000000, 0x0001869f}
05b8 ; --------------------------------------------------------------------------------------
05b8 ; SUBPROGRAM
05b8 ; --------------------------------------------------------------------------------------
05b8 05bb       |    |		.CONST	0x05bb								; Address of begin
05b9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ba 0001       |    |		.CONST	0x0001								; Number of locals
05bb			BODY_05b8:
05bb			INIT_05b8:
05bb 00da       |    |		Load_Top	At_Offset_2
05bc e23c       | <  |		Load	0x1,0x3c
05bd 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
05be 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05bf 0000       |    |		.XXX[0x1]
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 00da       |    |		Load_Top	At_Offset_2
05c4 8224       | $  |		Call	0x1,0x24
05c5 8225       | %  |		Call	0x1,0x25
05c6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05c7 0000       |    |		.XXX[0x1]
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05cb       |    |		.CONST	0x05cb								; Address of begin
05c9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ca 0001       |    |		.CONST	0x0001								; Number of locals
05cb			BODY_05c8:
05cb			INIT_05c8:
05cb 00da       |    |		Load_Top	At_Offset_2
05cc 8215       |    |		Call	0x1,0x15
05cd 8229       | )  |		Call	0x1,0x29
05ce 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05cf 0000       |    |		.XXX[0x1]
05d0 ; --------------------------------------------------------------------------------------
05d0 ; SUBPROGRAM
05d0 ; --------------------------------------------------------------------------------------
05d0 05d3       |    |		.CONST	0x05d3								; Address of begin
05d1 0004       |    |		.CONST	0x0004								; Address of exception handler
05d2 0001       |    |		.CONST	0x0001								; Number of locals
05d3			BODY_05d0:
05d3			INIT_05d0:
05d3 e002       |    |		Load	0x0,0x2
05d4 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
05d5 00db       |    |		Load_Top	At_Offset_3
05d6 e002       |    |		Load	0x0,0x2
05d7 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
05d8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05d9 0000 0000  |    |		.BLANK	0000[0x7]
05e0 ; --------------------------------------------------------------------------------------
05e0 ; SUBPROGRAM
05e0 ; --------------------------------------------------------------------------------------
05e0 05ec       |    |		.CONST	0x05ec								; Address of begin
05e1 0004       |    |		.CONST	0x0004								; Address of exception handler
05e2 0004       |    |		.CONST	0x0004								; Number of locals
05e3			INIT_05e0:
05e3 e212       |    |		Load	0x1,0x12
05e4 0322       | "  |		Declare_Variable	Record
05e5 8213       |    |		Call	0x1,0x13
05e6 00d9       |    |		Load_Top	At_Offset_1
05e7 017d       | }  |		Execute	Record,Structure_Write
05e8 00e7       |    |		Load_Encached	Duration_Cache
05e9 e5ff       |    |		Load	0x2,-0x1
05ea 00e3       |    |		Load_Encached	Natural_Cache
05eb 03f1       |    |		Declare_Variable	Discrete,With_Value
05ec			BODY_05e0:
05ec e5fe       |    |		Load	0x2,-0x2
05ed 00db       |    |		Load_Top	At_Offset_3
05ee 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
05ef e5fd       |    |		Load	0x2,-0x3
05f0 00db       |    |		Load_Top	At_Offset_3
05f1 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
05f2 00d8       |    |		Load_Top	At_Offset_0
05f3 0c0c       |    |		Execute_Immediate	Greater_Equal,0xc
05f4 6807       |h   |		Jump_Zero	0x5fc
05f5 4801       |H   |		Short_Literal	0x1
05f6 00db       |    |		Load_Top	At_Offset_3
05f7 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
05f8 00d8       |    |		Load_Top	At_Offset_0
05f9 0af4       |    |		Execute_Immediate	Plus,-0xc
05fa 0059       | Y  |		Store_Top	Discrete,At_Offset_1
05fb 7803       |x   |		Jump	0x5ff
05fc 4800       |H   |		Short_Literal	0x0
05fd 00db       |    |		Load_Top	At_Offset_3
05fe 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
05ff 00d8       |    |		Load_Top	At_Offset_0
0600 7004       |p   |		Jump_Nonzero	0x605
0601 480c       |H   |		Short_Literal	0xc
0602 00db       |    |		Load_Top	At_Offset_3
0603 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0604 7808       |x   |		Jump	0x60d
0605 00d8       |    |		Load_Top	At_Offset_0
0606 00d8       |    |		Load_Top	At_Offset_0
0607 e20e       |    |		Load	0x1,0xe
0608 0260       | `  |		Execute	Discrete,In_Type
0609 7001       |p   |		Jump_Nonzero	0x60b
060a 0801       |    |		Execute_Immediate	Raise,0x1
060b 00db       |    |		Load_Top	At_Offset_3
060c 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
060d 00da       |    |		Load_Top	At_Offset_2
060e 8228       | (  |		Call	0x1,0x28
060f 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0610 00d9       |    |		Load_Top	At_Offset_1
0611 0d00       |    |		Execute_Immediate	Less,0x0
0612 6804       |h   |		Jump_Zero	0x617
0613 00d9       |    |		Load_Top	At_Offset_1
0614 6007       |`   |		Indirect_Literal	Discrete,0x61c,{0x00000000, 0xa8c00000}
0615 0273       | s  |		Execute	Discrete,Plus
0616 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0617 00d9       |    |		Load_Top	At_Offset_1
0618 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0619 0000 0000  |    |		.XXX[0x3]
061b 0000       |    |
061c 0000 0000  |    |		.LITERAL	{0x00000000, 0xa8c00000}
0620 ; --------------------------------------------------------------------------------------
0620 ; SUBPROGRAM
0620 ; --------------------------------------------------------------------------------------
0620 0623       | #  |		.CONST	0x0623								; Address of begin
0621 0004       |    |		.CONST	0x0004								; Address of exception handler
0622 0001       |    |		.CONST	0x0001								; Number of locals
0623			BODY_0620:
0623			INIT_0620:
0623 00da       |    |		Load_Top	At_Offset_2
0624 8214       |    |		Call	0x1,0x14
0625 822d       | -  |		Call	0x1,0x2d
0626 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0627 0000       |    |		.XXX[0x1]
0628 ; --------------------------------------------------------------------------------------
0628 ; SUBPROGRAM
0628 ; --------------------------------------------------------------------------------------
0628 062f       | /  |		.CONST	0x062f								; Address of begin
0629 0004       |    |		.CONST	0x0004								; Address of exception handler
062a 0005       |    |		.CONST	0x0005								; Number of locals
062b			INIT_0628:
062b 00e2       |    |		Load_Encached	Integer_Cache
062c 03e9       |    |		Declare_Variable	Discrete,Duplicate
062d 03e9       |    |		Declare_Variable	Discrete,Duplicate
062e 03e9       |    |		Declare_Variable	Discrete,Duplicate
062f			BODY_0628:
062f e5ff       |    |		Load	0x2,-0x1
0630 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0631 0c03       |    |		Execute_Immediate	Greater_Equal,0x3
0632 6808       |h   |		Jump_Zero	0x63b
0633 e5ff       |    |		Load	0x2,-0x1
0634 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0635 a402       |    |		Store_Unchecked	0x2,0x2
0636 e5ff       |    |		Load	0x2,-0x1
0637 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0638 0aff       |    |		Execute_Immediate	Plus,-0x1
0639 005b       | [  |		Store_Top	Discrete,At_Offset_3
063a 7808       |x   |		Jump	0x643
063b e5ff       |    |		Load	0x2,-0x1
063c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
063d 0aff       |    |		Execute_Immediate	Plus,-0x1
063e c402       |    |		Store	0x2,0x2
063f e5ff       |    |		Load	0x2,-0x1
0640 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0641 0a0b       |    |		Execute_Immediate	Plus,0xb
0642 005b       | [  |		Store_Top	Discrete,At_Offset_3
0643 00db       |    |		Load_Top	At_Offset_3
0644 4864       |Hd  |		Short_Literal	0x64
0645 0270       | p  |		Execute	Discrete,Divide
0646 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0647 00db       |    |		Load_Top	At_Offset_3
0648 4864       |Hd  |		Short_Literal	0x64
0649 026f       | o  |		Execute	Discrete,Remainder
064a 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
064b 481a       |H   |		Short_Literal	0x1a
064c 00db       |    |		Load_Top	At_Offset_3
064d 0271       | q  |		Execute	Discrete,Times
064e 0afe       |    |		Execute_Immediate	Plus,-0x2
064f 480a       |H   |		Short_Literal	0xa
0650 0270       | p  |		Execute	Discrete,Divide
0651 e5ff       |    |		Load	0x2,-0x1
0652 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0653 0273       | s  |		Execute	Discrete,Plus
0654 00d9       |    |		Load_Top	At_Offset_1
0655 0273       | s  |		Execute	Discrete,Plus
0656 00d9       |    |		Load_Top	At_Offset_1
0657 09fe       |    |		Execute_Immediate	Binary_Scale,-0x2
0658 0273       | s  |		Execute	Discrete,Plus
0659 00da       |    |		Load_Top	At_Offset_2
065a 09fe       |    |		Execute_Immediate	Binary_Scale,-0x2
065b 0273       | s  |		Execute	Discrete,Plus
065c 00da       |    |		Load_Top	At_Offset_2
065d 0901       |    |		Execute_Immediate	Binary_Scale,0x1
065e 0272       | r  |		Execute	Discrete,Minus
065f 00d8       |    |		Load_Top	At_Offset_0
0660 00e2       |    |		Load_Encached	Integer_Cache
0661 0260       | `  |		Execute	Discrete,In_Type
0662 7001       |p   |		Jump_Nonzero	0x664
0663 0801       |    |		Execute_Immediate	Raise,0x1
0664 8246       | F  |		Call	0x1,0x46
0665 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0666 0000 0000  |    |		.XXX[0x2]
0668 ; --------------------------------------------------------------------------------------
0668 ; SUBPROGRAM
0668 ; --------------------------------------------------------------------------------------
0668 066b       | k  |		.CONST	0x066b								; Address of begin
0669 0004       |    |		.CONST	0x0004								; Address of exception handler
066a 0001       |    |		.CONST	0x0001								; Number of locals
066b			BODY_0668:
066b			INIT_0668:
066b 00da       |    |		Load_Top	At_Offset_2
066c 0aff       |    |		Execute_Immediate	Plus,-0x1
066d 4606       |F   |		Jump_Case	0x7
066e 7809       |x   |		Jump	0x678								; case 0x0
066f 780b       |x   |		Jump	0x67b								; case 0x1
0670 780d       |x   |		Jump	0x67e								; case 0x2
0671 780f       |x   |		Jump	0x681								; case 0x3
0672 7811       |x   |		Jump	0x684								; case 0x4
0673 7813       |x   |		Jump	0x687								; case 0x5
0674 7800       |x   |		Jump	0x675								; case 0x6
0675 0092 0815  |    |		Action	Push_String_Extended,0x815					; "Sunday"
0677 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0678 0092 0816  |    |		Action	Push_String_Extended,0x816					; "Monday"
067a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
067b 0092 0817  |    |		Action	Push_String_Extended,0x817					; "Tuesday"
067d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
067e 0092 0818  |    |		Action	Push_String_Extended,0x818					; "Wednesday"
0680 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0681 0092 0819  |    |		Action	Push_String_Extended,0x819					; "Thursday"
0683 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0684 0092 081a  |    |		Action	Push_String_Extended,0x81a					; "Friday"
0686 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0687 0092 081b  |    |		Action	Push_String_Extended,0x81b					; "Saturday"
0689 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
068a 0000 0000  |    |		.BLANK	0000[0x6]
0690 ; --------------------------------------------------------------------------------------
0690 ; SUBPROGRAM
0690 ; --------------------------------------------------------------------------------------
0690 0693       |    |		.CONST	0x0693								; Address of begin
0691 0004       |    |		.CONST	0x0004								; Address of exception handler
0692 0001       |    |		.CONST	0x0001								; Number of locals
0693			BODY_0690:
0693			INIT_0690:
0693 00da       |    |		Load_Top	At_Offset_2
0694 e5fe       |    |		Load	0x2,-0x2
0695 0273       | s  |		Execute	Discrete,Plus
0696 00d8       |    |		Load_Top	At_Offset_0
0697 00e2       |    |		Load_Encached	Integer_Cache
0698 0260       | `  |		Execute	Discrete,In_Type
0699 7001       |p   |		Jump_Nonzero	0x69b
069a 0801       |    |		Execute_Immediate	Raise,0x1
069b 8246       | F  |		Call	0x1,0x46
069c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
069d 0000 0000  |    |		.XXX[0x3]
069f 0000       |    |
06a0 ; --------------------------------------------------------------------------------------
06a0 ; SUBPROGRAM
06a0 ; --------------------------------------------------------------------------------------
06a0 06a3       |    |		.CONST	0x06a3								; Address of begin
06a1 0004       |    |		.CONST	0x0004								; Address of exception handler
06a2 0001       |    |		.CONST	0x0001								; Number of locals
06a3			BODY_06a0:
06a3			INIT_06a0:
06a3 00da       |    |		Load_Top	At_Offset_2
06a4 e5fe       |    |		Load	0x2,-0x2
06a5 0272       | r  |		Execute	Discrete,Minus
06a6 00d8       |    |		Load_Top	At_Offset_0
06a7 00e2       |    |		Load_Encached	Integer_Cache
06a8 0260       | `  |		Execute	Discrete,In_Type
06a9 7001       |p   |		Jump_Nonzero	0x6ab
06aa 0801       |    |		Execute_Immediate	Raise,0x1
06ab 8246       | F  |		Call	0x1,0x46
06ac 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06ad 0000 0000  |    |		.XXX[0x3]
06af 0000       |    |
06b0 ; --------------------------------------------------------------------------------------
06b0 ; SUBPROGRAM
06b0 ; --------------------------------------------------------------------------------------
06b0 06b7       |    |		.CONST	0x06b7								; Address of begin
06b1 0004       |    |		.CONST	0x0004								; Address of exception handler
06b2 0002       |    |		.CONST	0x0002								; Number of locals
06b3			INIT_06b0:
06b3 00da       |    |		Load_Top	At_Offset_2
06b4 e20d       |    |		Load	0x1,0xd
06b5 011c       |    |		Execute	Any,Convert_Unchecked
06b6 1c01       |    |		Execute_Immediate	Run_Utility,0x1
06b7			BODY_06b0:
06b7 e5fe       |    |		Load	0x2,-0x2
06b8 6803       |h   |		Jump_Zero	0x6bc
06b9 00d8       |    |		Load_Top	At_Offset_0
06ba 800b       |    |		Call	0x0,0xb
06bb 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06bc 00d8       |    |		Load_Top	At_Offset_0
06bd 01dd       |    |		Execute	Vector,First
06be 00d9       |    |		Load_Top	At_Offset_1
06bf 01dd       |    |		Execute	Vector,First
06c0 0a02       |    |		Execute_Immediate	Plus,0x2
06c1 00d8       |    |		Load_Top	At_Offset_0
06c2 00e2       |    |		Load_Encached	Integer_Cache
06c3 0260       | `  |		Execute	Discrete,In_Type
06c4 7001       |p   |		Jump_Nonzero	0x6c6
06c5 0801       |    |		Execute_Immediate	Raise,0x1
06c6 00da       |    |		Load_Top	At_Offset_2
06c7 01cf       |    |		Execute	Vector,Slice_Read
06c8 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06c9 0000 0000  |    |		.BLANK	0000[0x7]
06d0 ; --------------------------------------------------------------------------------------
06d0 ; SUBPROGRAM
06d0 ; --------------------------------------------------------------------------------------
06d0 06dd       |    |		.CONST	0x06dd								; Address of begin
06d1 0004       |    |		.CONST	0x0004								; Address of exception handler
06d2 0003       |    |		.CONST	0x0003								; Number of locals
06d3			INIT_06d0:
06d3 00e8       |    |		Load_Encached	Character_Cache
06d4 063a       | :  |		Execute_Immediate	Set_Value_Unchecked,0x3a
06d5 00db       |    |		Load_Top	At_Offset_3
06d6 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
06d7 e5ff       |    |		Load	0x2,-0x1
06d8 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
06d9 e239       | 9  |		Load	0x1,0x39
06da 01a7       |    |		Execute	Matrix,Field_Read
06db 00e2       |    |		Load_Encached	Integer_Cache
06dc 03f1       |    |		Declare_Variable	Discrete,With_Value
06dd			BODY_06d0:
06dd e5fe       |    |		Load	0x2,-0x2
06de 4603       |F   |		Jump_Case	0x4
06df 7820       |x   |		Jump	0x700								; case 0x0
06e0 7802       |x   |		Jump	0x6e3								; case 0x1
06e1 783f       |x?  |		Jump	0x721								; case 0x2
06e2 7800       |x   |		Jump	0x6e3								; case 0x3
06e3 e5fe       |    |		Load	0x2,-0x2
06e4 0f03       |    |		Execute_Immediate	Equal,0x3
06e5 6802       |h   |		Jump_Zero	0x6e8
06e6 485f       |H_  |		Short_Literal	0x5f
06e7 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
06e8 00d9       |    |		Load_Top	At_Offset_1
06e9 00da       |    |		Load_Top	At_Offset_2
06ea 4830       |H0  |		Short_Literal	0x30
06eb 4802       |H   |		Short_Literal	0x2
06ec 480a       |H   |		Short_Literal	0xa
06ed e403       |    |		Load	0x2,0x3
06ee 800a       |    |		Call	0x0,0xa
06ef 01cb       |    |		Execute	Vector,Append
06f0 4830       |H0  |		Short_Literal	0x30
06f1 4802       |H   |		Short_Literal	0x2
06f2 480a       |H   |		Short_Literal	0xa
06f3 e5ff       |    |		Load	0x2,-0x1
06f4 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
06f5 800a       |    |		Call	0x0,0xa
06f6 01cc       |    |		Execute	Vector,Catenate
06f7 01cb       |    |		Execute	Vector,Append
06f8 4830       |H0  |		Short_Literal	0x30
06f9 4802       |H   |		Short_Literal	0x2
06fa 480a       |H   |		Short_Literal	0xa
06fb e5ff       |    |		Load	0x2,-0x1
06fc 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
06fd 800a       |    |		Call	0x0,0xa
06fe 01cc       |    |		Execute	Vector,Catenate
06ff 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0700 4820       |H   |		Short_Literal	0x20
0701 00da       |    |		Load_Top	At_Offset_2
0702 00db       |    |		Load_Top	At_Offset_3
0703 4830       |H0  |		Short_Literal	0x30
0704 4800       |H   |		Short_Literal	0x0
0705 480a       |H   |		Short_Literal	0xa
0706 e5ff       |    |		Load	0x2,-0x1
0707 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0708 800a       |    |		Call	0x0,0xa
0709 01cb       |    |		Execute	Vector,Append
070a 4830       |H0  |		Short_Literal	0x30
070b 4802       |H   |		Short_Literal	0x2
070c 480a       |H   |		Short_Literal	0xa
070d e5ff       |    |		Load	0x2,-0x1
070e 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
070f 800a       |    |		Call	0x0,0xa
0710 01cc       |    |		Execute	Vector,Catenate
0711 01cb       |    |		Execute	Vector,Append
0712 4830       |H0  |		Short_Literal	0x30
0713 4802       |H   |		Short_Literal	0x2
0714 480a       |H   |		Short_Literal	0xa
0715 e5ff       |    |		Load	0x2,-0x1
0716 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0717 800a       |    |		Call	0x0,0xa
0718 01cc       |    |		Execute	Vector,Catenate
0719 01cb       |    |		Execute	Vector,Append
071a e5ff       |    |		Load	0x2,-0x1
071b 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
071c e211       |    |		Load	0x1,0x11
071d 011c       |    |		Execute	Any,Convert_Unchecked
071e 1c01       |    |		Execute_Immediate	Run_Utility,0x1
071f 01cc       |    |		Execute	Vector,Catenate
0720 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0721 00d9       |    |		Load_Top	At_Offset_1
0722 4830       |H0  |		Short_Literal	0x30
0723 4802       |H   |		Short_Literal	0x2
0724 480a       |H   |		Short_Literal	0xa
0725 e403       |    |		Load	0x2,0x3
0726 800a       |    |		Call	0x0,0xa
0727 01cb       |    |		Execute	Vector,Append
0728 4830       |H0  |		Short_Literal	0x30
0729 4802       |H   |		Short_Literal	0x2
072a 480a       |H   |		Short_Literal	0xa
072b e5ff       |    |		Load	0x2,-0x1
072c 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
072d 800a       |    |		Call	0x0,0xa
072e 01cc       |    |		Execute	Vector,Catenate
072f 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0730 ; --------------------------------------------------------------------------------------
0730 ; SUBPROGRAM
0730 ; --------------------------------------------------------------------------------------
0730 0740       | @  |		.CONST	0x0740								; Address of begin
0731 0004       |    |		.CONST	0x0004								; Address of exception handler
0732 0004       |    |		.CONST	0x0004								; Number of locals
0733			INIT_0730:
0733 00e8       |    |		Load_Encached	Character_Cache
0734 062f       | /  |		Execute_Immediate	Set_Value_Unchecked,0x2f
0735 00db       |    |		Load_Top	At_Offset_3
0736 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0737 4864       |Hd  |		Short_Literal	0x64
0738 026e       | n  |		Execute	Discrete,Modulo
0739 00e2       |    |		Load_Encached	Integer_Cache
073a 03f1       |    |		Declare_Variable	Discrete,With_Value
073b e5ff       |    |		Load	0x2,-0x1
073c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
073d 0a01       |    |		Execute_Immediate	Plus,0x1
073e 00e2       |    |		Load_Encached	Integer_Cache
073f 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0740			BODY_0730:
0740 e5fe       |    |		Load	0x2,-0x2
0741 4604       |F   |		Jump_Case	0x5
0742 7820       |x   |		Jump	0x763								; case 0x0
0743 7836       |x6  |		Jump	0x77a								; case 0x1
0744 784c       |xL  |		Jump	0x791								; case 0x2
0745 7801       |x   |		Jump	0x747								; case 0x3
0746 7800       |x   |		Jump	0x747								; case 0x4
0747 e5fe       |    |		Load	0x2,-0x2
0748 0f04       |    |		Execute_Immediate	Equal,0x4
0749 6802       |h   |		Jump_Zero	0x74c
074a 485f       |H_  |		Short_Literal	0x5f
074b 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
074c 00da       |    |		Load_Top	At_Offset_2
074d 00db       |    |		Load_Top	At_Offset_3
074e 4830       |H0  |		Short_Literal	0x30
074f 4802       |H   |		Short_Literal	0x2
0750 480a       |H   |		Short_Literal	0xa
0751 e403       |    |		Load	0x2,0x3
0752 800a       |    |		Call	0x0,0xa
0753 01cb       |    |		Execute	Vector,Append
0754 4830       |H0  |		Short_Literal	0x30
0755 4802       |H   |		Short_Literal	0x2
0756 480a       |H   |		Short_Literal	0xa
0757 e404       |    |		Load	0x2,0x4
0758 800a       |    |		Call	0x0,0xa
0759 01cc       |    |		Execute	Vector,Catenate
075a 01cb       |    |		Execute	Vector,Append
075b 4830       |H0  |		Short_Literal	0x30
075c 4802       |H   |		Short_Literal	0x2
075d 480a       |H   |		Short_Literal	0xa
075e e5ff       |    |		Load	0x2,-0x1
075f 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0760 800a       |    |		Call	0x0,0xa
0761 01cc       |    |		Execute	Vector,Catenate
0762 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0763 482c       |H,  |		Short_Literal	0x2c
0764 4820       |H   |		Short_Literal	0x20
0765 4801       |H   |		Short_Literal	0x1
0766 e5ff       |    |		Load	0x2,-0x1
0767 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0768 8240       | @  |		Call	0x1,0x40
0769 01cb       |    |		Execute	Vector,Append
076a 4830       |H0  |		Short_Literal	0x30
076b 4800       |H   |		Short_Literal	0x0
076c 480a       |H   |		Short_Literal	0xa
076d e5ff       |    |		Load	0x2,-0x1
076e 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
076f 800a       |    |		Call	0x0,0xa
0770 01cc       |    |		Execute	Vector,Catenate
0771 01cb       |    |		Execute	Vector,Append
0772 4820       |H   |		Short_Literal	0x20
0773 4805       |H   |		Short_Literal	0x5
0774 480a       |H   |		Short_Literal	0xa
0775 e5ff       |    |		Load	0x2,-0x1
0776 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0777 800a       |    |		Call	0x0,0xa
0778 01cc       |    |		Execute	Vector,Catenate
0779 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
077a 00da       |    |		Load_Top	At_Offset_2
077b 00db       |    |		Load_Top	At_Offset_3
077c 4820       |H   |		Short_Literal	0x20
077d 4802       |H   |		Short_Literal	0x2
077e 480a       |H   |		Short_Literal	0xa
077f e404       |    |		Load	0x2,0x4
0780 800a       |    |		Call	0x0,0xa
0781 01cb       |    |		Execute	Vector,Append
0782 4830       |H0  |		Short_Literal	0x30
0783 4802       |H   |		Short_Literal	0x2
0784 480a       |H   |		Short_Literal	0xa
0785 e5ff       |    |		Load	0x2,-0x1
0786 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0787 800a       |    |		Call	0x0,0xa
0788 01cc       |    |		Execute	Vector,Catenate
0789 01cb       |    |		Execute	Vector,Append
078a 4830       |H0  |		Short_Literal	0x30
078b 4802       |H   |		Short_Literal	0x2
078c 480a       |H   |		Short_Literal	0xa
078d e403       |    |		Load	0x2,0x3
078e 800a       |    |		Call	0x0,0xa
078f 01cc       |    |		Execute	Vector,Catenate
0790 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0791 482d       |H-  |		Short_Literal	0x2d
0792 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0793 00da       |    |		Load_Top	At_Offset_2
0794 00db       |    |		Load_Top	At_Offset_3
0795 4820       |H   |		Short_Literal	0x20
0796 4802       |H   |		Short_Literal	0x2
0797 480a       |H   |		Short_Literal	0xa
0798 e5ff       |    |		Load	0x2,-0x1
0799 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
079a 800a       |    |		Call	0x0,0xa
079b 01cb       |    |		Execute	Vector,Append
079c 4800       |H   |		Short_Literal	0x0
079d e5ff       |    |		Load	0x2,-0x1
079e 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
079f 8240       | @  |		Call	0x1,0x40
07a0 01cc       |    |		Execute	Vector,Catenate
07a1 01cb       |    |		Execute	Vector,Append
07a2 4830       |H0  |		Short_Literal	0x30
07a3 4802       |H   |		Short_Literal	0x2
07a4 480a       |H   |		Short_Literal	0xa
07a5 e403       |    |		Load	0x2,0x3
07a6 800a       |    |		Call	0x0,0xa
07a7 01cc       |    |		Execute	Vector,Catenate
07a8 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07a9 0000 0000  |    |		.BLANK	0000[0x7]
07b0 ; --------------------------------------------------------------------------------------
07b0 ; SUBPROGRAM
07b0 ; --------------------------------------------------------------------------------------
07b0 07b3       |    |		.CONST	0x07b3								; Address of begin
07b1 0004       |    |		.CONST	0x0004								; Address of exception handler
07b2 0001       |    |		.CONST	0x0001								; Number of locals
07b3			BODY_07b0:
07b3			INIT_07b0:
07b3 00da       |    |		Load_Top	At_Offset_2
07b4 0f04       |    |		Execute_Immediate	Equal,0x4
07b5 6806       |h   |		Jump_Zero	0x7bc
07b6 00db       |    |		Load_Top	At_Offset_3
07b7 0f03       |    |		Execute_Immediate	Equal,0x3
07b8 6803       |h   |		Jump_Zero	0x7bc
07b9 0092 081c  |    |		Action	Push_String_Extended,0x81c					; "_at_"
07bb 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07bc 00da       |    |		Load_Top	At_Offset_2
07bd 7003       |p   |		Jump_Nonzero	0x7c1
07be 0092 081d  |    |		Action	Push_String_Extended,0x81d					; " at "
07c0 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07c1 0092 081e  |    |		Action	Push_String_Extended,0x81e					; " "
07c3 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07c4 0000 0000  |    |		.BLANK	0000[0x4]
07c8 ; --------------------------------------------------------------------------------------
07c8 ; SUBPROGRAM
07c8 ; --------------------------------------------------------------------------------------
07c8 07cb       |    |		.CONST	0x07cb								; Address of begin
07c9 0004       |    |		.CONST	0x0004								; Address of exception handler
07ca 0001       |    |		.CONST	0x0001								; Number of locals
07cb			BODY_07c8:
07cb			INIT_07c8:
07cb 00db       |    |		Load_Top	At_Offset_3
07cc 0f02       |    |		Execute_Immediate	Equal,0x2
07cd 6810       |h   |		Jump_Zero	0x7de
07ce 483a       |H:  |		Short_Literal	0x3a
07cf 4830       |H0  |		Short_Literal	0x30
07d0 4802       |H   |		Short_Literal	0x2
07d1 480a       |H   |		Short_Literal	0xa
07d2 e5ff       |    |		Load	0x2,-0x1
07d3 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
07d4 800a       |    |		Call	0x0,0xa
07d5 01cb       |    |		Execute	Vector,Append
07d6 4830       |H0  |		Short_Literal	0x30
07d7 4802       |H   |		Short_Literal	0x2
07d8 480a       |H   |		Short_Literal	0xa
07d9 e5ff       |    |		Load	0x2,-0x1
07da 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
07db 800a       |    |		Call	0x0,0xa
07dc 01cc       |    |		Execute	Vector,Catenate
07dd 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07de 00db       |    |		Load_Top	At_Offset_3
07df 00db       |    |		Load_Top	At_Offset_3
07e0 8241       | A  |		Call	0x1,0x41
07e1 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07e2 0000 0000  |    |		.BLANK	0000[0x6]
07e8 ; --------------------------------------------------------------------------------------
07e8 ; SUBPROGRAM
07e8 ; --------------------------------------------------------------------------------------
07e8 07f0       |    |		.CONST	0x07f0								; Address of begin
07e9 0004       |    |		.CONST	0x0004								; Address of exception handler
07ea 0002       |    |		.CONST	0x0002								; Number of locals
07eb			INIT_07e8:
07eb 00da       |    |		Load_Top	At_Offset_2
07ec 4807       |H   |		Short_Literal	0x7
07ed 026e       | n  |		Execute	Discrete,Modulo
07ee 00e2       |    |		Load_Encached	Integer_Cache
07ef 03f1       |    |		Declare_Variable	Discrete,With_Value
07f0			BODY_07e8:
07f0 00d8       |    |		Load_Top	At_Offset_0
07f1 7002       |p   |		Jump_Nonzero	0x7f4
07f2 4807       |H   |		Short_Literal	0x7
07f3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07f4 00d8       |    |		Load_Top	At_Offset_0
07f5 00d8       |    |		Load_Top	At_Offset_0
07f6 e22b       | +  |		Load	0x1,0x2b
07f7 0260       | `  |		Execute	Discrete,In_Type
07f8 7001       |p   |		Jump_Nonzero	0x7fa
07f9 0801       |    |		Execute_Immediate	Raise,0x1
07fa 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07fb ; --------------------------------------------------------------------------------------
07fb ; STRING TABLE
07fb ; --------------------------------------------------------------------------------------
07fb 004a       | J  |		.STRTAB	0x004a->0x0820							; "JANUARY"
07fc 004f       | O  |		.STRTAB	0x004f->0x0823							; "FEBRUARY"
07fd 0055       | U  |		.STRTAB	0x0055->0x0827							; "MARCH"
07fe 0058       | X  |		.STRTAB	0x0058->0x082a							; "APRIL"
07ff 005b       | [  |		.STRTAB	0x005b->0x082c							; "MAY"
0800 005c       | \  |		.STRTAB	0x005c->0x082e							; "JUNE"
0801 005e       | ^  |		.STRTAB	0x005e->0x0830							; "JULY"
0802 0060       | `  |		.STRTAB	0x0060->0x0832							; "AUGUST"
0803 0064       | d  |		.STRTAB	0x0064->0x0835							; "SEPTEMBER"
0804 006b       | k  |		.STRTAB	0x006b->0x0839							; "OCTOBER"
0805 0070       | p  |		.STRTAB	0x0070->0x083d							; "NOVEMBER"
0806 0076       | v  |		.STRTAB	0x0076->0x0841							; "DECEMBER"
0807 007c       | |  |		.STRTAB	0x007c->0x0845							; "AM"
0808 007c       | |  |		.STRTAB	0x007c->0x0846							; "PM"
0809 007c       | |  |		.STRTAB	0x007c->0x0847							; "EXPANDED"
080a 0082       |    |		.STRTAB	0x0082->0x084b							; "MILITARY"
080b 0088       |    |		.STRTAB	0x0088->0x084f							; "SHORT"
080c 008b       |    |		.STRTAB	0x008b->0x0851							; "ADA"
080d 008c       |    |		.STRTAB	0x008c->0x0853							; "EXPANDED"
080e 0092       |    |		.STRTAB	0x0092->0x0857							; "MONTH_DAY_YEAR"
080f 009e       |    |		.STRTAB	0x009e->0x085e							; "DAY_MONTH_YEAR"
0810 00aa       |    |		.STRTAB	0x00aa->0x0865							; "YEAR_MONTH_DAY"
0811 00b6       |    |		.STRTAB	0x00b6->0x086c							; "ADA"
0812 00b7       |    |		.STRTAB	0x00b7->0x086d							; "BOTH"
0813 00b9       |    |		.STRTAB	0x00b9->0x086f							; "TIME_ONLY"
0814 00c0       |    |		.STRTAB	0x00c0->0x0874							; "DATE_ONLY"
0815 00c7       |    |		.STRTAB	0x00c7->0x0878							; "Sunday"
0816 00cb       |    |		.STRTAB	0x00cb->0x087b							; "Monday"
0817 00cf       |    |		.STRTAB	0x00cf->0x087e							; "Tuesday"
0818 00d4       |    |		.STRTAB	0x00d4->0x0882							; "Wednesday"
0819 00db       |    |		.STRTAB	0x00db->0x0886							; "Thursday"
081a 00e1       |    |		.STRTAB	0x00e1->0x088a							; "Friday"
081b 00e5       |    |		.STRTAB	0x00e5->0x088d							; "Saturday"
081c 00eb       |    |		.STRTAB	0x00eb->0x0891							; "_at_"
081d 00ed       |    |		.STRTAB	0x00ed->0x0893							; " at "
081e 00ef       |    |		.STRTAB	0x00ef->0x0895							; " "
081f 00ee       |    |		.STREND 0x00ee->0x0896
0820 4a41 4e55  |JANU|		.STRTAB_STRINGS
0896 0000 0000  |    |		.XXX[0x2]
0898 ; --------------------------------------------------------------------------------------
0898 ; Debug Table
0898 ; --------------------------------------------------------------------------------------
0898 0004 0001  |    |		.DEBUG4	0x0004,0x0001,0x97da,0x0000,0x0001,0x0023
089e 000b 092a  |   *|		.DBG4T	0x000b,0x092a,0x8000,0x8000
08a2 0081 0974  |   t|		.DBG4T	0x0081,0x0974,0x8000,0x8000
08a6 024b 0000  | K  |		.DBG4T	0x024b,0x0000,0x0005,0x0000
08aa 0283 0000  |    |		.DBG4T	0x0283,0x0000,0x0005,0x0000
08ae 02ab 09c9  |    |		.DBG4T	0x02ab,0x09c9,0x0002,0x0000
08b2 02b3 09cc  |    |		.DBG4T	0x02b3,0x09cc,0x0002,0x0000
08b6 034b 09e9  | K  |		.DBG4T	0x034b,0x09e9,0x0002,0x0000
08ba 039b 09f9  |    |		.DBG4T	0x039b,0x09f9,0x0002,0x0000
08be 03a3 09fc  |    |		.DBG4T	0x03a3,0x09fc,0x0002,0x0000
08c2 03ab 09ff  |    |		.DBG4T	0x03ab,0x09ff,0x0002,0x0000
08c6 03bb 0a02  |    |		.DBG4T	0x03bb,0x0a02,0x0002,0x0000
08ca 03c3 0000  |    |		.DBG4T	0x03c3,0x0000,0x0005,0x0000
08ce 03eb 0000  |    |		.DBG4T	0x03eb,0x0000,0x0005,0x0000
08d2 0413 0000  |    |		.DBG4T	0x0413,0x0000,0x0005,0x0000
08d6 043b 0a05  | ;  |		.DBG4T	0x043b,0x0a05,0x0002,0x4000
08da 045b 0a0f  | [  |		.DBG4T	0x045b,0x0a0f,0x0002,0x0000
08de 0463 0a12  | c  |		.DBG4T	0x0463,0x0a12,0x0002,0x0000
08e2 04ab 0a1a  |    |		.DBG4T	0x04ab,0x0a1a,0x0002,0x8000
08e6 052b 0a2c  | + ,|		.DBG4T	0x052b,0x0a2c,0x0002,0x0000
08ea 05bb 0a39  |   9|		.DBG4T	0x05bb,0x0a39,0x0002,0x0000
08ee 05c3 0a3c  |   <|		.DBG4T	0x05c3,0x0a3c,0x0002,0x0000
08f2 05cb 0a3f  |   ?|		.DBG4T	0x05cb,0x0a3f,0x0002,0x0000
08f6 05d3 0a42  |   B|		.DBG4T	0x05d3,0x0a42,0x0002,0x0000
08fa 05e3 0a45  |   E|		.DBG4T	0x05e3,0x0a45,0x0002,0x0000
08fe 0623 0a57  | # W|		.DBG4T	0x0623,0x0a57,0x0002,0x0000
0902 062b 0a5a  | + Z|		.DBG4T	0x062b,0x0a5a,0x0002,0x0000
0906 066b 0a65  | k e|		.DBG4T	0x066b,0x0a65,0x0002,0x4000
090a 0693 0a77  |   w|		.DBG4T	0x0693,0x0a77,0x0002,0x0000
090e 06a3 0a7a  |   z|		.DBG4T	0x06a3,0x0a7a,0x0002,0x0000
0912 06b3 0a7d  |   }|		.DBG4T	0x06b3,0x0a7d,0x0002,0x0000
0916 06d3 0a83  |    |		.DBG4T	0x06d3,0x0a83,0x0002,0x4000
091a 0733 0a93  | 3  |		.DBG4T	0x0733,0x0a93,0x0002,0x4000
091e 07b3 0aa8  |    |		.DBG4T	0x07b3,0x0aa8,0x0002,0x0000
0922 07cb 0aaf  |    |		.DBG4T	0x07cb,0x0aaf,0x0002,0x0000
0926 07eb 0ab4  |    |		.DBG4T	0x07eb,0x0ab4,0x0002,0x0000
092a ; --------------------------------------------------------------------------------------
092a ; Debug chain
092a ; --------------------------------------------------------------------------------------
092a 0024 0000  | $  |		.DBGLEN	0x0024,0x0000
092c 000b 0010  |    |		.DBGLNO	0x000b,0x0010,0x0014,0x0018,0x001c,0x0021,0x002d,0x002f,0x0031,0x0033,0x0035,0x0037,0x0039,0x003b,0x0040,0x0045,0x004a,0x004c,0x004e,0x0052,0x0056,0x005a,0x0062,0x0064,0x0066,0x0068,0x006a,0x006c,0x006e,0x0070,0x0072,0x0076,0x0078,0x007a,0x007c,0x007e
0950 0005 0007  |    |		.XXX[0x24]
0952 0008 0009  |    |
0954 000a 000b  |    |
0956 000c 000d  |    |
0958 000e 000f  |    |
095a 0010 0011  |    |
095c 0012 0013  |    |
095e 0014 0015  |    |
0960 0016 0017  |    |
0962 0018 0019  |    |
0964 001a 001b  |    |
0966 001c 001d  |    |
0968 001e 001f  |    |
096a 0020 0021  |   !|
096c 0022 0023  | " #|
096e 0024 0025  | $ %|
0970 0026 0027  | & '|
0972 0028 0029  | ( )|
0974 ; --------------------------------------------------------------------------------------
0974 ; Debug chain
0974 ; --------------------------------------------------------------------------------------
0974 0029 0001  | )  |		.DBGLEN	0x0029,0x0001
0976 0081 0086  |    |		.DBGLNO	0x0081,0x0086,0x008c,0x0092,0x00cd,0x00f5,0x010c,0x011d,0x01a4,0x01e1,0x01ef,0x01fc,0x01fe,0x0200,0x0202,0x0204,0x0206,0x0208,0x020a,0x020c,0x020e,0x0210,0x0212,0x021d,0x021f,0x0223,0x0225,0x0227,0x0229,0x022b,0x022d,0x022f,0x0231,0x0233,0x0235,0x0237,0x0239,0x023b,0x023d,0x023f,0x0241,0x0243
09a0 000d 000e  |    |		.XXX[0x29]
09a2 000f 0010  |    |
09a4 0011 0012  |    |
09a6 0013 0014  |    |
09a8 0015 0017  |    |
09aa 0018 0019  |    |
09ac 001a 001b  |    |
09ae 001c 001d  |    |
09b0 001e 001f  |    |
09b2 0020 0021  |   !|
09b4 0022 0023  | " #|
09b6 0024 0025  | $ %|
09b8 0026 0027  | & '|
09ba 0028 0029  | ( )|
09bc 002a 002b  | * +|
09be 002c 002d  | , -|
09c0 002e 002f  | . /|
09c2 0031 0032  | 1 2|
09c4 0033 0034  | 3 4|
09c6 0035 0036  | 5 6|
09c8 0037       | 7  |
09c9 ; --------------------------------------------------------------------------------------
09c9 ; Debug chain
09c9 ; --------------------------------------------------------------------------------------
09c9 0000 0001  |    |		.DBGLEN	0x0000,0x0001
09cb 02ab       |    |		.DBGLNO	0x02ab
09cc ; --------------------------------------------------------------------------------------
09cc ; Debug chain
09cc ; --------------------------------------------------------------------------------------
09cc 0008 0013  |    |		.DBGLEN	0x0008,0x0013
09ce 02b3 02b5  |    |		.DBGLNO	0x02b3,0x02b5,0x02b7,0x02b9,0x02bb,0x02bd,0x02bf,0x02c1,0x02c4,0x02d3,0x02d6,0x02df,0x02e2,0x02ec,0x02f0,0x02f4,0x02f7,0x02fb,0x02ff,0x0301,0x0304,0x0308,0x0310,0x0317,0x031e,0x0326,0x032e
09e9 ; --------------------------------------------------------------------------------------
09e9 ; Debug chain
09e9 ; --------------------------------------------------------------------------------------
09e9 0004 000a  |    |		.DBGLEN	0x0004,0x000a
09eb 034b 034d  | K M|		.DBGLNO	0x034b,0x034d,0x034f,0x0351,0x0353,0x0356,0x0360,0x0363,0x036b,0x036f,0x0376,0x037a,0x037e,0x0391
09f9 ; --------------------------------------------------------------------------------------
09f9 ; Debug chain
09f9 ; --------------------------------------------------------------------------------------
09f9 0000 0001  |    |		.DBGLEN	0x0000,0x0001
09fb 039b       |    |		.DBGLNO	0x039b
09fc ; --------------------------------------------------------------------------------------
09fc ; Debug chain
09fc ; --------------------------------------------------------------------------------------
09fc 0000 0001  |    |		.DBGLEN	0x0000,0x0001
09fe 03a3       |    |		.DBGLNO	0x03a3
09ff ; --------------------------------------------------------------------------------------
09ff ; Debug chain
09ff ; --------------------------------------------------------------------------------------
09ff 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0a01 03ab       |    |		.DBGLNO	0x03ab
0a02 ; --------------------------------------------------------------------------------------
0a02 ; Debug chain
0a02 ; --------------------------------------------------------------------------------------
0a02 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0a04 03bb       |    |		.DBGLNO	0x03bb
0a05 ; --------------------------------------------------------------------------------------
0a05 ; Debug chain
0a05 ; --------------------------------------------------------------------------------------
0a05 0000 0004  |    |		.DBGLEN	0x0000,0x0004
0a07 043b 0440  | ; @|		.DBGLNO	0x043b,0x0440,0x0444,0x0450
0a0b 0001 0003  |    |		.XXX[0x4]
0a0d 0002 0004  |    |
0a0f ; --------------------------------------------------------------------------------------
0a0f ; Debug chain
0a0f ; --------------------------------------------------------------------------------------
0a0f 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0a11 045b       | [  |		.DBGLNO	0x045b
0a12 ; --------------------------------------------------------------------------------------
0a12 ; Debug chain
0a12 ; --------------------------------------------------------------------------------------
0a12 0001 0005  |    |		.DBGLEN	0x0001,0x0005
0a14 0463 046a  | c j|		.DBGLNO	0x0463,0x046a,0x0470,0x047e,0x048c,0x049a
0a1a ; --------------------------------------------------------------------------------------
0a1a ; Debug chain
0a1a ; --------------------------------------------------------------------------------------
0a1a 0002 000c  |    |		.DBGLEN	0x0002,0x000c
0a1c 04ab 04ad  |    |		.DBGLNO	0x04ab,0x04ad,0x04bc,0x04bf,0x04c1,0x04cb,0x04d2,0x04dc,0x04e3,0x04ed,0x04f4,0x04fe,0x0505,0x050d
0a2a 0001 0006  |    |		.XXX[0x2]
0a2c ; --------------------------------------------------------------------------------------
0a2c ; Debug chain
0a2c ; --------------------------------------------------------------------------------------
0a2c 0000 000b  |    |		.DBGLEN	0x0000,0x000b
0a2e 052b 0530  | + 0|		.DBGLNO	0x052b,0x0530,0x0539,0x053d,0x054d,0x0551,0x056a,0x056e,0x0587,0x058b,0x05a4
0a39 ; --------------------------------------------------------------------------------------
0a39 ; Debug chain
0a39 ; --------------------------------------------------------------------------------------
0a39 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0a3b 05bb       |    |		.DBGLNO	0x05bb
0a3c ; --------------------------------------------------------------------------------------
0a3c ; Debug chain
0a3c ; --------------------------------------------------------------------------------------
0a3c 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0a3e 05c3       |    |		.DBGLNO	0x05c3
0a3f ; --------------------------------------------------------------------------------------
0a3f ; Debug chain
0a3f ; --------------------------------------------------------------------------------------
0a3f 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0a41 05cb       |    |		.DBGLNO	0x05cb
0a42 ; --------------------------------------------------------------------------------------
0a42 ; Debug chain
0a42 ; --------------------------------------------------------------------------------------
0a42 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0a44 05d3       |    |		.DBGLNO	0x05d3
0a45 ; --------------------------------------------------------------------------------------
0a45 ; Debug chain
0a45 ; --------------------------------------------------------------------------------------
0a45 0003 000d  |    |		.DBGLEN	0x0003,0x000d
0a47 05e3 05e8  |    |		.DBGLNO	0x05e3,0x05e8,0x05e9,0x05ec,0x05ef,0x05f2,0x05f5,0x05f8,0x05fc,0x05ff,0x0601,0x0605,0x060d,0x0610,0x0613,0x0617
0a57 ; --------------------------------------------------------------------------------------
0a57 ; Debug chain
0a57 ; --------------------------------------------------------------------------------------
0a57 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0a59 0623       | #  |		.DBGLNO	0x0623
0a5a ; --------------------------------------------------------------------------------------
0a5a ; Debug chain
0a5a ; --------------------------------------------------------------------------------------
0a5a 0001 0008  |    |		.DBGLEN	0x0001,0x0008
0a5c 062b 062f  | + /|		.DBGLNO	0x062b,0x062f,0x0633,0x0636,0x063b,0x063f,0x0643,0x0647,0x064b
0a65 ; --------------------------------------------------------------------------------------
0a65 ; Debug chain
0a65 ; --------------------------------------------------------------------------------------
0a65 0000 0008  |    |		.DBGLEN	0x0000,0x0008
0a67 066b 0675  | k u|		.DBGLNO	0x066b,0x0675,0x0678,0x067b,0x067e,0x0681,0x0684,0x0687
0a6f 0001 0008  |    |		.XXX[0x8]
0a71 0002 0003  |    |
0a73 0004 0005  |    |
0a75 0006 0007  |    |
0a77 ; --------------------------------------------------------------------------------------
0a77 ; Debug chain
0a77 ; --------------------------------------------------------------------------------------
0a77 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0a79 0693       |    |		.DBGLNO	0x0693
0a7a ; --------------------------------------------------------------------------------------
0a7a ; Debug chain
0a7a ; --------------------------------------------------------------------------------------
0a7a 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0a7c 06a3       |    |		.DBGLNO	0x06a3
0a7d ; --------------------------------------------------------------------------------------
0a7d ; Debug chain
0a7d ; --------------------------------------------------------------------------------------
0a7d 0001 0003  |    |		.DBGLEN	0x0001,0x0003
0a7f 06b3 06b7  |    |		.DBGLNO	0x06b3,0x06b7,0x06b9,0x06bc
0a83 ; --------------------------------------------------------------------------------------
0a83 ; Debug chain
0a83 ; --------------------------------------------------------------------------------------
0a83 0002 0006  |    |		.DBGLEN	0x0002,0x0006
0a85 06d3 06d5  |    |		.DBGLNO	0x06d3,0x06d5,0x06dd,0x06e3,0x06e6,0x06e8,0x0700,0x0721
0a8d 0001 0003  |    |		.XXX[0x6]
0a8f 0004 0005  |    |
0a91 0002 0006  |    |
0a93 ; --------------------------------------------------------------------------------------
0a93 ; Debug chain
0a93 ; --------------------------------------------------------------------------------------
0a93 0003 0008  |    |		.DBGLEN	0x0003,0x0008
0a95 0733 0735  | 3 5|		.DBGLNO	0x0733,0x0735,0x073b,0x0740,0x0747,0x074a,0x074c,0x0763,0x077a,0x0791,0x0793
0aa0 0001 0006  |    |		.XXX[0x8]
0aa2 0007 0008  |    |
0aa4 0002 0003  |    |
0aa6 0004 0005  |    |
0aa8 ; --------------------------------------------------------------------------------------
0aa8 ; Debug chain
0aa8 ; --------------------------------------------------------------------------------------
0aa8 0000 0005  |    |		.DBGLEN	0x0000,0x0005
0aaa 07b3 07b9  |    |		.DBGLNO	0x07b3,0x07b9,0x07bc,0x07be,0x07c1
0aaf ; --------------------------------------------------------------------------------------
0aaf ; Debug chain
0aaf ; --------------------------------------------------------------------------------------
0aaf 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0ab1 07cb 07ce  |    |		.DBGLNO	0x07cb,0x07ce,0x07de
0ab4 ; --------------------------------------------------------------------------------------
0ab4 ; Debug chain
0ab4 ; --------------------------------------------------------------------------------------
0ab4 0001 0003  |    |		.DBGLEN	0x0001,0x0003
0ab6 07eb 07f0  |    |		.DBGLNO	0x07eb,0x07f0,0x07f2,0x07f4
0aba 0000 0000  |    |		.BLANK	0000[0x146]