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

⟦e2734c331⟧

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

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0598       |    |		.CONST	0x0598								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 0003       |    |		.CONST	0x0003								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 003b       | ;  |		.CONST	0x003b								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0025       | %  |		.CONST	0x0025								; Number of locals
000b			INIT_0008:
000b e20e       |    |		Load	0x1,0xe
000c 03d8       |    |		Declare_Variable	Float,Duplicate
000d 03d8       |    |		Declare_Variable	Float,Duplicate
000e 03d8       |    |		Declare_Variable	Float,Duplicate
000f 03d8       |    |		Declare_Variable	Float,Duplicate
0010 03d8       |    |		Declare_Variable	Float,Duplicate
0011 03d8       |    |		Declare_Variable	Float,Duplicate
0012 03d8       |    |		Declare_Variable	Float,Duplicate
0013 03d8       |    |		Declare_Variable	Float,Duplicate
0014 03d8       |    |		Declare_Variable	Float,Duplicate
0015 03d8       |    |		Declare_Variable	Float,Duplicate
0016 03d8       |    |		Declare_Variable	Float,Duplicate
0017 03d8       |    |		Declare_Variable	Float,Duplicate
0018 03d8       |    |		Declare_Variable	Float,Duplicate
0019 03d8       |    |		Declare_Variable	Float,Duplicate
001a 03d8       |    |		Declare_Variable	Float,Duplicate
001b 03d8       |    |		Declare_Variable	Float,Duplicate
001c 03d8       |    |		Declare_Variable	Float,Duplicate
001d 03d8       |    |		Declare_Variable	Float,Duplicate
001e e22c       | ,  |		Load	0x1,0x2c
001f 03e9       |    |		Declare_Variable	Discrete,Duplicate
0020 03e9       |    |		Declare_Variable	Discrete,Duplicate
0021 00e4       |    |		Load_Encached	Positive_Cache
0022 03e9       |    |		Declare_Variable	Discrete,Duplicate
0023 029f 01cb  |    |		Declare_Subprogram	INIT_01c8,For_Call
0025 029f 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Call
0027 029f 023b  |   ;|		Declare_Subprogram	INIT_0238,For_Call
0029 029f 0273  |   s|		Declare_Subprogram	INIT_0270,For_Call
002b 029f 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Call
002d 029f 0303  |    |		Declare_Subprogram	INIT_0300,For_Call
002f 029f 0353  |   S|		Declare_Subprogram	INIT_0350,For_Call
0031 029f 0383  |    |		Declare_Subprogram	INIT_0380,For_Call
0033 029f 03c3  |    |		Declare_Subprogram	INIT_03c0,For_Call
0035 029f 03fb  |    |		Declare_Subprogram	INIT_03f8,For_Call
0037 029f 043b  |   ;|		Declare_Subprogram	INIT_0438,For_Call
0039 029f 048b  |    |		Declare_Subprogram	INIT_0488,For_Call
003b			BODY_0008:
003b 4815       |H   |		Short_Literal	0x15
003c a418       |    |		Store_Unchecked	0x2,0x18
003d 4835       |H5  |		Short_Literal	0x35
003e a419       |    |		Store_Unchecked	0x2,0x19
003f e5ff       |    |		Load	0x2,-0x1
0040 0149       | I  |		Execute	Float,Less_Equal_Zero
0041 6802       |h   |		Jump_Zero	0x44
0042 e006       |    |		Load	0x0,0x6
0043 0257       | W  |		Execute	Discrete,Raise
0044 e5ff       |    |		Load	0x2,-0x1
0045 597a       |Yz  |		Indirect_Literal	Float,0x1c0,0.9844964370131493
0046 0243       | C  |		Execute	Float,Greater_Equal
0047 e5ff       |    |		Load	0x2,-0x1
0048 5973       |Ys  |		Indirect_Literal	Float,0x1bc,1.0157477085012943
0049 0242       | B  |		Execute	Float,Less_Equal
004a 0279       | y  |		Execute	Discrete,And
004b 686f       |ho  |		Jump_Zero	0xbb
004c e5ff       |    |		Load	0x2,-0x1
004d 596a       |Yj  |		Indirect_Literal	Float,0x1b8,1.0
004e 0243       | C  |		Execute	Float,Greater_Equal
004f 6805       |h   |		Jump_Zero	0x55
0050 e5ff       |    |		Load	0x2,-0x1
0051 5966       |Yf  |		Indirect_Literal	Float,0x1b8,1.0
0052 023c       | <  |		Execute	Float,Minus
0053 c403       |    |		Store	0x2,0x3
0054 7808       |x   |		Jump	0x5d
0055 e5ff       |    |		Load	0x2,-0x1
0056 595d       |Y]  |		Indirect_Literal	Float,0x1b4,0.5
0057 023c       | <  |		Execute	Float,Minus
0058 c403       |    |		Store	0x2,0x3
0059 e403       |    |		Load	0x2,0x3
005a 5959       |YY  |		Indirect_Literal	Float,0x1b4,0.5
005b 023c       | <  |		Execute	Float,Minus
005c c403       |    |		Store	0x2,0x3
005d e418       |    |		Load	0x2,0x18
005e e403       |    |		Load	0x2,0x3
005f e20e       |    |		Load	0x1,0xe
0060 0232       | 2  |		Execute	Float,Check_In_Type
0061 e004       |    |		Load	0x0,0x4
0062 e230       | 0  |		Load	0x1,0x30
0063 0096       |    |		Execute	Package,Entry
0064 c404       |    |		Store	0x2,0x4
0065 e403       |    |		Load	0x2,0x3
0066 e404       |    |		Load	0x2,0x4
0067 023c       | <  |		Execute	Float,Minus
0068 c405       |    |		Store	0x2,0x5
0069 594e       |YN  |		Indirect_Literal	Float,0x1b8,1.0
006a 5945       |YE  |		Indirect_Literal	Float,0x1b0,2.0
006b e403       |    |		Load	0x2,0x3
006c 023d       | =  |		Execute	Float,Plus
006d 023a       | :  |		Execute	Float,Divide
006e c406       |    |		Store	0x2,0x6
006f 5940       |Y@  |		Indirect_Literal	Float,0x1b0,2.0
0070 e403       |    |		Load	0x2,0x3
0071 023b       | ;  |		Execute	Float,Times
0072 e406       |    |		Load	0x2,0x6
0073 023b       | ;  |		Execute	Float,Times
0074 c407       |    |		Store	0x2,0x7
0075 e407       |    |		Load	0x2,0x7
0076 00d8       |    |		Load_Top	At_Offset_0
0077 023b       | ;  |		Execute	Float,Times
0078 c40a       |    |		Store	0x2,0xa
0079 e418       |    |		Load	0x2,0x18
007a e407       |    |		Load	0x2,0x7
007b e20e       |    |		Load	0x1,0xe
007c 0232       | 2  |		Execute	Float,Check_In_Type
007d e004       |    |		Load	0x0,0x4
007e e230       | 0  |		Load	0x1,0x30
007f 0096       |    |		Execute	Package,Entry
0080 c408       |    |		Store	0x2,0x8
0081 e406       |    |		Load	0x2,0x6
0082 592d       |Y-  |		Indirect_Literal	Float,0x1b0,2.0
0083 e403       |    |		Load	0x2,0x3
0084 e408       |    |		Load	0x2,0x8
0085 023c       | <  |		Execute	Float,Minus
0086 023b       | ;  |		Execute	Float,Times
0087 e408       |    |		Load	0x2,0x8
0088 e404       |    |		Load	0x2,0x4
0089 023b       | ;  |		Execute	Float,Times
008a 023c       | <  |		Execute	Float,Minus
008b e408       |    |		Load	0x2,0x8
008c e405       |    |		Load	0x2,0x5
008d 023b       | ;  |		Execute	Float,Times
008e 023c       | <  |		Execute	Float,Minus
008f 023b       | ;  |		Execute	Float,Times
0090 c409       |    |		Store	0x2,0x9
0091 e20e       |    |		Load	0x1,0xe
0092 0122       | "  |		Execute	Any,Make_Root_Type
0093 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0094 00d8       |    |		Load_Top	At_Offset_0
0095 0d01       |    |		Execute_Immediate	Less,0x1
0096 7013       |p   |		Jump_Nonzero	0xaa
0097 00d8       |    |		Load_Top	At_Offset_0
0098 0c13       |    |		Execute_Immediate	Greater_Equal,0x13
0099 700a       |p   |		Jump_Nonzero	0xa4
009a 00d8       |    |		Load_Top	At_Offset_0
009b 0c07       |    |		Execute_Immediate	Greater_Equal,0x7
009c 680f       |h   |		Jump_Zero	0xac
009d 00d8       |    |		Load_Top	At_Offset_0
009e 0c10       |    |		Execute_Immediate	Greater_Equal,0x10
009f 680f       |h   |		Jump_Zero	0xaf
00a0 0f10       |    |		Execute_Immediate	Equal,0x10
00a1 7010       |p   |		Jump_Nonzero	0xb2
00a2 841d       |    |		Call	0x2,0x1d
00a3 7814       |x   |		Jump	0xb8
00a4 00d8       |    |		Load_Top	At_Offset_0
00a5 0c1c       |    |		Execute_Immediate	Greater_Equal,0x1c
00a6 680d       |h   |		Jump_Zero	0xb4
00a7 0c22       | "  |		Execute_Immediate	Greater_Equal,0x22
00a8 680e       |h   |		Jump_Zero	0xb7
00a9 08e2       |    |		Execute_Immediate	Raise,0xe2
00aa 00d1       |    |		Pop_Control	Pop_Count_1
00ab 7ffd       |    |		Jump	0xa9
00ac 00d1       |    |		Pop_Control	Pop_Count_1
00ad 841a       |    |		Call	0x2,0x1a
00ae 7809       |x   |		Jump	0xb8
00af 00d1       |    |		Pop_Control	Pop_Count_1
00b0 841b       |    |		Call	0x2,0x1b
00b1 7806       |x   |		Jump	0xb8
00b2 841c       |    |		Call	0x2,0x1c
00b3 7804       |x   |		Jump	0xb8
00b4 00d1       |    |		Pop_Control	Pop_Count_1
00b5 841e       |    |		Call	0x2,0x1e
00b6 7801       |x   |		Jump	0xb8
00b7 841f       |    |		Call	0x2,0x1f
00b8 e408       |    |		Load	0x2,0x8
00b9 c5fe       |    |		Store	0x2,-0x2
00ba 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00bb e230       | 0  |		Load	0x1,0x30
00bc 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00bd e230       | 0  |		Load	0x1,0x30
00be 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00bf e5ff       |    |		Load	0x2,-0x1
00c0 e20e       |    |		Load	0x1,0xe
00c1 0232       | 2  |		Execute	Float,Check_In_Type
00c2 e009       |    |		Load	0x0,0x9
00c3 e230       | 0  |		Load	0x1,0x30
00c4 0096       |    |		Execute	Package,Entry
00c5 c403       |    |		Store	0x2,0x3
00c6 c417       |    |		Store	0x2,0x17
00c7 e231       | 1  |		Load	0x1,0x31
00c8 0f10       |    |		Execute_Immediate	Equal,0x10
00c9 6812       |h   |		Jump_Zero	0xdc
00ca e417       |    |		Load	0x2,0x17
00cb 0902       |    |		Execute_Immediate	Binary_Scale,0x2
00cc a417       |    |		Store_Unchecked	0x2,0x17
00cd 00cf       |    |		Action	Mark_Auxiliary
00ce 7808       |x   |		Jump	0xd7
00cf e403       |    |		Load	0x2,0x3
00d0 00d8       |    |		Load_Top	At_Offset_0
00d1 023d       | =  |		Execute	Float,Plus
00d2 c403       |    |		Store	0x2,0x3
00d3 e417       |    |		Load	0x2,0x17
00d4 0aff       |    |		Execute_Immediate	Plus,-0x1
00d5 a417       |    |		Store_Unchecked	0x2,0x17
00d6 00c9       |    |		Action	Pop_Auxiliary_Loop
00d7 e403       |    |		Load	0x2,0x3
00d8 58db       |X   |		Indirect_Literal	Float,0x1b4,0.5
00d9 0244       | D  |		Execute	Float,Less
00da 77f4       |w   |		Jump_Nonzero	0xcf
00db 00ce       |    |		Action	Pop_Auxiliary
00dc 58cf       |X   |		Indirect_Literal	Float,0x1ac,128.0
00dd e403       |    |		Load	0x2,0x3
00de 023b       | ;  |		Execute	Float,Times
00df 0235       | 5  |		Execute	Float,Round_To_Discrete
00e0 e22c       | ,  |		Load	0x1,0x2c
00e1 025e       | ^  |		Execute	Discrete,Convert
00e2 a415       |    |		Store_Unchecked	0x2,0x15
00e3 e415       |    |		Load	0x2,0x15
00e4 0237       | 7  |		Execute	Float,Convert_From_Discrete
00e5 e20e       |    |		Load	0x1,0xe
00e6 0238       | 8  |		Execute	Float,Convert
00e7 58c0       |X   |		Indirect_Literal	Float,0x1a8,0.0078125
00e8 023b       | ;  |		Execute	Float,Times
00e9 c404       |    |		Store	0x2,0x4
00ea e403       |    |		Load	0x2,0x3
00eb e404       |    |		Load	0x2,0x4
00ec 0243       | C  |		Execute	Float,Greater_Equal
00ed 6805       |h   |		Jump_Zero	0xf3
00ee e403       |    |		Load	0x2,0x3
00ef e404       |    |		Load	0x2,0x4
00f0 023c       | <  |		Execute	Float,Minus
00f1 c40d       |    |		Store	0x2,0xd
00f2 780a       |x   |		Jump	0xfd
00f3 e404       |    |		Load	0x2,0x4
00f4 58bf       |X   |		Indirect_Literal	Float,0x1b4,0.5
00f5 023b       | ;  |		Execute	Float,Times
00f6 c405       |    |		Store	0x2,0x5
00f7 e403       |    |		Load	0x2,0x3
00f8 e405       |    |		Load	0x2,0x5
00f9 023c       | <  |		Execute	Float,Minus
00fa e405       |    |		Load	0x2,0x5
00fb 023c       | <  |		Execute	Float,Minus
00fc c40d       |    |		Store	0x2,0xd
00fd e404       |    |		Load	0x2,0x4
00fe 00d8       |    |		Load_Top	At_Offset_0
00ff 023d       | =  |		Execute	Float,Plus
0100 c404       |    |		Store	0x2,0x4
0101 e40d       |    |		Load	0x2,0xd
0102 00d8       |    |		Load_Top	At_Offset_0
0103 023d       | =  |		Execute	Float,Plus
0104 c405       |    |		Store	0x2,0x5
0105 e417       |    |		Load	0x2,0x17
0106 0aff       |    |		Execute_Immediate	Plus,-0x1
0107 a417       |    |		Store_Unchecked	0x2,0x17
0108 58af       |X   |		Indirect_Literal	Float,0x1b8,1.0
0109 e404       |    |		Load	0x2,0x4
010a e40d       |    |		Load	0x2,0xd
010b 023d       | =  |		Execute	Float,Plus
010c 023a       | :  |		Execute	Float,Divide
010d c406       |    |		Store	0x2,0x6
010e e405       |    |		Load	0x2,0x5
010f e406       |    |		Load	0x2,0x6
0110 023b       | ;  |		Execute	Float,Times
0111 c407       |    |		Store	0x2,0x7
0112 e407       |    |		Load	0x2,0x7
0113 00d8       |    |		Load_Top	At_Offset_0
0114 023b       | ;  |		Execute	Float,Times
0115 c40a       |    |		Store	0x2,0xa
0116 e418       |    |		Load	0x2,0x18
0117 e407       |    |		Load	0x2,0x7
0118 e20e       |    |		Load	0x1,0xe
0119 0232       | 2  |		Execute	Float,Check_In_Type
011a e004       |    |		Load	0x0,0x4
011b e230       | 0  |		Load	0x1,0x30
011c 0096       |    |		Execute	Package,Entry
011d c408       |    |		Store	0x2,0x8
011e e418       |    |		Load	0x2,0x18
011f e40d       |    |		Load	0x2,0xd
0120 e20e       |    |		Load	0x1,0xe
0121 0232       | 2  |		Execute	Float,Check_In_Type
0122 e004       |    |		Load	0x0,0x4
0123 e230       | 0  |		Load	0x1,0x30
0124 0096       |    |		Execute	Package,Entry
0125 c40e       |    |		Store	0x2,0xe
0126 e40d       |    |		Load	0x2,0xd
0127 e40e       |    |		Load	0x2,0xe
0128 023c       | <  |		Execute	Float,Minus
0129 c40f       |    |		Store	0x2,0xf
012a e406       |    |		Load	0x2,0x6
012b e405       |    |		Load	0x2,0x5
012c e408       |    |		Load	0x2,0x8
012d e404       |    |		Load	0x2,0x4
012e 023b       | ;  |		Execute	Float,Times
012f 023c       | <  |		Execute	Float,Minus
0130 e408       |    |		Load	0x2,0x8
0131 e40e       |    |		Load	0x2,0xe
0132 023b       | ;  |		Execute	Float,Times
0133 023c       | <  |		Execute	Float,Minus
0134 e408       |    |		Load	0x2,0x8
0135 e40f       |    |		Load	0x2,0xf
0136 023b       | ;  |		Execute	Float,Times
0137 023c       | <  |		Execute	Float,Minus
0138 023b       | ;  |		Execute	Float,Times
0139 c409       |    |		Store	0x2,0x9
013a e20e       |    |		Load	0x1,0xe
013b 0122       | "  |		Execute	Any,Make_Root_Type
013c 1c01       |    |		Execute_Immediate	Run_Utility,0x1
013d 00d8       |    |		Load_Top	At_Offset_0
013e 0d01       |    |		Execute_Immediate	Less,0x1
013f 7013       |p   |		Jump_Nonzero	0x153
0140 00d8       |    |		Load_Top	At_Offset_0
0141 0c13       |    |		Execute_Immediate	Greater_Equal,0x13
0142 700a       |p   |		Jump_Nonzero	0x14d
0143 00d8       |    |		Load_Top	At_Offset_0
0144 0c07       |    |		Execute_Immediate	Greater_Equal,0x7
0145 680f       |h   |		Jump_Zero	0x155
0146 00d8       |    |		Load_Top	At_Offset_0
0147 0c10       |    |		Execute_Immediate	Greater_Equal,0x10
0148 680f       |h   |		Jump_Zero	0x158
0149 0f10       |    |		Execute_Immediate	Equal,0x10
014a 7010       |p   |		Jump_Nonzero	0x15b
014b 8423       | #  |		Call	0x2,0x23
014c 7814       |x   |		Jump	0x161
014d 00d8       |    |		Load_Top	At_Offset_0
014e 0c1c       |    |		Execute_Immediate	Greater_Equal,0x1c
014f 680d       |h   |		Jump_Zero	0x15d
0150 0c22       | "  |		Execute_Immediate	Greater_Equal,0x22
0151 680e       |h   |		Jump_Zero	0x160
0152 08e2       |    |		Execute_Immediate	Raise,0xe2
0153 00d1       |    |		Pop_Control	Pop_Count_1
0154 7ffd       |    |		Jump	0x152
0155 00d1       |    |		Pop_Control	Pop_Count_1
0156 8420       |    |		Call	0x2,0x20
0157 7809       |x   |		Jump	0x161
0158 00d1       |    |		Pop_Control	Pop_Count_1
0159 8421       | !  |		Call	0x2,0x21
015a 7806       |x   |		Jump	0x161
015b 8422       | "  |		Call	0x2,0x22
015c 7804       |x   |		Jump	0x161
015d 00d1       |    |		Pop_Control	Pop_Count_1
015e 8424       | $  |		Call	0x2,0x24
015f 7801       |x   |		Jump	0x161
0160 8425       | %  |		Call	0x2,0x25
0161 e417       |    |		Load	0x2,0x17
0162 0237       | 7  |		Execute	Float,Convert_From_Discrete
0163 e20e       |    |		Load	0x1,0xe
0164 0238       | 8  |		Execute	Float,Convert
0165 c412       |    |		Store	0x2,0x12
0166 e412       |    |		Load	0x2,0x12
0167 e23f       | ?  |		Load	0x1,0x3f
0168 023b       | ;  |		Execute	Float,Times
0169 4800       |H   |		Short_Literal	0x0
016a e415       |    |		Load	0x2,0x15
016b e246       | F  |		Load	0x1,0x46
016c 01a7       |    |		Execute	Matrix,Field_Read
016d 023d       | =  |		Execute	Float,Plus
016e c411       |    |		Store	0x2,0x11
016f e412       |    |		Load	0x2,0x12
0170 e240       | @  |		Load	0x1,0x40
0171 023b       | ;  |		Execute	Float,Times
0172 4801       |H   |		Short_Literal	0x1
0173 e415       |    |		Load	0x2,0x15
0174 e246       | F  |		Load	0x1,0x46
0175 01a7       |    |		Execute	Matrix,Field_Read
0176 023d       | =  |		Execute	Float,Plus
0177 c412       |    |		Store	0x2,0x12
0178 e419       |    |		Load	0x2,0x19
0179 0afe       |    |		Execute_Immediate	Plus,-0x2
017a 00d8       |    |		Load_Top	At_Offset_0
017b 00e4       |    |		Load_Encached	Positive_Cache
017c 0260       | `  |		Execute	Discrete,In_Type
017d 7001       |p   |		Jump_Nonzero	0x17f
017e 0801       |    |		Execute_Immediate	Raise,0x1
017f e411       |    |		Load	0x2,0x11
0180 e408       |    |		Load	0x2,0x8
0181 023d       | =  |		Execute	Float,Plus
0182 e20e       |    |		Load	0x1,0xe
0183 0232       | 2  |		Execute	Float,Check_In_Type
0184 e004       |    |		Load	0x0,0x4
0185 e230       | 0  |		Load	0x1,0x30
0186 0096       |    |		Execute	Package,Entry
0187 c413       |    |		Store	0x2,0x13
0188 e411       |    |		Load	0x2,0x11
0189 e413       |    |		Load	0x2,0x13
018a 023c       | <  |		Execute	Float,Minus
018b e408       |    |		Load	0x2,0x8
018c 023d       | =  |		Execute	Float,Plus
018d c414       |    |		Store	0x2,0x14
018e e414       |    |		Load	0x2,0x14
018f e412       |    |		Load	0x2,0x12
0190 023d       | =  |		Execute	Float,Plus
0191 c414       |    |		Store	0x2,0x14
0192 e418       |    |		Load	0x2,0x18
0193 e413       |    |		Load	0x2,0x13
0194 e40c       |    |		Load	0x2,0xc
0195 023d       | =  |		Execute	Float,Plus
0196 e20e       |    |		Load	0x1,0xe
0197 0232       | 2  |		Execute	Float,Check_In_Type
0198 e004       |    |		Load	0x0,0x4
0199 e230       | 0  |		Load	0x1,0x30
019a 0096       |    |		Execute	Package,Entry
019b c40b       |    |		Store	0x2,0xb
019c e413       |    |		Load	0x2,0x13
019d e40b       |    |		Load	0x2,0xb
019e 023c       | <  |		Execute	Float,Minus
019f e40c       |    |		Load	0x2,0xc
01a0 023d       | =  |		Execute	Float,Plus
01a1 e414       |    |		Load	0x2,0x14
01a2 023d       | =  |		Execute	Float,Plus
01a3 c5fd       |    |		Store	0x2,-0x3
01a4 e40b       |    |		Load	0x2,0xb
01a5 c5fe       |    |		Store	0x2,-0x2
01a6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01a7 0000       |    |		.XXX[0x1]
01a8 3f80 0000  |?   |		.DBL	0.0078125
01aa 0000 0000  |    |
01ac 4060 0000  |@`  |		.DBL	128.0
01ae 0000 0000  |    |
01b0 4000 0000  |@   |		.DBL	2.0
01b2 0000 0000  |    |
01b4 3fe0 0000  |?   |		.DBL	0.5
01b6 0000 0000  |    |
01b8 3ff0 0000  |?   |		.DBL	1.0
01ba 0000 0000  |    |
01bc 3ff0 4080  |? @ |		.DBL	1.0157477085012943
01be ab50 0000  | P  |
01c0 3fef 80fe  |?   |		.DBL	0.9844964370131493
01c2 ac00 0000  |    |
01c4 0000 0000  |    |		.BLANK	0000[0x4]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01d9       |    |		.CONST	0x01d9								; Address of begin
01c9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ca 0005       |    |		.CONST	0x0005								; Number of locals
01cb			INIT_01c8:
01cb 00e6       |    |		Load_Encached	Float_Cache
01cc 0241       | A  |		Execute	Float,First
01cd 00e6       |    |		Load_Encached	Float_Cache
01ce 0240       | @  |		Execute	Float,Last
01cf 00e6       |    |		Load_Encached	Float_Cache
01d0 03e3       |    |		Declare_Type	Float,Constrained
01d1 029f 04db  |    |		Declare_Subprogram	INIT_04d8,For_Call
01d3 00d9       |    |		Load_Top	At_Offset_1
01d4 012a       | *  |		Execute	Any,Change_Utility
01d5 0007       |    |		Action	Break_Optional
01d6 00d8       |    |		Load_Top	At_Offset_0
01d7 03d8       |    |		Declare_Variable	Float,Duplicate
01d8 03d8       |    |		Declare_Variable	Float,Duplicate
01d9			BODY_01c8:
01d9 e407       |    |		Load	0x2,0x7
01da 00d8       |    |		Load_Top	At_Offset_0
01db e602       |    |		Load	0x3,0x2
01dc 0234       | 4  |		Execute	Float,In_Type
01dd 7001       |p   |		Jump_Nonzero	0x1df
01de 0801       |    |		Execute_Immediate	Raise,0x1
01df 0042       | B  |		Store_Top_Unchecked	Float,At_Offset_2
01e0 e40a       |    |		Load	0x2,0xa
01e1 00d8       |    |		Load_Top	At_Offset_0
01e2 e602       |    |		Load	0x3,0x2
01e3 0234       | 4  |		Execute	Float,In_Type
01e4 7001       |p   |		Jump_Nonzero	0x1e6
01e5 0801       |    |		Execute_Immediate	Raise,0x1
01e6 0041       | A  |		Store_Top_Unchecked	Float,At_Offset_1
01e7 00d8       |    |		Load_Top	At_Offset_0
01e8 580b       |X   |		Indirect_Literal	Float,0x1f4,0.08333400828551363
01e9 023b       | ;  |		Execute	Float,Times
01ea 004b       | K  |		Store_Top	Float,At_Offset_3
01eb e409       |    |		Load	0x2,0x9
01ec 00da       |    |		Load_Top	At_Offset_2
01ed e603       |    |		Load	0x3,0x3
01ee 023b       | ;  |		Execute	Float,Times
01ef 023d       | =  |		Execute	Float,Plus
01f0 c5fd       |    |		Store	0x2,-0x3
01f1 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01f2 0000 0000  |    |		.XXX[0x2]
01f4 3fb5 5560  |? U`|		.DBL	0.08333400828551363
01f6 a83b 1a90  | ;  |
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 0209       |    |		.CONST	0x0209								; Address of begin
01f9 0004       |    |		.CONST	0x0004								; Address of exception handler
01fa 0005       |    |		.CONST	0x0005								; Number of locals
01fb			INIT_01f8:
01fb 00e6       |    |		Load_Encached	Float_Cache
01fc 0241       | A  |		Execute	Float,First
01fd 00e6       |    |		Load_Encached	Float_Cache
01fe 0240       | @  |		Execute	Float,Last
01ff 00e6       |    |		Load_Encached	Float_Cache
0200 03e3       |    |		Declare_Type	Float,Constrained
0201 029f 04eb  |    |		Declare_Subprogram	INIT_04e8,For_Call
0203 00d9       |    |		Load_Top	At_Offset_1
0204 012a       | *  |		Execute	Any,Change_Utility
0205 0007       |    |		Action	Break_Optional
0206 00d8       |    |		Load_Top	At_Offset_0
0207 03d8       |    |		Declare_Variable	Float,Duplicate
0208 03d8       |    |		Declare_Variable	Float,Duplicate
0209			BODY_01f8:
0209 e407       |    |		Load	0x2,0x7
020a 00d8       |    |		Load_Top	At_Offset_0
020b e602       |    |		Load	0x3,0x2
020c 0234       | 4  |		Execute	Float,In_Type
020d 7001       |p   |		Jump_Nonzero	0x20f
020e 0801       |    |		Execute_Immediate	Raise,0x1
020f 0042       | B  |		Store_Top_Unchecked	Float,At_Offset_2
0210 e40a       |    |		Load	0x2,0xa
0211 00d8       |    |		Load_Top	At_Offset_0
0212 e602       |    |		Load	0x3,0x2
0213 0234       | 4  |		Execute	Float,In_Type
0214 7001       |p   |		Jump_Nonzero	0x216
0215 0801       |    |		Execute_Immediate	Raise,0x1
0216 0041       | A  |		Store_Top_Unchecked	Float,At_Offset_1
0217 00d8       |    |		Load_Top	At_Offset_0
0218 581b       |X   |		Indirect_Literal	Float,0x234,0.08333333333333336
0219 00da       |    |		Load_Top	At_Offset_2
021a 5815       |X   |		Indirect_Literal	Float,0x230,0.012499999997813866
021b e605       |    |		Load	0x3,0x5
021c 580f       |X   |		Indirect_Literal	Float,0x22c,0.0022321981075855983
021d 023b       | ;  |		Execute	Float,Times
021e 023d       | =  |		Execute	Float,Plus
021f 023b       | ;  |		Execute	Float,Times
0220 023d       | =  |		Execute	Float,Plus
0221 023b       | ;  |		Execute	Float,Times
0222 004b       | K  |		Store_Top	Float,At_Offset_3
0223 e409       |    |		Load	0x2,0x9
0224 00da       |    |		Load_Top	At_Offset_2
0225 e603       |    |		Load	0x3,0x3
0226 023b       | ;  |		Execute	Float,Times
0227 023d       | =  |		Execute	Float,Plus
0228 c5fd       |    |		Store	0x2,-0x3
0229 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
022a 0000 0000  |    |		.XXX[0x2]
022c 3f62 4942  |?bIB|		.DBL	0.0022321981075855983
022e 3bd9 4741  |; GA|
0230 3f89 9999  |?   |		.DBL	0.012499999997813866
0232 9986 5edd  |  ^ |
0234 3fb5 5555  |? UU|		.DBL	0.08333333333333336
0236 5555 5557  |UUUW|
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 0249       | I  |		.CONST	0x0249								; Address of begin
0239 0004       |    |		.CONST	0x0004								; Address of exception handler
023a 0005       |    |		.CONST	0x0005								; Number of locals
023b			INIT_0238:
023b 00e6       |    |		Load_Encached	Float_Cache
023c 0241       | A  |		Execute	Float,First
023d 00e6       |    |		Load_Encached	Float_Cache
023e 0240       | @  |		Execute	Float,Last
023f 00e6       |    |		Load_Encached	Float_Cache
0240 03e3       |    |		Declare_Type	Float,Constrained
0241 029f 04fb  |    |		Declare_Subprogram	INIT_04f8,For_Call
0243 00d9       |    |		Load_Top	At_Offset_1
0244 012a       | *  |		Execute	Any,Change_Utility
0245 0007       |    |		Action	Break_Optional
0246 00d8       |    |		Load_Top	At_Offset_0
0247 03d8       |    |		Declare_Variable	Float,Duplicate
0248 03d8       |    |		Declare_Variable	Float,Duplicate
0249			BODY_0238:
0249 e407       |    |		Load	0x2,0x7
024a 00d8       |    |		Load_Top	At_Offset_0
024b e602       |    |		Load	0x3,0x2
024c 0234       | 4  |		Execute	Float,In_Type
024d 7001       |p   |		Jump_Nonzero	0x24f
024e 0801       |    |		Execute_Immediate	Raise,0x1
024f 0042       | B  |		Store_Top_Unchecked	Float,At_Offset_2
0250 e40a       |    |		Load	0x2,0xa
0251 00d8       |    |		Load_Top	At_Offset_0
0252 e602       |    |		Load	0x3,0x2
0253 0234       | 4  |		Execute	Float,In_Type
0254 7001       |p   |		Jump_Nonzero	0x256
0255 0801       |    |		Execute_Immediate	Raise,0x1
0256 0041       | A  |		Store_Top_Unchecked	Float,At_Offset_1
0257 00d8       |    |		Load_Top	At_Offset_0
0258 5fdb       |_   |		Indirect_Literal	Float,0x234,0.08333333333333336
0259 00da       |    |		Load_Top	At_Offset_2
025a 5fd5       |_   |		Indirect_Literal	Float,0x230,0.012499999997813866
025b e605       |    |		Load	0x3,0x5
025c 5fcf       |_   |		Indirect_Literal	Float,0x22c,0.0022321981075855983
025d 023b       | ;  |		Execute	Float,Times
025e 023d       | =  |		Execute	Float,Plus
025f 023b       | ;  |		Execute	Float,Times
0260 023d       | =  |		Execute	Float,Plus
0261 023b       | ;  |		Execute	Float,Times
0262 004b       | K  |		Store_Top	Float,At_Offset_3
0263 e409       |    |		Load	0x2,0x9
0264 00da       |    |		Load_Top	At_Offset_2
0265 e603       |    |		Load	0x3,0x3
0266 023b       | ;  |		Execute	Float,Times
0267 023d       | =  |		Execute	Float,Plus
0268 c5fd       |    |		Store	0x2,-0x3
0269 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
026a 0000 0000  |    |		.BLANK	0000[0x6]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0281       |    |		.CONST	0x0281								; Address of begin
0271 0004       |    |		.CONST	0x0004								; Address of exception handler
0272 0005       |    |		.CONST	0x0005								; Number of locals
0273			INIT_0270:
0273 00e6       |    |		Load_Encached	Float_Cache
0274 0241       | A  |		Execute	Float,First
0275 00e6       |    |		Load_Encached	Float_Cache
0276 0240       | @  |		Execute	Float,Last
0277 00e6       |    |		Load_Encached	Float_Cache
0278 03e3       |    |		Declare_Type	Float,Constrained
0279 029f 050b  |    |		Declare_Subprogram	INIT_0508,For_Call
027b 00d9       |    |		Load_Top	At_Offset_1
027c 012a       | *  |		Execute	Any,Change_Utility
027d 0007       |    |		Action	Break_Optional
027e 00d8       |    |		Load_Top	At_Offset_0
027f 03d8       |    |		Declare_Variable	Float,Duplicate
0280 03d8       |    |		Declare_Variable	Float,Duplicate
0281			BODY_0270:
0281 e407       |    |		Load	0x2,0x7
0282 00d8       |    |		Load_Top	At_Offset_0
0283 e602       |    |		Load	0x3,0x2
0284 0234       | 4  |		Execute	Float,In_Type
0285 7001       |p   |		Jump_Nonzero	0x287
0286 0801       |    |		Execute_Immediate	Raise,0x1
0287 0042       | B  |		Store_Top_Unchecked	Float,At_Offset_2
0288 e40a       |    |		Load	0x2,0xa
0289 00d8       |    |		Load_Top	At_Offset_0
028a e602       |    |		Load	0x3,0x2
028b 0234       | 4  |		Execute	Float,In_Type
028c 7001       |p   |		Jump_Nonzero	0x28e
028d 0801       |    |		Execute_Immediate	Raise,0x1
028e 0041       | A  |		Store_Top_Unchecked	Float,At_Offset_1
028f 00d8       |    |		Load_Top	At_Offset_0
0290 581b       |X   |		Indirect_Literal	Float,0x2ac,0.08333333333333336
0291 00da       |    |		Load_Top	At_Offset_2
0292 5815       |X   |		Indirect_Literal	Float,0x2a8,0.012499999997813866
0293 e605       |    |		Load	0x3,0x5
0294 580f       |X   |		Indirect_Literal	Float,0x2a4,0.0022321981075855983
0295 023b       | ;  |		Execute	Float,Times
0296 023d       | =  |		Execute	Float,Plus
0297 023b       | ;  |		Execute	Float,Times
0298 023d       | =  |		Execute	Float,Plus
0299 023b       | ;  |		Execute	Float,Times
029a 004b       | K  |		Store_Top	Float,At_Offset_3
029b e409       |    |		Load	0x2,0x9
029c 00da       |    |		Load_Top	At_Offset_2
029d e603       |    |		Load	0x3,0x3
029e 023b       | ;  |		Execute	Float,Times
029f 023d       | =  |		Execute	Float,Plus
02a0 c5fd       |    |		Store	0x2,-0x3
02a1 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02a2 0000 0000  |    |		.XXX[0x2]
02a4 3f62 4942  |?bIB|		.DBL	0.0022321981075855983
02a6 3bd9 4741  |; GA|
02a8 3f89 9999  |?   |		.DBL	0.012499999997813866
02aa 9986 5edd  |  ^ |
02ac 3fb5 5555  |? UU|		.DBL	0.08333333333333336
02ae 5555 5557  |UUUW|
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02c1       |    |		.CONST	0x02c1								; Address of begin
02b1 0004       |    |		.CONST	0x0004								; Address of exception handler
02b2 0005       |    |		.CONST	0x0005								; Number of locals
02b3			INIT_02b0:
02b3 00e6       |    |		Load_Encached	Float_Cache
02b4 0241       | A  |		Execute	Float,First
02b5 00e6       |    |		Load_Encached	Float_Cache
02b6 0240       | @  |		Execute	Float,Last
02b7 00e6       |    |		Load_Encached	Float_Cache
02b8 03e3       |    |		Declare_Type	Float,Constrained
02b9 029f 051b  |    |		Declare_Subprogram	INIT_0518,For_Call
02bb 00d9       |    |		Load_Top	At_Offset_1
02bc 012a       | *  |		Execute	Any,Change_Utility
02bd 0007       |    |		Action	Break_Optional
02be 00d8       |    |		Load_Top	At_Offset_0
02bf 03d8       |    |		Declare_Variable	Float,Duplicate
02c0 03d8       |    |		Declare_Variable	Float,Duplicate
02c1			BODY_02b0:
02c1 e407       |    |		Load	0x2,0x7
02c2 00d8       |    |		Load_Top	At_Offset_0
02c3 e602       |    |		Load	0x3,0x2
02c4 0234       | 4  |		Execute	Float,In_Type
02c5 7001       |p   |		Jump_Nonzero	0x2c7
02c6 0801       |    |		Execute_Immediate	Raise,0x1
02c7 0042       | B  |		Store_Top_Unchecked	Float,At_Offset_2
02c8 e40a       |    |		Load	0x2,0xa
02c9 00d8       |    |		Load_Top	At_Offset_0
02ca e602       |    |		Load	0x3,0x2
02cb 0234       | 4  |		Execute	Float,In_Type
02cc 7001       |p   |		Jump_Nonzero	0x2ce
02cd 0801       |    |		Execute_Immediate	Raise,0x1
02ce 0041       | A  |		Store_Top_Unchecked	Float,At_Offset_1
02cf 00d8       |    |		Load_Top	At_Offset_0
02d0 582b       |X+  |		Indirect_Literal	Float,0x2fc,0.08333333333333333
02d1 00da       |    |		Load_Top	At_Offset_2
02d2 5825       |X%  |		Indirect_Literal	Float,0x2f8,0.012499999999999999
02d3 e605       |    |		Load	0x3,0x5
02d4 581f       |X   |		Indirect_Literal	Float,0x2f4,0.002232142857142866
02d5 e605       |    |		Load	0x3,0x5
02d6 5819       |X   |		Indirect_Literal	Float,0x2f0,0.0004340277775126439
02d7 e605       |    |		Load	0x3,0x5
02d8 5813       |X   |		Indirect_Literal	Float,0x2ec,8.8782039767245e-05
02d9 023b       | ;  |		Execute	Float,Times
02da 023d       | =  |		Execute	Float,Plus
02db 023b       | ;  |		Execute	Float,Times
02dc 023d       | =  |		Execute	Float,Plus
02dd 023b       | ;  |		Execute	Float,Times
02de 023d       | =  |		Execute	Float,Plus
02df 023b       | ;  |		Execute	Float,Times
02e0 023d       | =  |		Execute	Float,Plus
02e1 023b       | ;  |		Execute	Float,Times
02e2 004b       | K  |		Store_Top	Float,At_Offset_3
02e3 e409       |    |		Load	0x2,0x9
02e4 00da       |    |		Load_Top	At_Offset_2
02e5 e603       |    |		Load	0x3,0x3
02e6 023b       | ;  |		Execute	Float,Times
02e7 023d       | =  |		Execute	Float,Plus
02e8 c5fd       |    |		Store	0x2,-0x3
02e9 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02ea 0000 0000  |    |		.XXX[0x2]
02ec 3f17 460f  |? F |		.DBL	8.8782039767245e-05
02ee d43f 3d42  | ?=B|
02f0 3f3c 71c7  |?<q |		.DBL	0.0004340277775126439
02f2 1c27 2634  | '&4|
02f4 3f62 4924  |?bI$|		.DBL	0.002232142857142866
02f6 9249 24a7  | I$ |
02f8 3f89 9999  |?   |		.DBL	0.012499999999999999
02fa 9999 9999  |    |
02fc 3fb5 5555  |? UU|		.DBL	0.08333333333333333
02fe 5555 5555  |UUUU|
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0311       |    |		.CONST	0x0311								; Address of begin
0301 0004       |    |		.CONST	0x0004								; Address of exception handler
0302 0005       |    |		.CONST	0x0005								; Number of locals
0303			INIT_0300:
0303 00e6       |    |		Load_Encached	Float_Cache
0304 0241       | A  |		Execute	Float,First
0305 00e6       |    |		Load_Encached	Float_Cache
0306 0240       | @  |		Execute	Float,Last
0307 00e6       |    |		Load_Encached	Float_Cache
0308 03e3       |    |		Declare_Type	Float,Constrained
0309 029f 052b  |   +|		Declare_Subprogram	INIT_0528,For_Call
030b 00d9       |    |		Load_Top	At_Offset_1
030c 012a       | *  |		Execute	Any,Change_Utility
030d 0007       |    |		Action	Break_Optional
030e 00d8       |    |		Load_Top	At_Offset_0
030f 03d8       |    |		Declare_Variable	Float,Duplicate
0310 03d8       |    |		Declare_Variable	Float,Duplicate
0311			BODY_0300:
0311 e407       |    |		Load	0x2,0x7
0312 00d8       |    |		Load_Top	At_Offset_0
0313 e602       |    |		Load	0x3,0x2
0314 0234       | 4  |		Execute	Float,In_Type
0315 7001       |p   |		Jump_Nonzero	0x317
0316 0801       |    |		Execute_Immediate	Raise,0x1
0317 0042       | B  |		Store_Top_Unchecked	Float,At_Offset_2
0318 e40a       |    |		Load	0x2,0xa
0319 00d8       |    |		Load_Top	At_Offset_0
031a e602       |    |		Load	0x3,0x2
031b 0234       | 4  |		Execute	Float,In_Type
031c 7001       |p   |		Jump_Nonzero	0x31e
031d 0801       |    |		Execute_Immediate	Raise,0x1
031e 0041       | A  |		Store_Top_Unchecked	Float,At_Offset_1
031f 00d8       |    |		Load_Top	At_Offset_0
0320 5fdb       |_   |		Indirect_Literal	Float,0x2fc,0.08333333333333333
0321 00da       |    |		Load_Top	At_Offset_2
0322 5fd5       |_   |		Indirect_Literal	Float,0x2f8,0.012499999999999999
0323 e605       |    |		Load	0x3,0x5
0324 5827       |X'  |		Indirect_Literal	Float,0x34c,0.002232142857142857
0325 e605       |    |		Load	0x3,0x5
0326 5821       |X!  |		Indirect_Literal	Float,0x348,0.0004340277777777814
0327 e605       |    |		Load	0x3,0x5
0328 581b       |X   |		Indirect_Literal	Float,0x344,8.877840900903778e-05
0329 e605       |    |		Load	0x3,0x5
032a 5815       |X   |		Indirect_Literal	Float,0x340,1.878096574024066e-05
032b 023b       | ;  |		Execute	Float,Times
032c 023d       | =  |		Execute	Float,Plus
032d 023b       | ;  |		Execute	Float,Times
032e 023d       | =  |		Execute	Float,Plus
032f 023b       | ;  |		Execute	Float,Times
0330 023d       | =  |		Execute	Float,Plus
0331 023b       | ;  |		Execute	Float,Times
0332 023d       | =  |		Execute	Float,Plus
0333 023b       | ;  |		Execute	Float,Times
0334 023d       | =  |		Execute	Float,Plus
0335 023b       | ;  |		Execute	Float,Times
0336 004b       | K  |		Store_Top	Float,At_Offset_3
0337 e409       |    |		Load	0x2,0x9
0338 00da       |    |		Load_Top	At_Offset_2
0339 e603       |    |		Load	0x3,0x3
033a 023b       | ;  |		Execute	Float,Times
033b 023d       | =  |		Execute	Float,Plus
033c c5fd       |    |		Store	0x2,-0x3
033d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
033e 0000 0000  |    |		.XXX[0x2]
0340 3ef3 b17a  |>  z|		.DBL	1.878096574024066e-05
0342 2365 67e8  |#eg |
0344 3f17 45d1  |? E |		.DBL	8.877840900903778e-05
0346 7400 e979  |t  y|
0348 3f3c 71c7  |?<q |		.DBL	0.0004340277777777814
034a 1c71 c75f  | q _|
034c 3f62 4924  |?bI$|		.DBL	0.002232142857142857
034e 9249 2492  | I$ |
0350 ; --------------------------------------------------------------------------------------
0350 ; SUBPROGRAM
0350 ; --------------------------------------------------------------------------------------
0350 0361       | a  |		.CONST	0x0361								; Address of begin
0351 0004       |    |		.CONST	0x0004								; Address of exception handler
0352 0005       |    |		.CONST	0x0005								; Number of locals
0353			INIT_0350:
0353 00e6       |    |		Load_Encached	Float_Cache
0354 0241       | A  |		Execute	Float,First
0355 00e6       |    |		Load_Encached	Float_Cache
0356 0240       | @  |		Execute	Float,Last
0357 00e6       |    |		Load_Encached	Float_Cache
0358 03e3       |    |		Declare_Type	Float,Constrained
0359 029f 053b  |   ;|		Declare_Subprogram	INIT_0538,For_Call
035b 00d9       |    |		Load_Top	At_Offset_1
035c 012a       | *  |		Execute	Any,Change_Utility
035d 0007       |    |		Action	Break_Optional
035e 00d8       |    |		Load_Top	At_Offset_0
035f 03d8       |    |		Declare_Variable	Float,Duplicate
0360 03d8       |    |		Declare_Variable	Float,Duplicate
0361			BODY_0350:
0361 e407       |    |		Load	0x2,0x7
0362 00d8       |    |		Load_Top	At_Offset_0
0363 e602       |    |		Load	0x3,0x2
0364 0234       | 4  |		Execute	Float,In_Type
0365 7001       |p   |		Jump_Nonzero	0x367
0366 0801       |    |		Execute_Immediate	Raise,0x1
0367 0042       | B  |		Store_Top_Unchecked	Float,At_Offset_2
0368 e40a       |    |		Load	0x2,0xa
0369 00d8       |    |		Load_Top	At_Offset_0
036a e602       |    |		Load	0x3,0x2
036b 0234       | 4  |		Execute	Float,In_Type
036c 7001       |p   |		Jump_Nonzero	0x36e
036d 0801       |    |		Execute_Immediate	Raise,0x1
036e 0041       | A  |		Store_Top_Unchecked	Float,At_Offset_1
036f 00d8       |    |		Load_Top	At_Offset_0
0370 580b       |X   |		Indirect_Literal	Float,0x37c,0.08333400828551363
0371 023b       | ;  |		Execute	Float,Times
0372 004b       | K  |		Store_Top	Float,At_Offset_3
0373 e409       |    |		Load	0x2,0x9
0374 00da       |    |		Load_Top	At_Offset_2
0375 e603       |    |		Load	0x3,0x3
0376 023b       | ;  |		Execute	Float,Times
0377 023d       | =  |		Execute	Float,Plus
0378 c40c       |    |		Store	0x2,0xc
0379 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
037a 0000 0000  |    |		.XXX[0x2]
037c 3fb5 5560  |? U`|		.DBL	0.08333400828551363
037e a83b 1a90  | ;  |
0380 ; --------------------------------------------------------------------------------------
0380 ; SUBPROGRAM
0380 ; --------------------------------------------------------------------------------------
0380 0391       |    |		.CONST	0x0391								; Address of begin
0381 0004       |    |		.CONST	0x0004								; Address of exception handler
0382 0005       |    |		.CONST	0x0005								; Number of locals
0383			INIT_0380:
0383 00e6       |    |		Load_Encached	Float_Cache
0384 0241       | A  |		Execute	Float,First
0385 00e6       |    |		Load_Encached	Float_Cache
0386 0240       | @  |		Execute	Float,Last
0387 00e6       |    |		Load_Encached	Float_Cache
0388 03e3       |    |		Declare_Type	Float,Constrained
0389 029f 054b  |   K|		Declare_Subprogram	INIT_0548,For_Call
038b 00d9       |    |		Load_Top	At_Offset_1
038c 012a       | *  |		Execute	Any,Change_Utility
038d 0007       |    |		Action	Break_Optional
038e 00d8       |    |		Load_Top	At_Offset_0
038f 03d8       |    |		Declare_Variable	Float,Duplicate
0390 03d8       |    |		Declare_Variable	Float,Duplicate
0391			BODY_0380:
0391 e407       |    |		Load	0x2,0x7
0392 00d8       |    |		Load_Top	At_Offset_0
0393 e602       |    |		Load	0x3,0x2
0394 0234       | 4  |		Execute	Float,In_Type
0395 7001       |p   |		Jump_Nonzero	0x397
0396 0801       |    |		Execute_Immediate	Raise,0x1
0397 0042       | B  |		Store_Top_Unchecked	Float,At_Offset_2
0398 e40a       |    |		Load	0x2,0xa
0399 00d8       |    |		Load_Top	At_Offset_0
039a e602       |    |		Load	0x3,0x2
039b 0234       | 4  |		Execute	Float,In_Type
039c 7001       |p   |		Jump_Nonzero	0x39e
039d 0801       |    |		Execute_Immediate	Raise,0x1
039e 0041       | A  |		Store_Top_Unchecked	Float,At_Offset_1
039f 00d8       |    |		Load_Top	At_Offset_0
03a0 581b       |X   |		Indirect_Literal	Float,0x3bc,0.08333333333333336
03a1 00da       |    |		Load_Top	At_Offset_2
03a2 5815       |X   |		Indirect_Literal	Float,0x3b8,0.012499999997813866
03a3 e605       |    |		Load	0x3,0x5
03a4 580f       |X   |		Indirect_Literal	Float,0x3b4,0.0022321981075855983
03a5 023b       | ;  |		Execute	Float,Times
03a6 023d       | =  |		Execute	Float,Plus
03a7 023b       | ;  |		Execute	Float,Times
03a8 023d       | =  |		Execute	Float,Plus
03a9 023b       | ;  |		Execute	Float,Times
03aa 004b       | K  |		Store_Top	Float,At_Offset_3
03ab e409       |    |		Load	0x2,0x9
03ac 00da       |    |		Load_Top	At_Offset_2
03ad e603       |    |		Load	0x3,0x3
03ae 023b       | ;  |		Execute	Float,Times
03af 023d       | =  |		Execute	Float,Plus
03b0 c40c       |    |		Store	0x2,0xc
03b1 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03b2 0000 0000  |    |		.XXX[0x2]
03b4 3f62 4942  |?bIB|		.DBL	0.0022321981075855983
03b6 3bd9 4741  |; GA|
03b8 3f89 9999  |?   |		.DBL	0.012499999997813866
03ba 9986 5edd  |  ^ |
03bc 3fb5 5555  |? UU|		.DBL	0.08333333333333336
03be 5555 5557  |UUUW|
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03d1       |    |		.CONST	0x03d1								; Address of begin
03c1 0004       |    |		.CONST	0x0004								; Address of exception handler
03c2 0005       |    |		.CONST	0x0005								; Number of locals
03c3			INIT_03c0:
03c3 00e6       |    |		Load_Encached	Float_Cache
03c4 0241       | A  |		Execute	Float,First
03c5 00e6       |    |		Load_Encached	Float_Cache
03c6 0240       | @  |		Execute	Float,Last
03c7 00e6       |    |		Load_Encached	Float_Cache
03c8 03e3       |    |		Declare_Type	Float,Constrained
03c9 029f 055b  |   [|		Declare_Subprogram	INIT_0558,For_Call
03cb 00d9       |    |		Load_Top	At_Offset_1
03cc 012a       | *  |		Execute	Any,Change_Utility
03cd 0007       |    |		Action	Break_Optional
03ce 00d8       |    |		Load_Top	At_Offset_0
03cf 03d8       |    |		Declare_Variable	Float,Duplicate
03d0 03d8       |    |		Declare_Variable	Float,Duplicate
03d1			BODY_03c0:
03d1 e407       |    |		Load	0x2,0x7
03d2 00d8       |    |		Load_Top	At_Offset_0
03d3 e602       |    |		Load	0x3,0x2
03d4 0234       | 4  |		Execute	Float,In_Type
03d5 7001       |p   |		Jump_Nonzero	0x3d7
03d6 0801       |    |		Execute_Immediate	Raise,0x1
03d7 0042       | B  |		Store_Top_Unchecked	Float,At_Offset_2
03d8 e40a       |    |		Load	0x2,0xa
03d9 00d8       |    |		Load_Top	At_Offset_0
03da e602       |    |		Load	0x3,0x2
03db 0234       | 4  |		Execute	Float,In_Type
03dc 7001       |p   |		Jump_Nonzero	0x3de
03dd 0801       |    |		Execute_Immediate	Raise,0x1
03de 0041       | A  |		Store_Top_Unchecked	Float,At_Offset_1
03df 00d8       |    |		Load_Top	At_Offset_0
03e0 5fdb       |_   |		Indirect_Literal	Float,0x3bc,0.08333333333333336
03e1 00da       |    |		Load_Top	At_Offset_2
03e2 5fd5       |_   |		Indirect_Literal	Float,0x3b8,0.012499999997813866
03e3 e605       |    |		Load	0x3,0x5
03e4 5fcf       |_   |		Indirect_Literal	Float,0x3b4,0.0022321981075855983
03e5 023b       | ;  |		Execute	Float,Times
03e6 023d       | =  |		Execute	Float,Plus
03e7 023b       | ;  |		Execute	Float,Times
03e8 023d       | =  |		Execute	Float,Plus
03e9 023b       | ;  |		Execute	Float,Times
03ea 004b       | K  |		Store_Top	Float,At_Offset_3
03eb e409       |    |		Load	0x2,0x9
03ec 00da       |    |		Load_Top	At_Offset_2
03ed e603       |    |		Load	0x3,0x3
03ee 023b       | ;  |		Execute	Float,Times
03ef 023d       | =  |		Execute	Float,Plus
03f0 c40c       |    |		Store	0x2,0xc
03f1 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03f2 0000 0000  |    |		.BLANK	0000[0x6]
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 0409       |    |		.CONST	0x0409								; Address of begin
03f9 0004       |    |		.CONST	0x0004								; Address of exception handler
03fa 0005       |    |		.CONST	0x0005								; Number of locals
03fb			INIT_03f8:
03fb 00e6       |    |		Load_Encached	Float_Cache
03fc 0241       | A  |		Execute	Float,First
03fd 00e6       |    |		Load_Encached	Float_Cache
03fe 0240       | @  |		Execute	Float,Last
03ff 00e6       |    |		Load_Encached	Float_Cache
0400 03e3       |    |		Declare_Type	Float,Constrained
0401 029f 056b  |   k|		Declare_Subprogram	INIT_0568,For_Call
0403 00d9       |    |		Load_Top	At_Offset_1
0404 012a       | *  |		Execute	Any,Change_Utility
0405 0007       |    |		Action	Break_Optional
0406 00d8       |    |		Load_Top	At_Offset_0
0407 03d8       |    |		Declare_Variable	Float,Duplicate
0408 03d8       |    |		Declare_Variable	Float,Duplicate
0409			BODY_03f8:
0409 e407       |    |		Load	0x2,0x7
040a 00d8       |    |		Load_Top	At_Offset_0
040b e602       |    |		Load	0x3,0x2
040c 0234       | 4  |		Execute	Float,In_Type
040d 7001       |p   |		Jump_Nonzero	0x40f
040e 0801       |    |		Execute_Immediate	Raise,0x1
040f 0042       | B  |		Store_Top_Unchecked	Float,At_Offset_2
0410 e40a       |    |		Load	0x2,0xa
0411 00d8       |    |		Load_Top	At_Offset_0
0412 e602       |    |		Load	0x3,0x2
0413 0234       | 4  |		Execute	Float,In_Type
0414 7001       |p   |		Jump_Nonzero	0x416
0415 0801       |    |		Execute_Immediate	Raise,0x1
0416 0041       | A  |		Store_Top_Unchecked	Float,At_Offset_1
0417 00d8       |    |		Load_Top	At_Offset_0
0418 581b       |X   |		Indirect_Literal	Float,0x434,0.08333333333333336
0419 00da       |    |		Load_Top	At_Offset_2
041a 5815       |X   |		Indirect_Literal	Float,0x430,0.012499999997813866
041b e605       |    |		Load	0x3,0x5
041c 580f       |X   |		Indirect_Literal	Float,0x42c,0.0022321981075855983
041d 023b       | ;  |		Execute	Float,Times
041e 023d       | =  |		Execute	Float,Plus
041f 023b       | ;  |		Execute	Float,Times
0420 023d       | =  |		Execute	Float,Plus
0421 023b       | ;  |		Execute	Float,Times
0422 004b       | K  |		Store_Top	Float,At_Offset_3
0423 e409       |    |		Load	0x2,0x9
0424 00da       |    |		Load_Top	At_Offset_2
0425 e603       |    |		Load	0x3,0x3
0426 023b       | ;  |		Execute	Float,Times
0427 023d       | =  |		Execute	Float,Plus
0428 c40c       |    |		Store	0x2,0xc
0429 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
042a 0000 0000  |    |		.XXX[0x2]
042c 3f62 4942  |?bIB|		.DBL	0.0022321981075855983
042e 3bd9 4741  |; GA|
0430 3f89 9999  |?   |		.DBL	0.012499999997813866
0432 9986 5edd  |  ^ |
0434 3fb5 5555  |? UU|		.DBL	0.08333333333333336
0436 5555 5557  |UUUW|
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 0449       | I  |		.CONST	0x0449								; Address of begin
0439 0004       |    |		.CONST	0x0004								; Address of exception handler
043a 0005       |    |		.CONST	0x0005								; Number of locals
043b			INIT_0438:
043b 00e6       |    |		Load_Encached	Float_Cache
043c 0241       | A  |		Execute	Float,First
043d 00e6       |    |		Load_Encached	Float_Cache
043e 0240       | @  |		Execute	Float,Last
043f 00e6       |    |		Load_Encached	Float_Cache
0440 03e3       |    |		Declare_Type	Float,Constrained
0441 029f 057b  |   {|		Declare_Subprogram	INIT_0578,For_Call
0443 00d9       |    |		Load_Top	At_Offset_1
0444 012a       | *  |		Execute	Any,Change_Utility
0445 0007       |    |		Action	Break_Optional
0446 00d8       |    |		Load_Top	At_Offset_0
0447 03d8       |    |		Declare_Variable	Float,Duplicate
0448 03d8       |    |		Declare_Variable	Float,Duplicate
0449			BODY_0438:
0449 e407       |    |		Load	0x2,0x7
044a 00d8       |    |		Load_Top	At_Offset_0
044b e602       |    |		Load	0x3,0x2
044c 0234       | 4  |		Execute	Float,In_Type
044d 7001       |p   |		Jump_Nonzero	0x44f
044e 0801       |    |		Execute_Immediate	Raise,0x1
044f 0042       | B  |		Store_Top_Unchecked	Float,At_Offset_2
0450 e40a       |    |		Load	0x2,0xa
0451 00d8       |    |		Load_Top	At_Offset_0
0452 e602       |    |		Load	0x3,0x2
0453 0234       | 4  |		Execute	Float,In_Type
0454 7001       |p   |		Jump_Nonzero	0x456
0455 0801       |    |		Execute_Immediate	Raise,0x1
0456 0041       | A  |		Store_Top_Unchecked	Float,At_Offset_1
0457 00d8       |    |		Load_Top	At_Offset_0
0458 582b       |X+  |		Indirect_Literal	Float,0x484,0.08333333333333333
0459 00da       |    |		Load_Top	At_Offset_2
045a 5825       |X%  |		Indirect_Literal	Float,0x480,0.012499999999999999
045b e605       |    |		Load	0x3,0x5
045c 581f       |X   |		Indirect_Literal	Float,0x47c,0.002232142857142866
045d e605       |    |		Load	0x3,0x5
045e 5819       |X   |		Indirect_Literal	Float,0x478,0.0004340277775126439
045f e605       |    |		Load	0x3,0x5
0460 5813       |X   |		Indirect_Literal	Float,0x474,8.8782039767245e-05
0461 023b       | ;  |		Execute	Float,Times
0462 023d       | =  |		Execute	Float,Plus
0463 023b       | ;  |		Execute	Float,Times
0464 023d       | =  |		Execute	Float,Plus
0465 023b       | ;  |		Execute	Float,Times
0466 023d       | =  |		Execute	Float,Plus
0467 023b       | ;  |		Execute	Float,Times
0468 023d       | =  |		Execute	Float,Plus
0469 023b       | ;  |		Execute	Float,Times
046a 004b       | K  |		Store_Top	Float,At_Offset_3
046b e409       |    |		Load	0x2,0x9
046c 00da       |    |		Load_Top	At_Offset_2
046d e603       |    |		Load	0x3,0x3
046e 023b       | ;  |		Execute	Float,Times
046f 023d       | =  |		Execute	Float,Plus
0470 c40c       |    |		Store	0x2,0xc
0471 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0472 0000 0000  |    |		.XXX[0x2]
0474 3f17 460f  |? F |		.DBL	8.8782039767245e-05
0476 d43f 3d42  | ?=B|
0478 3f3c 71c7  |?<q |		.DBL	0.0004340277775126439
047a 1c27 2634  | '&4|
047c 3f62 4924  |?bI$|		.DBL	0.002232142857142866
047e 9249 24a7  | I$ |
0480 3f89 9999  |?   |		.DBL	0.012499999999999999
0482 9999 9999  |    |
0484 3fb5 5555  |? UU|		.DBL	0.08333333333333333
0486 5555 5555  |UUUU|
0488 ; --------------------------------------------------------------------------------------
0488 ; SUBPROGRAM
0488 ; --------------------------------------------------------------------------------------
0488 0499       |    |		.CONST	0x0499								; Address of begin
0489 0004       |    |		.CONST	0x0004								; Address of exception handler
048a 0005       |    |		.CONST	0x0005								; Number of locals
048b			INIT_0488:
048b 00e6       |    |		Load_Encached	Float_Cache
048c 0241       | A  |		Execute	Float,First
048d 00e6       |    |		Load_Encached	Float_Cache
048e 0240       | @  |		Execute	Float,Last
048f 00e6       |    |		Load_Encached	Float_Cache
0490 03e3       |    |		Declare_Type	Float,Constrained
0491 029f 058b  |    |		Declare_Subprogram	INIT_0588,For_Call
0493 00d9       |    |		Load_Top	At_Offset_1
0494 012a       | *  |		Execute	Any,Change_Utility
0495 0007       |    |		Action	Break_Optional
0496 00d8       |    |		Load_Top	At_Offset_0
0497 03d8       |    |		Declare_Variable	Float,Duplicate
0498 03d8       |    |		Declare_Variable	Float,Duplicate
0499			BODY_0488:
0499 e407       |    |		Load	0x2,0x7
049a 00d8       |    |		Load_Top	At_Offset_0
049b e602       |    |		Load	0x3,0x2
049c 0234       | 4  |		Execute	Float,In_Type
049d 7001       |p   |		Jump_Nonzero	0x49f
049e 0801       |    |		Execute_Immediate	Raise,0x1
049f 0042       | B  |		Store_Top_Unchecked	Float,At_Offset_2
04a0 e40a       |    |		Load	0x2,0xa
04a1 00d8       |    |		Load_Top	At_Offset_0
04a2 e602       |    |		Load	0x3,0x2
04a3 0234       | 4  |		Execute	Float,In_Type
04a4 7001       |p   |		Jump_Nonzero	0x4a6
04a5 0801       |    |		Execute_Immediate	Raise,0x1
04a6 0041       | A  |		Store_Top_Unchecked	Float,At_Offset_1
04a7 00d8       |    |		Load_Top	At_Offset_0
04a8 5fdb       |_   |		Indirect_Literal	Float,0x484,0.08333333333333333
04a9 00da       |    |		Load_Top	At_Offset_2
04aa 5fd5       |_   |		Indirect_Literal	Float,0x480,0.012499999999999999
04ab e605       |    |		Load	0x3,0x5
04ac 5827       |X'  |		Indirect_Literal	Float,0x4d4,0.002232142857142857
04ad e605       |    |		Load	0x3,0x5
04ae 5821       |X!  |		Indirect_Literal	Float,0x4d0,0.0004340277777777814
04af e605       |    |		Load	0x3,0x5
04b0 581b       |X   |		Indirect_Literal	Float,0x4cc,8.877840900903778e-05
04b1 e605       |    |		Load	0x3,0x5
04b2 5815       |X   |		Indirect_Literal	Float,0x4c8,1.878096574024066e-05
04b3 023b       | ;  |		Execute	Float,Times
04b4 023d       | =  |		Execute	Float,Plus
04b5 023b       | ;  |		Execute	Float,Times
04b6 023d       | =  |		Execute	Float,Plus
04b7 023b       | ;  |		Execute	Float,Times
04b8 023d       | =  |		Execute	Float,Plus
04b9 023b       | ;  |		Execute	Float,Times
04ba 023d       | =  |		Execute	Float,Plus
04bb 023b       | ;  |		Execute	Float,Times
04bc 023d       | =  |		Execute	Float,Plus
04bd 023b       | ;  |		Execute	Float,Times
04be 004b       | K  |		Store_Top	Float,At_Offset_3
04bf e409       |    |		Load	0x2,0x9
04c0 00da       |    |		Load_Top	At_Offset_2
04c1 e603       |    |		Load	0x3,0x3
04c2 023b       | ;  |		Execute	Float,Times
04c3 023d       | =  |		Execute	Float,Plus
04c4 c40c       |    |		Store	0x2,0xc
04c5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
04c6 0000 0000  |    |		.XXX[0x2]
04c8 3ef3 b17a  |>  z|		.DBL	1.878096574024066e-05
04ca 2365 67e8  |#eg |
04cc 3f17 45d1  |? E |		.DBL	8.877840900903778e-05
04ce 7400 e979  |t  y|
04d0 3f3c 71c7  |?<q |		.DBL	0.0004340277777777814
04d2 1c71 c75f  | q _|
04d4 3f62 4924  |?bI$|		.DBL	0.002232142857142857
04d6 9249 2492  | I$ |
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04db       |    |		.CONST	0x04db								; Address of begin
04d9 0004       |    |		.CONST	0x0004								; Address of exception handler
04da 0001       |    |		.CONST	0x0001								; Number of locals
04db			BODY_04d8:
04db			INIT_04d8:
04db 4601       |F   |		Jump_Case	0x2
04dc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
04dd 7801       |x   |		Jump	0x4df								; case 0x1
04de 4302       |C   |		.XXX[0x1]
04df 4806       |H   |		Short_Literal	0x6
04e0 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
04e1 0000 0000  |    |		.BLANK	0000[0x7]
04e8 ; --------------------------------------------------------------------------------------
04e8 ; SUBPROGRAM
04e8 ; --------------------------------------------------------------------------------------
04e8 04eb       |    |		.CONST	0x04eb								; Address of begin
04e9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ea 0001       |    |		.CONST	0x0001								; Number of locals
04eb			BODY_04e8:
04eb			INIT_04e8:
04eb 4601       |F   |		Jump_Case	0x2
04ec 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
04ed 7801       |x   |		Jump	0x4ef								; case 0x1
04ee 4302       |C   |		.XXX[0x1]
04ef 480f       |H   |		Short_Literal	0xf
04f0 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
04f1 0000 0000  |    |		.BLANK	0000[0x7]
04f8 ; --------------------------------------------------------------------------------------
04f8 ; SUBPROGRAM
04f8 ; --------------------------------------------------------------------------------------
04f8 04fb       |    |		.CONST	0x04fb								; Address of begin
04f9 0004       |    |		.CONST	0x0004								; Address of exception handler
04fa 0001       |    |		.CONST	0x0001								; Number of locals
04fb			BODY_04f8:
04fb			INIT_04f8:
04fb 4601       |F   |		Jump_Case	0x2
04fc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
04fd 7801       |x   |		Jump	0x4ff								; case 0x1
04fe 4302       |C   |		.XXX[0x1]
04ff 480f       |H   |		Short_Literal	0xf
0500 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0501 0000 0000  |    |		.BLANK	0000[0x7]
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 050b       |    |		.CONST	0x050b								; Address of begin
0509 0004       |    |		.CONST	0x0004								; Address of exception handler
050a 0001       |    |		.CONST	0x0001								; Number of locals
050b			BODY_0508:
050b			INIT_0508:
050b 4601       |F   |		Jump_Case	0x2
050c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
050d 7801       |x   |		Jump	0x50f								; case 0x1
050e 4302       |C   |		.XXX[0x1]
050f 480f       |H   |		Short_Literal	0xf
0510 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0511 0000 0000  |    |		.BLANK	0000[0x7]
0518 ; --------------------------------------------------------------------------------------
0518 ; SUBPROGRAM
0518 ; --------------------------------------------------------------------------------------
0518 051b       |    |		.CONST	0x051b								; Address of begin
0519 0004       |    |		.CONST	0x0004								; Address of exception handler
051a 0001       |    |		.CONST	0x0001								; Number of locals
051b			BODY_0518:
051b			INIT_0518:
051b 4601       |F   |		Jump_Case	0x2
051c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
051d 7801       |x   |		Jump	0x51f								; case 0x1
051e 4302       |C   |		.XXX[0x1]
051f 480f       |H   |		Short_Literal	0xf
0520 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0521 0000 0000  |    |		.BLANK	0000[0x7]
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 4601       |F   |		Jump_Case	0x2
052c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
052d 7801       |x   |		Jump	0x52f								; case 0x1
052e 4302       |C   |		.XXX[0x1]
052f 480f       |H   |		Short_Literal	0xf
0530 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0531 0000 0000  |    |		.BLANK	0000[0x7]
0538 ; --------------------------------------------------------------------------------------
0538 ; SUBPROGRAM
0538 ; --------------------------------------------------------------------------------------
0538 053b       | ;  |		.CONST	0x053b								; Address of begin
0539 0004       |    |		.CONST	0x0004								; Address of exception handler
053a 0001       |    |		.CONST	0x0001								; Number of locals
053b			BODY_0538:
053b			INIT_0538:
053b 4601       |F   |		Jump_Case	0x2
053c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
053d 7801       |x   |		Jump	0x53f								; case 0x1
053e 4302       |C   |		.XXX[0x1]
053f 4806       |H   |		Short_Literal	0x6
0540 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0541 0000 0000  |    |		.BLANK	0000[0x7]
0548 ; --------------------------------------------------------------------------------------
0548 ; SUBPROGRAM
0548 ; --------------------------------------------------------------------------------------
0548 054b       | K  |		.CONST	0x054b								; Address of begin
0549 0004       |    |		.CONST	0x0004								; Address of exception handler
054a 0001       |    |		.CONST	0x0001								; Number of locals
054b			BODY_0548:
054b			INIT_0548:
054b 4601       |F   |		Jump_Case	0x2
054c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
054d 7801       |x   |		Jump	0x54f								; case 0x1
054e 4302       |C   |		.XXX[0x1]
054f 480f       |H   |		Short_Literal	0xf
0550 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0551 0000 0000  |    |		.BLANK	0000[0x7]
0558 ; --------------------------------------------------------------------------------------
0558 ; SUBPROGRAM
0558 ; --------------------------------------------------------------------------------------
0558 055b       | [  |		.CONST	0x055b								; Address of begin
0559 0004       |    |		.CONST	0x0004								; Address of exception handler
055a 0001       |    |		.CONST	0x0001								; Number of locals
055b			BODY_0558:
055b			INIT_0558:
055b 4601       |F   |		Jump_Case	0x2
055c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
055d 7801       |x   |		Jump	0x55f								; case 0x1
055e 4302       |C   |		.XXX[0x1]
055f 480f       |H   |		Short_Literal	0xf
0560 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0561 0000 0000  |    |		.BLANK	0000[0x7]
0568 ; --------------------------------------------------------------------------------------
0568 ; SUBPROGRAM
0568 ; --------------------------------------------------------------------------------------
0568 056b       | k  |		.CONST	0x056b								; Address of begin
0569 0004       |    |		.CONST	0x0004								; Address of exception handler
056a 0001       |    |		.CONST	0x0001								; Number of locals
056b			BODY_0568:
056b			INIT_0568:
056b 4601       |F   |		Jump_Case	0x2
056c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
056d 7801       |x   |		Jump	0x56f								; case 0x1
056e 4302       |C   |		.XXX[0x1]
056f 480f       |H   |		Short_Literal	0xf
0570 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0571 0000 0000  |    |		.BLANK	0000[0x7]
0578 ; --------------------------------------------------------------------------------------
0578 ; SUBPROGRAM
0578 ; --------------------------------------------------------------------------------------
0578 057b       | {  |		.CONST	0x057b								; Address of begin
0579 0004       |    |		.CONST	0x0004								; Address of exception handler
057a 0001       |    |		.CONST	0x0001								; Number of locals
057b			BODY_0578:
057b			INIT_0578:
057b 4601       |F   |		Jump_Case	0x2
057c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
057d 7801       |x   |		Jump	0x57f								; case 0x1
057e 4302       |C   |		.XXX[0x1]
057f 480f       |H   |		Short_Literal	0xf
0580 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0581 0000 0000  |    |		.BLANK	0000[0x7]
0588 ; --------------------------------------------------------------------------------------
0588 ; SUBPROGRAM
0588 ; --------------------------------------------------------------------------------------
0588 058b       |    |		.CONST	0x058b								; Address of begin
0589 0004       |    |		.CONST	0x0004								; Address of exception handler
058a 0001       |    |		.CONST	0x0001								; Number of locals
058b			BODY_0588:
058b			INIT_0588:
058b 4601       |F   |		Jump_Case	0x2
058c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
058d 7801       |x   |		Jump	0x58f								; case 0x1
058e 4302       |C   |		.XXX[0x1]
058f 480f       |H   |		Short_Literal	0xf
0590 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0591 0000 0000  |    |		.BLANK	0000[0x7]
0598 ; --------------------------------------------------------------------------------------
0598 ; Debug Table
0598 ; --------------------------------------------------------------------------------------
0598 0004 0001  |    |		.DEBUG4	0x0004,0x0001,0xf28c,0x0000,0x0001,0x0019
059e 000b 0602  |    |		.DBG4T	0x000b,0x0602,0x1001,0xc000
05a2 01cb 0690  |    |		.DBG4T	0x01cb,0x0690,0x1004,0x0000
05a6 01fb 0698  |    |		.DBG4T	0x01fb,0x0698,0x1004,0x0000
05aa 023b 06a0  | ;  |		.DBG4T	0x023b,0x06a0,0x1004,0x0000
05ae 0273 06a8  | s  |		.DBG4T	0x0273,0x06a8,0x1004,0x0000
05b2 02b3 06b0  |    |		.DBG4T	0x02b3,0x06b0,0x1004,0x0000
05b6 0303 06b8  |    |		.DBG4T	0x0303,0x06b8,0x1004,0x0000
05ba 0353 06c0  | S  |		.DBG4T	0x0353,0x06c0,0x1004,0x0000
05be 0383 06c8  |    |		.DBG4T	0x0383,0x06c8,0x1004,0x0000
05c2 03c3 06d0  |    |		.DBG4T	0x03c3,0x06d0,0x1004,0x0000
05c6 03fb 06d8  |    |		.DBG4T	0x03fb,0x06d8,0x1004,0x0000
05ca 043b 06e0  | ;  |		.DBG4T	0x043b,0x06e0,0x1004,0x0000
05ce 048b 06e8  |    |		.DBG4T	0x048b,0x06e8,0x1004,0x0000
05d2 04db 0000  |    |		.DBG4T	0x04db,0x0000,0x1005,0x0000
05d6 04eb 0000  |    |		.DBG4T	0x04eb,0x0000,0x1005,0x0000
05da 04fb 0000  |    |		.DBG4T	0x04fb,0x0000,0x1005,0x0000
05de 050b 0000  |    |		.DBG4T	0x050b,0x0000,0x1005,0x0000
05e2 051b 0000  |    |		.DBG4T	0x051b,0x0000,0x1005,0x0000
05e6 052b 0000  | +  |		.DBG4T	0x052b,0x0000,0x1005,0x0000
05ea 053b 0000  | ;  |		.DBG4T	0x053b,0x0000,0x1005,0x0000
05ee 054b 0000  | K  |		.DBG4T	0x054b,0x0000,0x1005,0x0000
05f2 055b 0000  | [  |		.DBG4T	0x055b,0x0000,0x1005,0x0000
05f6 056b 0000  | k  |		.DBG4T	0x056b,0x0000,0x1005,0x0000
05fa 057b 0000  | {  |		.DBG4T	0x057b,0x0000,0x1005,0x0000
05fe 058b 0000  |    |		.DBG4T	0x058b,0x0000,0x1005,0x0000
0602 ; --------------------------------------------------------------------------------------
0602 ; Debug chain
0602 ; --------------------------------------------------------------------------------------
0602 0004 0042  |   B|		.DBGLEN	0x0004,0x0042
0604 000b 001e  |    |		.DBGLNO	0x000b,0x001e,0x0021,0x0023,0x003b,0x003d,0x003f,0x0042,0x0044,0x004c,0x0050,0x0055,0x0059,0x005d,0x0065,0x0069,0x006f,0x0075,0x0079,0x0081,0x0091,0x00a2,0x00a9,0x00ad,0x00b0,0x00b2,0x00b5,0x00b7,0x00b8,0x00ba,0x00bb,0x00c7,0x00ca,0x00cf,0x00d3,0x00d7,0x00dc,0x00e3,0x00ea,0x00ee,0x00f3,0x00f7,0x00fd,0x0101,0x0105,0x0108,0x010e,0x0112,0x0116,0x011e,0x0126,0x012a,0x013a,0x014b,0x0152,0x0156,0x0159,0x015b,0x015e,0x0160,0x0161,0x0166,0x016f,0x0178,0x0188,0x018e,0x0192,0x019c,0x01a4,0x01a6
064a 0001 0002  |    |		.XXX[0x46]
064c 0003 0005  |    |
064e 0001 0002  |    |
0650 0003 0004  |    |
0652 0005 0006  |    |
0654 0007 0008  |    |
0656 0009 000a  |    |
0658 000b 000c  |    |
065a 000d 000e  |    |
065c 000f 0010  |    |
065e 0011 0015  |    |
0660 0018 0012  |    |
0662 0013 0014  |    |
0664 0016 0017  |    |
0666 0019 001a  |    |
0668 001b 001c  |    |
066a 001d 001f  |    |
066c 0020 001e  |    |
066e 0021 0022  | ! "|
0670 0023 0024  | # $|
0672 0025 0026  | % &|
0674 0027 0028  | ' (|
0676 0029 002a  | ) *|
0678 002b 002c  | + ,|
067a 002d 002e  | - .|
067c 002f 0030  | / 0|
067e 0031 0035  | 1 5|
0680 0038 0032  | 8 2|
0682 0033 0034  | 3 4|
0684 0036 0037  | 6 7|
0686 0039 003a  | 9 :|
0688 003b 003c  | ; <|
068a 003d 003e  | = >|
068c 003f 0040  | ? @|
068e 0041 0042  | A B|
0690 ; --------------------------------------------------------------------------------------
0690 ; Debug chain
0690 ; --------------------------------------------------------------------------------------
0690 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0692 01cb 01d6  |    |		.DBGLNO	0x01cb,0x01d6,0x01d9,0x01e0,0x01e7,0x01eb
0698 ; --------------------------------------------------------------------------------------
0698 ; Debug chain
0698 ; --------------------------------------------------------------------------------------
0698 0002 0004  |    |		.DBGLEN	0x0002,0x0004
069a 01fb 0206  |    |		.DBGLNO	0x01fb,0x0206,0x0209,0x0210,0x0217,0x0223
06a0 ; --------------------------------------------------------------------------------------
06a0 ; Debug chain
06a0 ; --------------------------------------------------------------------------------------
06a0 0002 0004  |    |		.DBGLEN	0x0002,0x0004
06a2 023b 0246  | ; F|		.DBGLNO	0x023b,0x0246,0x0249,0x0250,0x0257,0x0263
06a8 ; --------------------------------------------------------------------------------------
06a8 ; Debug chain
06a8 ; --------------------------------------------------------------------------------------
06a8 0002 0004  |    |		.DBGLEN	0x0002,0x0004
06aa 0273 027e  | s ~|		.DBGLNO	0x0273,0x027e,0x0281,0x0288,0x028f,0x029b
06b0 ; --------------------------------------------------------------------------------------
06b0 ; Debug chain
06b0 ; --------------------------------------------------------------------------------------
06b0 0002 0004  |    |		.DBGLEN	0x0002,0x0004
06b2 02b3 02be  |    |		.DBGLNO	0x02b3,0x02be,0x02c1,0x02c8,0x02cf,0x02e3
06b8 ; --------------------------------------------------------------------------------------
06b8 ; Debug chain
06b8 ; --------------------------------------------------------------------------------------
06b8 0002 0004  |    |		.DBGLEN	0x0002,0x0004
06ba 0303 030e  |    |		.DBGLNO	0x0303,0x030e,0x0311,0x0318,0x031f,0x0337
06c0 ; --------------------------------------------------------------------------------------
06c0 ; Debug chain
06c0 ; --------------------------------------------------------------------------------------
06c0 0002 0004  |    |		.DBGLEN	0x0002,0x0004
06c2 0353 035e  | S ^|		.DBGLNO	0x0353,0x035e,0x0361,0x0368,0x036f,0x0373
06c8 ; --------------------------------------------------------------------------------------
06c8 ; Debug chain
06c8 ; --------------------------------------------------------------------------------------
06c8 0002 0004  |    |		.DBGLEN	0x0002,0x0004
06ca 0383 038e  |    |		.DBGLNO	0x0383,0x038e,0x0391,0x0398,0x039f,0x03ab
06d0 ; --------------------------------------------------------------------------------------
06d0 ; Debug chain
06d0 ; --------------------------------------------------------------------------------------
06d0 0002 0004  |    |		.DBGLEN	0x0002,0x0004
06d2 03c3 03ce  |    |		.DBGLNO	0x03c3,0x03ce,0x03d1,0x03d8,0x03df,0x03eb
06d8 ; --------------------------------------------------------------------------------------
06d8 ; Debug chain
06d8 ; --------------------------------------------------------------------------------------
06d8 0002 0004  |    |		.DBGLEN	0x0002,0x0004
06da 03fb 0406  |    |		.DBGLNO	0x03fb,0x0406,0x0409,0x0410,0x0417,0x0423
06e0 ; --------------------------------------------------------------------------------------
06e0 ; Debug chain
06e0 ; --------------------------------------------------------------------------------------
06e0 0002 0004  |    |		.DBGLEN	0x0002,0x0004
06e2 043b 0446  | ; F|		.DBGLNO	0x043b,0x0446,0x0449,0x0450,0x0457,0x046b
06e8 ; --------------------------------------------------------------------------------------
06e8 ; Debug chain
06e8 ; --------------------------------------------------------------------------------------
06e8 0002 0004  |    |		.DBGLEN	0x0002,0x0004
06ea 048b 0496  |    |		.DBGLNO	0x048b,0x0496,0x0499,0x04a0,0x04a7,0x04bf
06f0 0000 0000  |    |		.BLANK	0000[0x110]