|
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 - metrics - 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 0280 | | .CONST 0x0280 ; 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 0018 | | .CONST 0x0018 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0008 | | .CONST 0x0008 ; Number of locals 000b INIT_0008: 000b e20e | | Load 0x1,0xe 000c 029f 004b | K| Declare_Subprogram INIT_0048,For_Call 000e 029f 0083 | | Declare_Subprogram INIT_0080,For_Call 0010 029f 00c3 | | Declare_Subprogram INIT_00c0,For_Call 0012 029f 010b | | Declare_Subprogram INIT_0108,For_Call 0014 029f 015b | [| Declare_Subprogram INIT_0158,For_Call 0016 029f 01bb | | Declare_Subprogram INIT_01b8,For_Call 0018 BODY_0008: 0018 e20e | | Load 0x1,0xe 0019 0122 | " | Execute Any,Make_Root_Type 001a 1c01 | | Execute_Immediate Run_Utility,0x1 001b 00d8 | | Load_Top At_Offset_0 001c 0d01 | | Execute_Immediate Less,0x1 001d 7013 |p | Jump_Nonzero 0x31 001e 00d8 | | Load_Top At_Offset_0 001f 0c13 | | Execute_Immediate Greater_Equal,0x13 0020 700a |p | Jump_Nonzero 0x2b 0021 00d8 | | Load_Top At_Offset_0 0022 0c07 | | Execute_Immediate Greater_Equal,0x7 0023 680f |h | Jump_Zero 0x33 0024 00d8 | | Load_Top At_Offset_0 0025 0c10 | | Execute_Immediate Greater_Equal,0x10 0026 680f |h | Jump_Zero 0x36 0027 0f10 | | Execute_Immediate Equal,0x10 0028 7010 |p | Jump_Nonzero 0x39 0029 8406 | | Call 0x2,0x6 002a 7814 |x | Jump 0x3f 002b 00d8 | | Load_Top At_Offset_0 002c 0c1c | | Execute_Immediate Greater_Equal,0x1c 002d 680d |h | Jump_Zero 0x3b 002e 0c22 | " | Execute_Immediate Greater_Equal,0x22 002f 680e |h | Jump_Zero 0x3e 0030 08e2 | | Execute_Immediate Raise,0xe2 0031 00d1 | | Pop_Control Pop_Count_1 0032 7ffd | | Jump 0x30 0033 00d1 | | Pop_Control Pop_Count_1 0034 8403 | | Call 0x2,0x3 0035 7809 |x | Jump 0x3f 0036 00d1 | | Pop_Control Pop_Count_1 0037 8404 | | Call 0x2,0x4 0038 7806 |x | Jump 0x3f 0039 8405 | | Call 0x2,0x5 003a 7804 |x | Jump 0x3f 003b 00d1 | | Pop_Control Pop_Count_1 003c 8407 | | Call 0x2,0x7 003d 7801 |x | Jump 0x3f 003e 8408 | | Call 0x2,0x8 003f e402 | | Load 0x2,0x2 0040 e20e | | Load 0x1,0xe 0041 0232 | 2 | Execute Float,Check_In_Type 0042 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0043 0000 0000 | | .BLANK 0000[0x5] 0048 ; -------------------------------------------------------------------------------------- 0048 ; SUBPROGRAM 0048 ; -------------------------------------------------------------------------------------- 0048 0058 | X | .CONST 0x0058 ; Address of begin 0049 0004 | | .CONST 0x0004 ; Address of exception handler 004a 0004 | | .CONST 0x0004 ; Number of locals 004b INIT_0048: 004b 00e6 | | Load_Encached Float_Cache 004c 0241 | A | Execute Float,First 004d 00e6 | | Load_Encached Float_Cache 004e 0240 | @ | Execute Float,Last 004f 00e6 | | Load_Encached Float_Cache 0050 03e3 | | Declare_Type Float,Constrained 0051 029f 0223 | #| Declare_Subprogram INIT_0220,For_Call 0053 00d9 | | Load_Top At_Offset_1 0054 012a | * | Execute Any,Change_Utility 0055 0007 | | Action Break_Optional 0056 00d8 | | Load_Top At_Offset_0 0057 03d8 | | Declare_Variable Float,Duplicate 0058 BODY_0048: 0058 e5ff | | Load 0x2,-0x1 0059 00d8 | | Load_Top At_Offset_0 005a e602 | | Load 0x3,0x2 005b 0234 | 4 | Execute Float,In_Type 005c 7001 |p | Jump_Nonzero 0x5e 005d 0801 | | Execute_Immediate Raise,0x1 005e 0042 | B | Store_Top_Unchecked Float,At_Offset_2 005f 00d9 | | Load_Top At_Offset_1 0060 5817 |X | Indirect_Literal Float,0x78,0.5 0061 023b | ; | Execute Float,Times 0062 00da | | Load_Top At_Offset_2 0063 00db | | Load_Top At_Offset_3 0064 023b | ; | Execute Float,Times 0065 580e |X | Indirect_Literal Float,0x74,0.125007987 0066 e603 | | Load 0x3,0x3 0067 5808 |X | Indirect_Literal Float,0x70,0.06250522999 0068 023b | ; | Execute Float,Times 0069 023c | < | Execute Float,Minus 006a 023b | ; | Execute Float,Times 006b 023c | < | Execute Float,Minus 006c 0049 | I | Store_Top Float,At_Offset_1 006d 00d8 | | Load_Top At_Offset_0 006e c402 | | Store 0x2,0x2 006f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0070 3fb0 0057 |? W| .DBL 0.06250522999 0072 bea2 d172 | r| 0074 3fc0 0042 |? B| .DBL 0.125007987 0076 fff3 af7e | ~| 0078 3fe0 0000 |? | .DBL 0.5 007a 0000 0000 | | 007c 0000 0000 | | .BLANK 0000[0x4] 0080 ; -------------------------------------------------------------------------------------- 0080 ; SUBPROGRAM 0080 ; -------------------------------------------------------------------------------------- 0080 0092 | | .CONST 0x0092 ; Address of begin 0081 0004 | | .CONST 0x0004 ; Address of exception handler 0082 0006 | | .CONST 0x0006 ; Number of locals 0083 INIT_0080: 0083 00e6 | | Load_Encached Float_Cache 0084 0241 | A | Execute Float,First 0085 00e6 | | Load_Encached Float_Cache 0086 0240 | @ | Execute Float,Last 0087 00e6 | | Load_Encached Float_Cache 0088 03e3 | | Declare_Type Float,Constrained 0089 029f 0233 | 3| Declare_Subprogram INIT_0230,For_Call 008b 00d9 | | Load_Top At_Offset_1 008c 012a | * | Execute Any,Change_Utility 008d 0007 | | Action Break_Optional 008e 00d8 | | Load_Top At_Offset_0 008f 03d8 | | Declare_Variable Float,Duplicate 0090 03d8 | | Declare_Variable Float,Duplicate 0091 03d8 | | Declare_Variable Float,Duplicate 0092 BODY_0080: 0092 e5ff | | Load 0x2,-0x1 0093 00d8 | | Load_Top At_Offset_0 0094 e602 | | Load 0x3,0x2 0095 0234 | 4 | Execute Float,In_Type 0096 7001 |p | Jump_Nonzero 0x98 0097 0801 | | Execute_Immediate Raise,0x1 0098 a603 | | Store_Unchecked 0x3,0x3 0099 00db | | Load_Top At_Offset_3 009a 5fdd |_ | Indirect_Literal Float,0x78,0.5 009b 023b | ; | Execute Float,Times 009c e603 | | Load 0x3,0x3 009d 00d8 | | Load_Top At_Offset_0 009e 023b | ; | Execute Float,Times 009f 5fd4 |_ | Indirect_Literal Float,0x74,0.125007987 00a0 e603 | | Load 0x3,0x3 00a1 5fce |_ | Indirect_Literal Float,0x70,0.06250522999 00a2 023b | ; | Execute Float,Times 00a3 023c | < | Execute Float,Minus 00a4 023b | ; | Execute Float,Times 00a5 023c | < | Execute Float,Minus 00a6 004b | K | Store_Top Float,At_Offset_3 00a7 00da | | Load_Top At_Offset_2 00a8 00db | | Load_Top At_Offset_3 00a9 023d | = | Execute Float,Plus 00aa 004a | J | Store_Top Float,At_Offset_2 00ab 00da | | Load_Top At_Offset_2 00ac 00db | | Load_Top At_Offset_3 00ad 023b | ; | Execute Float,Times 00ae 00da | | Load_Top At_Offset_2 00af e603 | | Load 0x3,0x3 00b0 023c | < | Execute Float,Minus 00b1 023d | = | Execute Float,Plus 00b2 00da | | Load_Top At_Offset_2 00b3 5808 |X | Indirect_Literal Float,0xbc,2.0 00b4 023d | = | Execute Float,Plus 00b5 023a | : | Execute Float,Divide 00b6 0049 | I | Store_Top Float,At_Offset_1 00b7 00da | | Load_Top At_Offset_2 00b8 00d9 | | Load_Top At_Offset_1 00b9 023c | < | Execute Float,Minus 00ba c402 | | Store 0x2,0x2 00bb 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00bc 4000 0000 |@ | .DBL 2.0 00be 0000 0000 | | 00c0 ; -------------------------------------------------------------------------------------- 00c0 ; SUBPROGRAM 00c0 ; -------------------------------------------------------------------------------------- 00c0 00d2 | | .CONST 0x00d2 ; Address of begin 00c1 0004 | | .CONST 0x0004 ; Address of exception handler 00c2 0006 | | .CONST 0x0006 ; Number of locals 00c3 INIT_00c0: 00c3 00e6 | | Load_Encached Float_Cache 00c4 0241 | A | Execute Float,First 00c5 00e6 | | Load_Encached Float_Cache 00c6 0240 | @ | Execute Float,Last 00c7 00e6 | | Load_Encached Float_Cache 00c8 03e3 | | Declare_Type Float,Constrained 00c9 029f 0243 | C| Declare_Subprogram INIT_0240,For_Call 00cb 00d9 | | Load_Top At_Offset_1 00cc 012a | * | Execute Any,Change_Utility 00cd 0007 | | Action Break_Optional 00ce 00d8 | | Load_Top At_Offset_0 00cf 03d8 | | Declare_Variable Float,Duplicate 00d0 03d8 | | Declare_Variable Float,Duplicate 00d1 03d8 | | Declare_Variable Float,Duplicate 00d2 BODY_00c0: 00d2 e5ff | | Load 0x2,-0x1 00d3 00d8 | | Load_Top At_Offset_0 00d4 e602 | | Load 0x3,0x2 00d5 0234 | 4 | Execute Float,In_Type 00d6 7001 |p | Jump_Nonzero 0xd8 00d7 0801 | | Execute_Immediate Raise,0x1 00d8 a603 | | Store_Unchecked 0x3,0x3 00d9 00db | | Load_Top At_Offset_3 00da 5829 |X) | Indirect_Literal Float,0x104,0.5 00db 023b | ; | Execute Float,Times 00dc e603 | | Load 0x3,0x3 00dd 00d8 | | Load_Top At_Offset_0 00de 023b | ; | Execute Float,Times 00df 5820 |X | Indirect_Literal Float,0x100,0.125007987 00e0 e603 | | Load 0x3,0x3 00e1 581a |X | Indirect_Literal Float,0xfc,0.06250522999 00e2 023b | ; | Execute Float,Times 00e3 023c | < | Execute Float,Minus 00e4 023b | ; | Execute Float,Times 00e5 023c | < | Execute Float,Minus 00e6 004b | K | Store_Top Float,At_Offset_3 00e7 00da | | Load_Top At_Offset_2 00e8 00db | | Load_Top At_Offset_3 00e9 023d | = | Execute Float,Plus 00ea 004a | J | Store_Top Float,At_Offset_2 00eb 00da | | Load_Top At_Offset_2 00ec 00db | | Load_Top At_Offset_3 00ed 023b | ; | Execute Float,Times 00ee 00da | | Load_Top At_Offset_2 00ef e603 | | Load 0x3,0x3 00f0 023c | < | Execute Float,Minus 00f1 023d | = | Execute Float,Plus 00f2 00da | | Load_Top At_Offset_2 00f3 5fc8 |_ | Indirect_Literal Float,0xbc,2.0 00f4 023d | = | Execute Float,Plus 00f5 023a | : | Execute Float,Divide 00f6 0049 | I | Store_Top Float,At_Offset_1 00f7 00da | | Load_Top At_Offset_2 00f8 00d9 | | Load_Top At_Offset_1 00f9 023c | < | Execute Float,Minus 00fa c402 | | Store 0x2,0x2 00fb 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00fc 3fb0 0057 |? W| .DBL 0.06250522999 00fe bea2 d172 | r| 0100 3fc0 0042 |? B| .DBL 0.125007987 0102 fff3 af7e | ~| 0104 3fe0 0000 |? | .DBL 0.5 0106 0000 0000 | | 0108 ; -------------------------------------------------------------------------------------- 0108 ; SUBPROGRAM 0108 ; -------------------------------------------------------------------------------------- 0108 011a | | .CONST 0x011a ; Address of begin 0109 0004 | | .CONST 0x0004 ; Address of exception handler 010a 0006 | | .CONST 0x0006 ; Number of locals 010b INIT_0108: 010b 00e6 | | Load_Encached Float_Cache 010c 0241 | A | Execute Float,First 010d 00e6 | | Load_Encached Float_Cache 010e 0240 | @ | Execute Float,Last 010f 00e6 | | Load_Encached Float_Cache 0110 03e3 | | Declare_Type Float,Constrained 0111 029f 0253 | S| Declare_Subprogram INIT_0250,For_Call 0113 00d9 | | Load_Top At_Offset_1 0114 012a | * | Execute Any,Change_Utility 0115 0007 | | Action Break_Optional 0116 00d8 | | Load_Top At_Offset_0 0117 03d8 | | Declare_Variable Float,Duplicate 0118 03d8 | | Declare_Variable Float,Duplicate 0119 03d8 | | Declare_Variable Float,Duplicate 011a BODY_0108: 011a e5ff | | Load 0x2,-0x1 011b 00d8 | | Load_Top At_Offset_0 011c e602 | | Load 0x3,0x2 011d 0234 | 4 | Execute Float,In_Type 011e 7001 |p | Jump_Nonzero 0x120 011f 0801 | | Execute_Immediate Raise,0x1 0120 a603 | | Store_Unchecked 0x3,0x3 0121 00db | | Load_Top At_Offset_3 0122 5fe1 |_ | Indirect_Literal Float,0x104,0.5 0123 023b | ; | Execute Float,Times 0124 e603 | | Load 0x3,0x3 0125 00d8 | | Load_Top At_Offset_0 0126 023b | ; | Execute Float,Times 0127 582c |X, | Indirect_Literal Float,0x154,0.125 0128 e603 | | Load 0x3,0x3 0129 5826 |X& | Indirect_Literal Float,0x150,0.06250585095323793 012a e603 | | Load 0x3,0x3 012b 5820 |X | Indirect_Literal Float,0x14c,0.039067555766279356 012c 023b | ; | Execute Float,Times 012d 023c | < | Execute Float,Minus 012e 023b | ; | Execute Float,Times 012f 023c | < | Execute Float,Minus 0130 023b | ; | Execute Float,Times 0131 023c | < | Execute Float,Minus 0132 004b | K | Store_Top Float,At_Offset_3 0133 00da | | Load_Top At_Offset_2 0134 00db | | Load_Top At_Offset_3 0135 023d | = | Execute Float,Plus 0136 004a | J | Store_Top Float,At_Offset_2 0137 00da | | Load_Top At_Offset_2 0138 00db | | Load_Top At_Offset_3 0139 023b | ; | Execute Float,Times 013a 00da | | Load_Top At_Offset_2 013b e603 | | Load 0x3,0x3 013c 023c | < | Execute Float,Minus 013d 023d | = | Execute Float,Plus 013e 00da | | Load_Top At_Offset_2 013f 5808 |X | Indirect_Literal Float,0x148,2.0 0140 023d | = | Execute Float,Plus 0141 023a | : | Execute Float,Divide 0142 0049 | I | Store_Top Float,At_Offset_1 0143 00da | | Load_Top At_Offset_2 0144 00d9 | | Load_Top At_Offset_1 0145 023c | < | Execute Float,Minus 0146 c402 | | Store 0x2,0x2 0147 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0148 4000 0000 |@ | .DBL 2.0 014a 0000 0000 | | 014c 3fa4 00a9 |? | .DBL 0.039067555766279356 014e a4b3 9f79 | y| 0150 3fb0 0062 |? b| .DBL 0.06250585095323793 0152 29a7 1e62 |) b| 0154 3fc0 0000 |? | .DBL 0.125 0156 0000 0000 | | 0158 ; -------------------------------------------------------------------------------------- 0158 ; SUBPROGRAM 0158 ; -------------------------------------------------------------------------------------- 0158 016a | j | .CONST 0x016a ; Address of begin 0159 0004 | | .CONST 0x0004 ; Address of exception handler 015a 0006 | | .CONST 0x0006 ; Number of locals 015b INIT_0158: 015b 00e6 | | Load_Encached Float_Cache 015c 0241 | A | Execute Float,First 015d 00e6 | | Load_Encached Float_Cache 015e 0240 | @ | Execute Float,Last 015f 00e6 | | Load_Encached Float_Cache 0160 03e3 | | Declare_Type Float,Constrained 0161 029f 0263 | c| Declare_Subprogram INIT_0260,For_Call 0163 00d9 | | Load_Top At_Offset_1 0164 012a | * | Execute Any,Change_Utility 0165 0007 | | Action Break_Optional 0166 00d8 | | Load_Top At_Offset_0 0167 03d8 | | Declare_Variable Float,Duplicate 0168 03d8 | | Declare_Variable Float,Duplicate 0169 03d8 | | Declare_Variable Float,Duplicate 016a BODY_0158: 016a e5ff | | Load 0x2,-0x1 016b 00d8 | | Load_Top At_Offset_0 016c e602 | | Load 0x3,0x2 016d 0234 | 4 | Execute Float,In_Type 016e 7001 |p | Jump_Nonzero 0x170 016f 0801 | | Execute_Immediate Raise,0x1 0170 a603 | | Store_Unchecked 0x3,0x3 0171 00db | | Load_Top At_Offset_3 0172 5841 |XA | Indirect_Literal Float,0x1b4,0.5 0173 023b | ; | Execute Float,Times 0174 e603 | | Load 0x3,0x3 0175 00d8 | | Load_Top At_Offset_0 0176 023b | ; | Execute Float,Times 0177 5838 |X8 | Indirect_Literal Float,0x1b0,0.12500000000004327 0178 e603 | | Load 0x3,0x3 0179 5832 |X2 | Indirect_Literal Float,0x1ac,0.06249999949583133 017a e603 | | Load 0x3,0x3 017b 582c |X, | Indirect_Literal Float,0x1a8,0.039062498978114125 017c e603 | | Load 0x3,0x3 017d 5826 |X& | Indirect_Literal Float,0x1a4,0.02734966395870805 017e e603 | | Load 0x3,0x3 017f 5820 |X | Indirect_Literal Float,0x1a0,0.020514473220656176 0180 023b | ; | Execute Float,Times 0181 023c | < | Execute Float,Minus 0182 023b | ; | Execute Float,Times 0183 023c | < | Execute Float,Minus 0184 023b | ; | Execute Float,Times 0185 023c | < | Execute Float,Minus 0186 023b | ; | Execute Float,Times 0187 023c | < | Execute Float,Minus 0188 023b | ; | Execute Float,Times 0189 023c | < | Execute Float,Minus 018a 004b | K | Store_Top Float,At_Offset_3 018b 00da | | Load_Top At_Offset_2 018c 00db | | Load_Top At_Offset_3 018d 023d | = | Execute Float,Plus 018e 004a | J | Store_Top Float,At_Offset_2 018f 00da | | Load_Top At_Offset_2 0190 00db | | Load_Top At_Offset_3 0191 023b | ; | Execute Float,Times 0192 00da | | Load_Top At_Offset_2 0193 e603 | | Load 0x3,0x3 0194 023c | < | Execute Float,Minus 0195 023d | = | Execute Float,Plus 0196 00da | | Load_Top At_Offset_2 0197 5fb0 |_ | Indirect_Literal Float,0x148,2.0 0198 023d | = | Execute Float,Plus 0199 023a | : | Execute Float,Divide 019a 0049 | I | Store_Top Float,At_Offset_1 019b 00da | | Load_Top At_Offset_2 019c 00d9 | | Load_Top At_Offset_1 019d 023c | < | Execute Float,Minus 019e c402 | | Store 0x2,0x2 019f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01a0 3f95 01be |? | .DBL 0.020514473220656176 01a2 fe4f 3e4b | O>K| 01a4 3f9c 018c |? | .DBL 0.02734966395870805 01a6 e109 7677 | vw| 01a8 3fa3 ffff |? | .DBL 0.039062498978114125 01aa f738 d965 | 8 e| 01ac 3faf ffff |? | .DBL 0.06249999949583133 01ae fbab 5245 | RE| 01b0 3fc0 0000 |? | .DBL 0.12500000000004327 01b2 0000 0617 | | 01b4 3fe0 0000 |? | .DBL 0.5 01b6 0000 0000 | | 01b8 ; -------------------------------------------------------------------------------------- 01b8 ; SUBPROGRAM 01b8 ; -------------------------------------------------------------------------------------- 01b8 01ca | | .CONST 0x01ca ; Address of begin 01b9 0004 | | .CONST 0x0004 ; Address of exception handler 01ba 0006 | | .CONST 0x0006 ; Number of locals 01bb INIT_01b8: 01bb 00e6 | | Load_Encached Float_Cache 01bc 0241 | A | Execute Float,First 01bd 00e6 | | Load_Encached Float_Cache 01be 0240 | @ | Execute Float,Last 01bf 00e6 | | Load_Encached Float_Cache 01c0 03e3 | | Declare_Type Float,Constrained 01c1 029f 0273 | s| Declare_Subprogram INIT_0270,For_Call 01c3 00d9 | | Load_Top At_Offset_1 01c4 012a | * | Execute Any,Change_Utility 01c5 0007 | | Action Break_Optional 01c6 00d8 | | Load_Top At_Offset_0 01c7 03d8 | | Declare_Variable Float,Duplicate 01c8 03d8 | | Declare_Variable Float,Duplicate 01c9 03d8 | | Declare_Variable Float,Duplicate 01ca BODY_01b8: 01ca e5ff | | Load 0x2,-0x1 01cb 00d8 | | Load_Top At_Offset_0 01cc e602 | | Load 0x3,0x2 01cd 0234 | 4 | Execute Float,In_Type 01ce 7001 |p | Jump_Nonzero 0x1d0 01cf 0801 | | Execute_Immediate Raise,0x1 01d0 a603 | | Store_Unchecked 0x3,0x3 01d1 00db | | Load_Top At_Offset_3 01d2 5fe1 |_ | Indirect_Literal Float,0x1b4,0.5 01d3 023b | ; | Execute Float,Times 01d4 e603 | | Load 0x3,0x3 01d5 00d8 | | Load_Top At_Offset_0 01d6 023b | ; | Execute Float,Times 01d7 5844 |XD | Indirect_Literal Float,0x21c,0.12500000000003578 01d8 e603 | | Load 0x3,0x3 01d9 583e |X> | Indirect_Literal Float,0x218,0.06250000000006645 01da e603 | | Load 0x3,0x3 01db 5838 |X8 | Indirect_Literal Float,0x214,0.03906249911617502 01dc e603 | | Load 0x3,0x3 01dd 5832 |X2 | Indirect_Literal Float,0x210,0.027343748850355194 01de e603 | | Load 0x3,0x3 01df 582c |X, | Indirect_Literal Float,0x20c,0.02051400699965995 01e0 e603 | | Load 0x3,0x3 01e1 5826 |X& | Indirect_Literal Float,0x208,0.016119541340974698 01e2 023b | ; | Execute Float,Times 01e3 023c | < | Execute Float,Minus 01e4 023b | ; | Execute Float,Times 01e5 023c | < | Execute Float,Minus 01e6 023b | ; | Execute Float,Times 01e7 023c | < | Execute Float,Minus 01e8 023b | ; | Execute Float,Times 01e9 023c | < | Execute Float,Minus 01ea 023b | ; | Execute Float,Times 01eb 023c | < | Execute Float,Minus 01ec 023b | ; | Execute Float,Times 01ed 023c | < | Execute Float,Minus 01ee 004b | K | Store_Top Float,At_Offset_3 01ef 00da | | Load_Top At_Offset_2 01f0 00db | | Load_Top At_Offset_3 01f1 023d | = | Execute Float,Plus 01f2 004a | J | Store_Top Float,At_Offset_2 01f3 00da | | Load_Top At_Offset_2 01f4 00db | | Load_Top At_Offset_3 01f5 023b | ; | Execute Float,Times 01f6 00da | | Load_Top At_Offset_2 01f7 e603 | | Load 0x3,0x3 01f8 023c | < | Execute Float,Minus 01f9 023d | = | Execute Float,Plus 01fa 00da | | Load_Top At_Offset_2 01fb 5808 |X | Indirect_Literal Float,0x204,2.0 01fc 023d | = | Execute Float,Plus 01fd 023a | : | Execute Float,Divide 01fe 0049 | I | Store_Top Float,At_Offset_1 01ff 00da | | Load_Top At_Offset_2 0200 00d9 | | Load_Top At_Offset_1 0201 023c | < | Execute Float,Minus 0202 c402 | | Store 0x2,0x2 0203 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0204 4000 0000 |@ | .DBL 2.0 0206 0000 0000 | | 0208 3f90 81a4 |? | .DBL 0.016119541340974698 020a 1b8b 453d | E=| 020c 3f95 019f |? | .DBL 0.02051400699965995 020e b4b1 9e13 | | 0210 3f9b ffff |? | .DBL 0.027343748850355194 0212 ec3f cf05 | ? | 0214 3fa3 ffff |? | .DBL 0.03906249911617502 0216 f868 72c5 | hr | 0218 3fb0 0000 |? | .DBL 0.06250000000006645 021a 0000 12b4 | | 021c 3fc0 0000 |? | .DBL 0.12500000000003578 021e 0000 0509 | | 0220 ; -------------------------------------------------------------------------------------- 0220 ; SUBPROGRAM 0220 ; -------------------------------------------------------------------------------------- 0220 0223 | # | .CONST 0x0223 ; Address of begin 0221 0004 | | .CONST 0x0004 ; Address of exception handler 0222 0001 | | .CONST 0x0001 ; Number of locals 0223 BODY_0220: 0223 INIT_0220: 0223 4601 |F | Jump_Case 0x2 0224 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0225 7801 |x | Jump 0x227 ; case 0x1 0226 4302 |C | .XXX[0x1] 0227 4806 |H | Short_Literal 0x6 0228 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0229 0000 0000 | | .BLANK 0000[0x7] 0230 ; -------------------------------------------------------------------------------------- 0230 ; SUBPROGRAM 0230 ; -------------------------------------------------------------------------------------- 0230 0233 | 3 | .CONST 0x0233 ; Address of begin 0231 0004 | | .CONST 0x0004 ; Address of exception handler 0232 0001 | | .CONST 0x0001 ; Number of locals 0233 BODY_0230: 0233 INIT_0230: 0233 4601 |F | Jump_Case 0x2 0234 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0235 7801 |x | Jump 0x237 ; case 0x1 0236 4302 |C | .XXX[0x1] 0237 480f |H | Short_Literal 0xf 0238 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0239 0000 0000 | | .BLANK 0000[0x7] 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 480f |H | Short_Literal 0xf 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 ; Debug Table 0280 ; -------------------------------------------------------------------------------------- 0280 0004 0001 | | .DEBUG4 0x0004,0x0001,0xf284,0x0000,0x0001,0x000d 0286 000b 02ba | | .DBG4T 0x000b,0x02ba,0x1002,0x4000 028a 004b 02cf | K | .DBG4T 0x004b,0x02cf,0x1004,0x0000 028e 0083 02d6 | | .DBG4T 0x0083,0x02d6,0x1004,0x0000 0292 00c3 02df | | .DBG4T 0x00c3,0x02df,0x1004,0x0000 0296 010b 02e8 | | .DBG4T 0x010b,0x02e8,0x1004,0x0000 029a 015b 02f1 | [ | .DBG4T 0x015b,0x02f1,0x1004,0x0000 029e 01bb 02fa | | .DBG4T 0x01bb,0x02fa,0x1004,0x0000 02a2 0223 0000 | # | .DBG4T 0x0223,0x0000,0x1005,0x0000 02a6 0233 0000 | 3 | .DBG4T 0x0233,0x0000,0x1005,0x0000 02aa 0243 0000 | C | .DBG4T 0x0243,0x0000,0x1005,0x0000 02ae 0253 0000 | S | .DBG4T 0x0253,0x0000,0x1005,0x0000 02b2 0263 0000 | c | .DBG4T 0x0263,0x0000,0x1005,0x0000 02b6 0273 0000 | s | .DBG4T 0x0273,0x0000,0x1005,0x0000 02ba ; -------------------------------------------------------------------------------------- 02ba ; Debug chain 02ba ; -------------------------------------------------------------------------------------- 02ba 0001 0009 | | .DBGLEN 0x0001,0x0009 02bc 000b 0018 | | .DBGLNO 0x000b,0x0018,0x0029,0x0030,0x0034,0x0037,0x0039,0x003c,0x003e,0x003f 02c6 0001 0005 | | .XXX[0x9] 02c8 0008 0002 | | 02ca 0003 0004 | | 02cc 0006 0007 | | 02ce 0009 | | 02cf ; -------------------------------------------------------------------------------------- 02cf ; Debug chain 02cf ; -------------------------------------------------------------------------------------- 02cf 0002 0003 | | .DBGLEN 0x0002,0x0003 02d1 004b 0056 | K V| .DBGLNO 0x004b,0x0056,0x0058,0x005f,0x006d 02d6 ; -------------------------------------------------------------------------------------- 02d6 ; Debug chain 02d6 ; -------------------------------------------------------------------------------------- 02d6 0002 0005 | | .DBGLEN 0x0002,0x0005 02d8 0083 008e | | .DBGLNO 0x0083,0x008e,0x0092,0x0099,0x00a7,0x00ab,0x00b7 02df ; -------------------------------------------------------------------------------------- 02df ; Debug chain 02df ; -------------------------------------------------------------------------------------- 02df 0002 0005 | | .DBGLEN 0x0002,0x0005 02e1 00c3 00ce | | .DBGLNO 0x00c3,0x00ce,0x00d2,0x00d9,0x00e7,0x00eb,0x00f7 02e8 ; -------------------------------------------------------------------------------------- 02e8 ; Debug chain 02e8 ; -------------------------------------------------------------------------------------- 02e8 0002 0005 | | .DBGLEN 0x0002,0x0005 02ea 010b 0116 | | .DBGLNO 0x010b,0x0116,0x011a,0x0121,0x0133,0x0137,0x0143 02f1 ; -------------------------------------------------------------------------------------- 02f1 ; Debug chain 02f1 ; -------------------------------------------------------------------------------------- 02f1 0002 0005 | | .DBGLEN 0x0002,0x0005 02f3 015b 0166 | [ f| .DBGLNO 0x015b,0x0166,0x016a,0x0171,0x018b,0x018f,0x019b 02fa ; -------------------------------------------------------------------------------------- 02fa ; Debug chain 02fa ; -------------------------------------------------------------------------------------- 02fa 0002 0005 | | .DBGLEN 0x0002,0x0005 02fc 01bb 01c6 | | .DBGLNO 0x01bb,0x01c6,0x01ca,0x01d1,0x01ef,0x01f3,0x01ff 0303 0000 0000 | | .BLANK 0000[0xfd]