|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03bcfe
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 02a0 | | .CONST 0x02a0 ; Offset of debug table 0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction 0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion 0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments) 0007 0001 | | .CONST 0x0001 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 001a | | .CONST 0x001a ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 000a | | .CONST 0x000a ; Number of locals 000b INIT_0008: 000b e20e | | Load 0x1,0xe 000c 03d8 | | Declare_Variable Float,Duplicate 000d 03d8 | | Declare_Variable Float,Duplicate 000e 029f 0053 | S| Declare_Subprogram INIT_0050,For_Call 0010 029f 008b | | Declare_Subprogram INIT_0088,For_Call 0012 029f 00db | | Declare_Subprogram INIT_00d8,For_Call 0014 029f 0113 | | Declare_Subprogram INIT_0110,For_Call 0016 029f 016b | k| Declare_Subprogram INIT_0168,For_Call 0018 029f 01cb | | Declare_Subprogram INIT_01c8,For_Call 001a BODY_0008: 001a e5ff | | Load 0x2,-0x1 001b c402 | | Store 0x2,0x2 001c e5fe | | Load 0x2,-0x2 001d c403 | | Store 0x2,0x3 001e e20e | | Load 0x1,0xe 001f 0122 | " | Execute Any,Make_Root_Type 0020 1c01 | | Execute_Immediate Run_Utility,0x1 0021 00d8 | | Load_Top At_Offset_0 0022 0d01 | | Execute_Immediate Less,0x1 0023 7013 |p | Jump_Nonzero 0x37 0024 00d8 | | Load_Top At_Offset_0 0025 0c13 | | Execute_Immediate Greater_Equal,0x13 0026 700a |p | Jump_Nonzero 0x31 0027 00d8 | | Load_Top At_Offset_0 0028 0c07 | | Execute_Immediate Greater_Equal,0x7 0029 680f |h | Jump_Zero 0x39 002a 00d8 | | Load_Top At_Offset_0 002b 0c10 | | Execute_Immediate Greater_Equal,0x10 002c 680f |h | Jump_Zero 0x3c 002d 0f10 | | Execute_Immediate Equal,0x10 002e 7010 |p | Jump_Nonzero 0x3f 002f 8408 | | Call 0x2,0x8 0030 7814 |x | Jump 0x45 0031 00d8 | | Load_Top At_Offset_0 0032 0c1c | | Execute_Immediate Greater_Equal,0x1c 0033 680d |h | Jump_Zero 0x41 0034 0c22 | " | Execute_Immediate Greater_Equal,0x22 0035 680e |h | Jump_Zero 0x44 0036 08e2 | | Execute_Immediate Raise,0xe2 0037 00d1 | | Pop_Control Pop_Count_1 0038 7ffd | | Jump 0x36 0039 00d1 | | Pop_Control Pop_Count_1 003a 8405 | | Call 0x2,0x5 003b 7809 |x | Jump 0x45 003c 00d1 | | Pop_Control Pop_Count_1 003d 8406 | | Call 0x2,0x6 003e 7806 |x | Jump 0x45 003f 8407 | | Call 0x2,0x7 0040 7804 |x | Jump 0x45 0041 00d1 | | Pop_Control Pop_Count_1 0042 8409 | | Call 0x2,0x9 0043 7801 |x | Jump 0x45 0044 840a | | Call 0x2,0xa 0045 e404 | | Load 0x2,0x4 0046 e20e | | Load 0x1,0xe 0047 0232 | 2 | Execute Float,Check_In_Type 0048 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0049 0000 0000 | | .BLANK 0000[0x7] 0050 ; -------------------------------------------------------------------------------------- 0050 ; SUBPROGRAM 0050 ; -------------------------------------------------------------------------------------- 0050 0060 | ` | .CONST 0x0060 ; Address of begin 0051 0004 | | .CONST 0x0004 ; Address of exception handler 0052 0004 | | .CONST 0x0004 ; Number of locals 0053 INIT_0050: 0053 00e6 | | Load_Encached Float_Cache 0054 0241 | A | Execute Float,First 0055 00e6 | | Load_Encached Float_Cache 0056 0240 | @ | Execute Float,Last 0057 00e6 | | Load_Encached Float_Cache 0058 03e3 | | Declare_Type Float,Constrained 0059 029f 0243 | C| Declare_Subprogram INIT_0240,For_Call 005b 00d9 | | Load_Top At_Offset_1 005c 012a | * | Execute Any,Change_Utility 005d 0007 | | Action Break_Optional 005e 00d8 | | Load_Top At_Offset_0 005f 03d8 | | Declare_Variable Float,Duplicate 0060 BODY_0050: 0060 e402 | | Load 0x2,0x2 0061 e403 | | Load 0x2,0x3 0062 023d | = | Execute Float,Plus 0063 00d8 | | Load_Top At_Offset_0 0064 e602 | | Load 0x3,0x2 0065 0234 | 4 | Execute Float,In_Type 0066 7001 |p | Jump_Nonzero 0x68 0067 0801 | | Execute_Immediate Raise,0x1 0068 0042 | B | Store_Top_Unchecked Float,At_Offset_2 0069 00d9 | | Load_Top At_Offset_1 006a 00da | | Load_Top At_Offset_2 006b 023b | ; | Execute Float,Times 006c 5813 |X | Indirect_Literal Float,0x80,0.5000040481 006d 00db | | Load_Top At_Offset_3 006e 580d |X | Indirect_Literal Float,0x7c,0.16666764429999997 006f 023b | ; | Execute Float,Times 0070 023d | = | Execute Float,Plus 0071 023b | ; | Execute Float,Times 0072 0049 | I | Store_Top Float,At_Offset_1 0073 e402 | | Load 0x2,0x2 0074 e403 | | Load 0x2,0x3 0075 00da | | Load_Top At_Offset_2 0076 023d | = | Execute Float,Plus 0077 023d | = | Execute Float,Plus 0078 c404 | | Store 0x2,0x4 0079 4501 |E | Exit_Suprogram New_Top_Offset 0x1 007a 0000 0000 | | .XXX[0x2] 007c 3fc5 555d |? U]| .DBL 0.16666764429999997 007e 88c8 f132 | 2| 0080 3fe0 0008 |? | .DBL 0.5000040481 0082 7d4e a0a7 |}N | 0084 0000 0000 | | .BLANK 0000[0x4] 0088 ; -------------------------------------------------------------------------------------- 0088 ; SUBPROGRAM 0088 ; -------------------------------------------------------------------------------------- 0088 0098 | | .CONST 0x0098 ; Address of begin 0089 0004 | | .CONST 0x0004 ; Address of exception handler 008a 0004 | | .CONST 0x0004 ; Number of locals 008b INIT_0088: 008b 00e6 | | Load_Encached Float_Cache 008c 0241 | A | Execute Float,First 008d 00e6 | | Load_Encached Float_Cache 008e 0240 | @ | Execute Float,Last 008f 00e6 | | Load_Encached Float_Cache 0090 03e3 | | Declare_Type Float,Constrained 0091 029f 0253 | S| Declare_Subprogram INIT_0250,For_Call 0093 00d9 | | Load_Top At_Offset_1 0094 012a | * | Execute Any,Change_Utility 0095 0007 | | Action Break_Optional 0096 00d8 | | Load_Top At_Offset_0 0097 03d8 | | Declare_Variable Float,Duplicate 0098 BODY_0088: 0098 e402 | | Load 0x2,0x2 0099 e403 | | Load 0x2,0x3 009a 023d | = | Execute Float,Plus 009b 00d8 | | Load_Top At_Offset_0 009c e602 | | Load 0x3,0x2 009d 0234 | 4 | Execute Float,In_Type 009e 7001 |p | Jump_Nonzero 0xa0 009f 0801 | | Execute_Immediate Raise,0x1 00a0 0042 | B | Store_Top_Unchecked Float,At_Offset_2 00a1 00d9 | | Load_Top At_Offset_1 00a2 00da | | Load_Top At_Offset_2 00a3 023b | ; | Execute Float,Times 00a4 582b |X+ | Indirect_Literal Float,0xd0,0.5 00a5 00db | | Load_Top At_Offset_3 00a6 5825 |X% | Indirect_Literal Float,0xcc,0.16666666666526087 00a7 e603 | | Load 0x3,0x3 00a8 581f |X | Indirect_Literal Float,0xc8,0.04166666666622608 00a9 e603 | | Load 0x3,0x3 00aa 5819 |X | Indirect_Literal Float,0xc4,0.008333367984342196 00ab e603 | | Load 0x3,0x3 00ac 5813 |X | Indirect_Literal Float,0xc0,0.001388894908637772 00ad 023b | ; | Execute Float,Times 00ae 023d | = | Execute Float,Plus 00af 023b | ; | Execute Float,Times 00b0 023d | = | Execute Float,Plus 00b1 023b | ; | Execute Float,Times 00b2 023d | = | Execute Float,Plus 00b3 023b | ; | Execute Float,Times 00b4 023d | = | Execute Float,Plus 00b5 023b | ; | Execute Float,Times 00b6 0049 | I | Store_Top Float,At_Offset_1 00b7 e402 | | Load 0x2,0x2 00b8 e403 | | Load 0x2,0x3 00b9 00da | | Load_Top At_Offset_2 00ba 023d | = | Execute Float,Plus 00bb 023d | = | Execute Float,Plus 00bc c404 | | Store 0x2,0x4 00bd 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00be 0000 0000 | | .XXX[0x2] 00c0 3f56 c172 |?V r| .DBL 0.001388894908637772 00c2 8d73 9765 | s e| 00c4 3f81 1115 |? | .DBL 0.008333367984342196 00c6 b7aa 905e | ^| 00c8 3fa5 5555 |? UU| .DBL 0.04166666666622608 00ca 5554 5d4e |UT]N| 00cc 3fc5 5555 |? UU| .DBL 0.16666666666526087 00ce 5554 8f7c |UT || 00d0 3fe0 0000 |? | .DBL 0.5 00d2 0000 0000 | | 00d4 0000 0000 | | .BLANK 0000[0x4] 00d8 ; -------------------------------------------------------------------------------------- 00d8 ; SUBPROGRAM 00d8 ; -------------------------------------------------------------------------------------- 00d8 00e8 | | .CONST 0x00e8 ; Address of begin 00d9 0004 | | .CONST 0x0004 ; Address of exception handler 00da 0004 | | .CONST 0x0004 ; Number of locals 00db INIT_00d8: 00db 00e6 | | Load_Encached Float_Cache 00dc 0241 | A | Execute Float,First 00dd 00e6 | | Load_Encached Float_Cache 00de 0240 | @ | Execute Float,Last 00df 00e6 | | Load_Encached Float_Cache 00e0 03e3 | | Declare_Type Float,Constrained 00e1 029f 0263 | c| Declare_Subprogram INIT_0260,For_Call 00e3 00d9 | | Load_Top At_Offset_1 00e4 012a | * | Execute Any,Change_Utility 00e5 0007 | | Action Break_Optional 00e6 00d8 | | Load_Top At_Offset_0 00e7 03d8 | | Declare_Variable Float,Duplicate 00e8 BODY_00d8: 00e8 e402 | | Load 0x2,0x2 00e9 e403 | | Load 0x2,0x3 00ea 023d | = | Execute Float,Plus 00eb 00d8 | | Load_Top At_Offset_0 00ec e602 | | Load 0x3,0x2 00ed 0234 | 4 | Execute Float,In_Type 00ee 7001 |p | Jump_Nonzero 0xf0 00ef 0801 | | Execute_Immediate Raise,0x1 00f0 0042 | B | Store_Top_Unchecked Float,At_Offset_2 00f1 00d9 | | Load_Top At_Offset_1 00f2 00da | | Load_Top At_Offset_2 00f3 023b | ; | Execute Float,Times 00f4 5fdb |_ | Indirect_Literal Float,0xd0,0.5 00f5 00db | | Load_Top At_Offset_3 00f6 5fd5 |_ | Indirect_Literal Float,0xcc,0.16666666666526087 00f7 e603 | | Load 0x3,0x3 00f8 5fcf |_ | Indirect_Literal Float,0xc8,0.04166666666622608 00f9 e603 | | Load 0x3,0x3 00fa 5fc9 |_ | Indirect_Literal Float,0xc4,0.008333367984342196 00fb e603 | | Load 0x3,0x3 00fc 5fc3 |_ | Indirect_Literal Float,0xc0,0.001388894908637772 00fd 023b | ; | Execute Float,Times 00fe 023d | = | Execute Float,Plus 00ff 023b | ; | Execute Float,Times 0100 023d | = | Execute Float,Plus 0101 023b | ; | Execute Float,Times 0102 023d | = | Execute Float,Plus 0103 023b | ; | Execute Float,Times 0104 023d | = | Execute Float,Plus 0105 023b | ; | Execute Float,Times 0106 0049 | I | Store_Top Float,At_Offset_1 0107 e402 | | Load 0x2,0x2 0108 e403 | | Load 0x2,0x3 0109 00da | | Load_Top At_Offset_2 010a 023d | = | Execute Float,Plus 010b 023d | = | Execute Float,Plus 010c c404 | | Store 0x2,0x4 010d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 010e 0000 0000 | | .XXX[0x2] 0110 ; -------------------------------------------------------------------------------------- 0110 ; SUBPROGRAM 0110 ; -------------------------------------------------------------------------------------- 0110 0120 | | .CONST 0x0120 ; Address of begin 0111 0004 | | .CONST 0x0004 ; Address of exception handler 0112 0004 | | .CONST 0x0004 ; Number of locals 0113 INIT_0110: 0113 00e6 | | Load_Encached Float_Cache 0114 0241 | A | Execute Float,First 0115 00e6 | | Load_Encached Float_Cache 0116 0240 | @ | Execute Float,Last 0117 00e6 | | Load_Encached Float_Cache 0118 03e3 | | Declare_Type Float,Constrained 0119 029f 0273 | s| Declare_Subprogram INIT_0270,For_Call 011b 00d9 | | Load_Top At_Offset_1 011c 012a | * | Execute Any,Change_Utility 011d 0007 | | Action Break_Optional 011e 00d8 | | Load_Top At_Offset_0 011f 03d8 | | Declare_Variable Float,Duplicate 0120 BODY_0110: 0120 e402 | | Load 0x2,0x2 0121 e403 | | Load 0x2,0x3 0122 023d | = | Execute Float,Plus 0123 00d8 | | Load_Top At_Offset_0 0124 e602 | | Load 0x3,0x2 0125 0234 | 4 | Execute Float,In_Type 0126 7001 |p | Jump_Nonzero 0x128 0127 0801 | | Execute_Immediate Raise,0x1 0128 0042 | B | Store_Top_Unchecked Float,At_Offset_2 0129 00d9 | | Load_Top At_Offset_1 012a 00da | | Load_Top At_Offset_2 012b 023b | ; | Execute Float,Times 012c 5833 |X3 | Indirect_Literal Float,0x160,0.5 012d 00db | | Load_Top At_Offset_3 012e 582d |X- | Indirect_Literal Float,0x15c,0.16666666666666666 012f e603 | | Load 0x3,0x3 0130 5827 |X' | Indirect_Literal Float,0x158,0.0416666666662868 0131 e603 | | Load 0x3,0x3 0132 5821 |X! | Indirect_Literal Float,0x154,0.008333333333252082 0133 e603 | | Load 0x3,0x3 0134 581b |X | Indirect_Literal Float,0x150,0.0013888944766512461 0135 e603 | | Load 0x3,0x3 0136 5815 |X | Indirect_Literal Float,0x14c,0.0001984135319032208 0137 023b | ; | Execute Float,Times 0138 023d | = | Execute Float,Plus 0139 023b | ; | Execute Float,Times 013a 023d | = | Execute Float,Plus 013b 023b | ; | Execute Float,Times 013c 023d | = | Execute Float,Plus 013d 023b | ; | Execute Float,Times 013e 023d | = | Execute Float,Plus 013f 023b | ; | Execute Float,Times 0140 023d | = | Execute Float,Plus 0141 023b | ; | Execute Float,Times 0142 0049 | I | Store_Top Float,At_Offset_1 0143 e402 | | Load 0x2,0x2 0144 e403 | | Load 0x2,0x3 0145 00da | | Load_Top At_Offset_2 0146 023d | = | Execute Float,Plus 0147 023d | = | Execute Float,Plus 0148 c404 | | Store 0x2,0x4 0149 4501 |E | Exit_Suprogram New_Top_Offset 0x1 014a 0000 0000 | | .XXX[0x2] 014c 3f2a 01a7 |?* | .DBL 0.0001984135319032208 014e 42df 137f |B | 0150 3f56 c172 |?V r| .DBL 0.0013888944766512461 0152 16b5 3df8 | = | 0154 3f81 1111 |? | .DBL 0.008333333333252082 0156 1110 5a1b | Z | 0158 3fa5 5555 |? UU| .DBL 0.0416666666662868 015a 5554 7f7d |UT }| 015c 3fc5 5555 |? UU| .DBL 0.16666666666666666 015e 5555 5555 |UUUU| 0160 3fe0 0000 |? | .DBL 0.5 0162 0000 0000 | | 0164 0000 0000 | | .BLANK 0000[0x4] 0168 ; -------------------------------------------------------------------------------------- 0168 ; SUBPROGRAM 0168 ; -------------------------------------------------------------------------------------- 0168 0178 | x | .CONST 0x0178 ; Address of begin 0169 0004 | | .CONST 0x0004 ; Address of exception handler 016a 0004 | | .CONST 0x0004 ; Number of locals 016b INIT_0168: 016b 00e6 | | Load_Encached Float_Cache 016c 0241 | A | Execute Float,First 016d 00e6 | | Load_Encached Float_Cache 016e 0240 | @ | Execute Float,Last 016f 00e6 | | Load_Encached Float_Cache 0170 03e3 | | Declare_Type Float,Constrained 0171 029f 0283 | | Declare_Subprogram INIT_0280,For_Call 0173 00d9 | | Load_Top At_Offset_1 0174 012a | * | Execute Any,Change_Utility 0175 0007 | | Action Break_Optional 0176 00d8 | | Load_Top At_Offset_0 0177 03d8 | | Declare_Variable Float,Duplicate 0178 BODY_0168: 0178 e402 | | Load 0x2,0x2 0179 e403 | | Load 0x2,0x3 017a 023d | = | Execute Float,Plus 017b 00d8 | | Load_Top At_Offset_0 017c e602 | | Load 0x3,0x2 017d 0234 | 4 | Execute Float,In_Type 017e 7001 |p | Jump_Nonzero 0x180 017f 0801 | | Execute_Immediate Raise,0x1 0180 0042 | B | Store_Top_Unchecked Float,At_Offset_2 0181 00d9 | | Load_Top At_Offset_1 0182 00da | | Load_Top At_Offset_2 0183 023b | ; | Execute Float,Times 0184 5fdb |_ | Indirect_Literal Float,0x160,0.5 0185 00db | | Load_Top At_Offset_3 0186 5fd5 |_ | Indirect_Literal Float,0x15c,0.16666666666666666 0187 e603 | | Load 0x3,0x3 0188 5837 |X7 | Indirect_Literal Float,0x1c0,0.041666666666666664 0189 e603 | | Load 0x3,0x3 018a 5831 |X1 | Indirect_Literal Float,0x1bc,0.008333333333333333 018b e603 | | Load 0x3,0x3 018c 582b |X+ | Indirect_Literal Float,0x1b8,0.0013888888888811248 018d e603 | | Load 0x3,0x3 018e 5825 |X% | Indirect_Literal Float,0x1b4,0.00019841269841139835 018f e603 | | Load 0x3,0x3 0190 581f |X | Indirect_Literal Float,0x1b0,2.480166608620855e-05 0191 e603 | | Load 0x3,0x3 0192 5819 |X | Indirect_Literal Float,0x1ac,2.7557413983513884e-06 0193 023b | ; | Execute Float,Times 0194 023d | = | Execute Float,Plus 0195 023b | ; | Execute Float,Times 0196 023d | = | Execute Float,Plus 0197 023b | ; | Execute Float,Times 0198 023d | = | Execute Float,Plus 0199 023b | ; | Execute Float,Times 019a 023d | = | Execute Float,Plus 019b 023b | ; | Execute Float,Times 019c 023d | = | Execute Float,Plus 019d 023b | ; | Execute Float,Times 019e 023d | = | Execute Float,Plus 019f 023b | ; | Execute Float,Times 01a0 023d | = | Execute Float,Plus 01a1 023b | ; | Execute Float,Times 01a2 0049 | I | Store_Top Float,At_Offset_1 01a3 e402 | | Load 0x2,0x2 01a4 e403 | | Load 0x2,0x3 01a5 00da | | Load_Top At_Offset_2 01a6 023d | = | Execute Float,Plus 01a7 023d | = | Execute Float,Plus 01a8 c404 | | Store 0x2,0x4 01a9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01aa 0000 0000 | | .XXX[0x2] 01ac 3ec7 1de8 |> | .DBL 2.7557413983513884e-06 01ae daf5 f546 | F| 01b0 3efa 01a5 |> | .DBL 2.480166608620855e-05 01b2 8400 042c | ,| 01b4 3f2a 01a0 |?* | .DBL 0.00019841269841139835 01b6 1a00 e4be | | 01b8 3f56 c16c |?V l| .DBL 0.0013888888888811248 01ba 16c0 e039 | 9| 01bc 3f81 1111 |? | .DBL 0.008333333333333333 01be 1111 1111 | | 01c0 3fa5 5555 |? UU| .DBL 0.041666666666666664 01c2 5555 5555 |UUUU| 01c4 0000 0000 | | .BLANK 0000[0x4] 01c8 ; -------------------------------------------------------------------------------------- 01c8 ; SUBPROGRAM 01c8 ; -------------------------------------------------------------------------------------- 01c8 01d8 | | .CONST 0x01d8 ; Address of begin 01c9 0004 | | .CONST 0x0004 ; Address of exception handler 01ca 0004 | | .CONST 0x0004 ; 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 0293 | | Declare_Subprogram INIT_0290,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 BODY_01c8: 01d8 e402 | | Load 0x2,0x2 01d9 e403 | | Load 0x2,0x3 01da 023d | = | Execute Float,Plus 01db 00d8 | | Load_Top At_Offset_0 01dc e602 | | Load 0x3,0x2 01dd 0234 | 4 | Execute Float,In_Type 01de 7001 |p | Jump_Nonzero 0x1e0 01df 0801 | | Execute_Immediate Raise,0x1 01e0 0042 | B | Store_Top_Unchecked Float,At_Offset_2 01e1 00d9 | | Load_Top At_Offset_1 01e2 00da | | Load_Top At_Offset_2 01e3 023b | ; | Execute Float,Times 01e4 5853 |XS | Indirect_Literal Float,0x238,0.5 01e5 00db | | Load_Top At_Offset_3 01e6 584d |XM | Indirect_Literal Float,0x234,0.16666666666666666 01e7 e603 | | Load 0x3,0x3 01e8 5fd7 |_ | Indirect_Literal Float,0x1c0,0.041666666666666664 01e9 e603 | | Load 0x3,0x3 01ea 5fd1 |_ | Indirect_Literal Float,0x1bc,0.008333333333333333 01eb e603 | | Load 0x3,0x3 01ec 5843 |XC | Indirect_Literal Float,0x230,0.0013888888888888887 01ed e603 | | Load 0x3,0x3 01ee 583d |X= | Indirect_Literal Float,0x22c,0.0001984126984126984 01ef e603 | | Load 0x3,0x3 01f0 5837 |X7 | Indirect_Literal Float,0x228,2.48015873015873e-05 01f1 e603 | | Load 0x3,0x3 01f2 5831 |X1 | Indirect_Literal Float,0x224,2.755731922390497e-06 01f3 e603 | | Load 0x3,0x3 01f4 582b |X+ | Indirect_Literal Float,0x220,2.7557319223903827e-07 01f5 e603 | | Load 0x3,0x3 01f6 5825 |X% | Indirect_Literal Float,0x21c,2.50521670368971e-08 01f7 e603 | | Load 0x3,0x3 01f8 581f |X | Indirect_Literal Float,0x218,2.0876806002874694e-09 01f9 023b | ; | Execute Float,Times 01fa 023d | = | Execute Float,Plus 01fb 023b | ; | Execute Float,Times 01fc 023d | = | Execute Float,Plus 01fd 023b | ; | Execute Float,Times 01fe 023d | = | Execute Float,Plus 01ff 023b | ; | Execute Float,Times 0200 023d | = | Execute Float,Plus 0201 023b | ; | Execute Float,Times 0202 023d | = | Execute Float,Plus 0203 023b | ; | Execute Float,Times 0204 023d | = | Execute Float,Plus 0205 023b | ; | Execute Float,Times 0206 023d | = | Execute Float,Plus 0207 023b | ; | Execute Float,Times 0208 023d | = | Execute Float,Plus 0209 023b | ; | Execute Float,Times 020a 023d | = | Execute Float,Plus 020b 023b | ; | Execute Float,Times 020c 023d | = | Execute Float,Plus 020d 023b | ; | Execute Float,Times 020e 0049 | I | Store_Top Float,At_Offset_1 020f e402 | | Load 0x2,0x2 0210 e403 | | Load 0x2,0x3 0211 00da | | Load_Top At_Offset_2 0212 023d | = | Execute Float,Plus 0213 023d | = | Execute Float,Plus 0214 c404 | | Store 0x2,0x4 0215 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0216 0000 0000 | | .XXX[0x2] 0218 3e21 eedb |>! | .DBL 2.0876806002874694e-09 021a b25a 4d74 | ZMt| 021c 3e5a e649 |>Z I| .DBL 2.50521670368971e-08 021e 8887 5da8 | ] | 0220 3e92 7e4f |> ~O| .DBL 2.7557319223903827e-07 0222 b778 62cf | xb | 0224 3ec7 1de3 |> | .DBL 2.755731922390497e-06 0226 a556 7c91 | V| | 0228 3efa 01a0 |> | .DBL 2.48015873015873e-05 022a 1a01 a01a | | 022c 3f2a 01a0 |?* | .DBL 0.0001984126984126984 022e 1a01 a01a | | 0230 3f56 c16c |?V l| .DBL 0.0013888888888888887 0232 16c1 6c16 | l | 0234 3fc5 5555 |? UU| .DBL 0.16666666666666666 0236 5555 5555 |UUUU| 0238 3fe0 0000 |? | .DBL 0.5 023a 0000 0000 | | 023c 0000 0000 | | .BLANK 0000[0x4] 0240 ; -------------------------------------------------------------------------------------- 0240 ; SUBPROGRAM 0240 ; -------------------------------------------------------------------------------------- 0240 0243 | C | .CONST 0x0243 ; Address of begin 0241 0004 | | .CONST 0x0004 ; Address of exception handler 0242 0001 | | .CONST 0x0001 ; Number of locals 0243 BODY_0240: 0243 INIT_0240: 0243 4601 |F | Jump_Case 0x2 0244 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0245 7801 |x | Jump 0x247 ; case 0x1 0246 4302 |C | .XXX[0x1] 0247 4806 |H | Short_Literal 0x6 0248 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0249 0000 0000 | | .BLANK 0000[0x7] 0250 ; -------------------------------------------------------------------------------------- 0250 ; SUBPROGRAM 0250 ; -------------------------------------------------------------------------------------- 0250 0253 | S | .CONST 0x0253 ; Address of begin 0251 0004 | | .CONST 0x0004 ; Address of exception handler 0252 0001 | | .CONST 0x0001 ; Number of locals 0253 BODY_0250: 0253 INIT_0250: 0253 4601 |F | Jump_Case 0x2 0254 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0255 7801 |x | Jump 0x257 ; case 0x1 0256 4302 |C | .XXX[0x1] 0257 480f |H | Short_Literal 0xf 0258 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0259 0000 0000 | | .BLANK 0000[0x7] 0260 ; -------------------------------------------------------------------------------------- 0260 ; SUBPROGRAM 0260 ; -------------------------------------------------------------------------------------- 0260 0263 | c | .CONST 0x0263 ; Address of begin 0261 0004 | | .CONST 0x0004 ; Address of exception handler 0262 0001 | | .CONST 0x0001 ; Number of locals 0263 BODY_0260: 0263 INIT_0260: 0263 4601 |F | Jump_Case 0x2 0264 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0265 7801 |x | Jump 0x267 ; case 0x1 0266 4302 |C | .XXX[0x1] 0267 480f |H | Short_Literal 0xf 0268 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0269 0000 0000 | | .BLANK 0000[0x7] 0270 ; -------------------------------------------------------------------------------------- 0270 ; SUBPROGRAM 0270 ; -------------------------------------------------------------------------------------- 0270 0273 | s | .CONST 0x0273 ; Address of begin 0271 0004 | | .CONST 0x0004 ; Address of exception handler 0272 0001 | | .CONST 0x0001 ; Number of locals 0273 BODY_0270: 0273 INIT_0270: 0273 4601 |F | Jump_Case 0x2 0274 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0275 7801 |x | Jump 0x277 ; case 0x1 0276 4302 |C | .XXX[0x1] 0277 480f |H | Short_Literal 0xf 0278 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0279 0000 0000 | | .BLANK 0000[0x7] 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 4601 |F | Jump_Case 0x2 0284 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0285 7801 |x | Jump 0x287 ; case 0x1 0286 4302 |C | .XXX[0x1] 0287 480f |H | Short_Literal 0xf 0288 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0289 0000 0000 | | .BLANK 0000[0x7] 0290 ; -------------------------------------------------------------------------------------- 0290 ; SUBPROGRAM 0290 ; -------------------------------------------------------------------------------------- 0290 0293 | | .CONST 0x0293 ; Address of begin 0291 0004 | | .CONST 0x0004 ; Address of exception handler 0292 0001 | | .CONST 0x0001 ; Number of locals 0293 BODY_0290: 0293 INIT_0290: 0293 4601 |F | Jump_Case 0x2 0294 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0295 7801 |x | Jump 0x297 ; case 0x1 0296 4302 |C | .XXX[0x1] 0297 480f |H | Short_Literal 0xf 0298 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0299 0000 0000 | | .BLANK 0000[0x7] 02a0 ; -------------------------------------------------------------------------------------- 02a0 ; Debug Table 02a0 ; -------------------------------------------------------------------------------------- 02a0 0004 0001 | | .DEBUG4 0x0004,0x0001,0xf27f,0x0000,0x0001,0x000d 02a6 000b 02da | | .DBG4T 0x000b,0x02da,0x1002,0x4000 02aa 0053 02f3 | S | .DBG4T 0x0053,0x02f3,0x1004,0x0000 02ae 008b 02fa | | .DBG4T 0x008b,0x02fa,0x1004,0x0000 02b2 00db 0301 | | .DBG4T 0x00db,0x0301,0x1004,0x0000 02b6 0113 0308 | | .DBG4T 0x0113,0x0308,0x1004,0x0000 02ba 016b 030f | k | .DBG4T 0x016b,0x030f,0x1004,0x0000 02be 01cb 0316 | | .DBG4T 0x01cb,0x0316,0x1004,0x0000 02c2 0243 0000 | C | .DBG4T 0x0243,0x0000,0x1005,0x0000 02c6 0253 0000 | S | .DBG4T 0x0253,0x0000,0x1005,0x0000 02ca 0263 0000 | c | .DBG4T 0x0263,0x0000,0x1005,0x0000 02ce 0273 0000 | s | .DBG4T 0x0273,0x0000,0x1005,0x0000 02d2 0283 0000 | | .DBG4T 0x0283,0x0000,0x1005,0x0000 02d6 0293 0000 | | .DBG4T 0x0293,0x0000,0x1005,0x0000 02da ; -------------------------------------------------------------------------------------- 02da ; Debug chain 02da ; -------------------------------------------------------------------------------------- 02da 0001 000b | | .DBGLEN 0x0001,0x000b 02dc 000b 001a | | .DBGLNO 0x000b,0x001a,0x001c,0x001e,0x002f,0x0036,0x003a,0x003d,0x003f,0x0042,0x0044,0x0045 02e8 0001 0002 | | .XXX[0xb] 02ea 0003 0007 | | 02ec 000a 0004 | | 02ee 0005 0006 | | 02f0 0008 0009 | | 02f2 000b | | 02f3 ; -------------------------------------------------------------------------------------- 02f3 ; Debug chain 02f3 ; -------------------------------------------------------------------------------------- 02f3 0002 0003 | | .DBGLEN 0x0002,0x0003 02f5 0053 005e | S ^| .DBGLNO 0x0053,0x005e,0x0060,0x0069,0x0073 02fa ; -------------------------------------------------------------------------------------- 02fa ; Debug chain 02fa ; -------------------------------------------------------------------------------------- 02fa 0002 0003 | | .DBGLEN 0x0002,0x0003 02fc 008b 0096 | | .DBGLNO 0x008b,0x0096,0x0098,0x00a1,0x00b7 0301 ; -------------------------------------------------------------------------------------- 0301 ; Debug chain 0301 ; -------------------------------------------------------------------------------------- 0301 0002 0003 | | .DBGLEN 0x0002,0x0003 0303 00db 00e6 | | .DBGLNO 0x00db,0x00e6,0x00e8,0x00f1,0x0107 0308 ; -------------------------------------------------------------------------------------- 0308 ; Debug chain 0308 ; -------------------------------------------------------------------------------------- 0308 0002 0003 | | .DBGLEN 0x0002,0x0003 030a 0113 011e | | .DBGLNO 0x0113,0x011e,0x0120,0x0129,0x0143 030f ; -------------------------------------------------------------------------------------- 030f ; Debug chain 030f ; -------------------------------------------------------------------------------------- 030f 0002 0003 | | .DBGLEN 0x0002,0x0003 0311 016b 0176 | k v| .DBGLNO 0x016b,0x0176,0x0178,0x0181,0x01a3 0316 ; -------------------------------------------------------------------------------------- 0316 ; Debug chain 0316 ; -------------------------------------------------------------------------------------- 0316 0002 0003 | | .DBGLEN 0x0002,0x0003 0318 01cb 01d6 | | .DBGLNO 0x01cb,0x01d6,0x01d8,0x01e1,0x020f 031d 0000 0000 | | .BLANK 0000[0xe3]