|
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 8001 | | .CONST 0x8001 ; 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 00d3 | | Declare_Subprogram INIT_00d0,For_Call
0012 029f 010b | | Declare_Subprogram INIT_0108,For_Call
0014 029f 0163 | c| Declare_Subprogram INIT_0160,For_Call
0016 029f 01cb | | Declare_Subprogram INIT_01c8,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 0059 | Y | .CONST 0x0059 ; Address of begin
0049 0004 | | .CONST 0x0004 ; Address of exception handler
004a 0005 | | .CONST 0x0005 ; 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 0243 | C| Declare_Subprogram INIT_0240,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 03d8 | | Declare_Variable Float,Duplicate
0059 BODY_0048:
0059 e5ff | | Load 0x2,-0x1
005a 00d8 | | Load_Top At_Offset_0
005b e602 | | Load 0x3,0x2
005c 0234 | 4 | Execute Float,In_Type
005d 7001 |p | Jump_Nonzero 0x5f
005e 0801 | | Execute_Immediate Raise,0x1
005f 0043 | C | Store_Top_Uncheched Float,At_Offset_3
0060 00da | | Load_Top At_Offset_2
0061 00db | | Load_Top At_Offset_3
0062 023b | ; | Execute Float,Times
0063 004a | J | Store_Top Float,At_Offset_2
0064 00da | | Load_Top At_Offset_2
0065 00da | | Load_Top At_Offset_2
0066 023b | ; | Execute Float,Times
0067 5810 |X | Indirect_Literal Float,0x78,0.3333323001
0068 00db | | Load_Top At_Offset_3
0069 580a |X | Indirect_Literal Float,0x74,0.19918597189999998
006a 023b | ; | Execute Float,Times
006b 023c | < | Execute Float,Minus
006c 023b | ; | Execute Float,Times
006d 023f | ? | Execute Float,Unary_Minus
006e 0049 | I | Store_Top Float,At_Offset_1
006f 00d8 | | Load_Top At_Offset_0
0070 c402 | | Store 0x2,0x2
0071 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0072 0000 0000 | | .XXX[0x2]
0074 3fc9 7eed |? ~ | .DBL 0.19918597189999998
0076 0990 f4f0 | |
0078 3fd5 5550 |? UP| .DBL 0.3333323001
007a ffe8 5139 | Q9|
007c 0000 0000 | | .BLANK 0000[0x4]
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 0091 | | .CONST 0x0091 ; Address of begin
0081 0004 | | .CONST 0x0004 ; Address of exception handler
0082 0005 | | .CONST 0x0005 ; 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 0253 | S| Declare_Subprogram INIT_0250,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 BODY_0080:
0091 e5ff | | Load 0x2,-0x1
0092 00d8 | | Load_Top At_Offset_0
0093 e602 | | Load 0x3,0x2
0094 0234 | 4 | Execute Float,In_Type
0095 7001 |p | Jump_Nonzero 0x97
0096 0801 | | Execute_Immediate Raise,0x1
0097 0043 | C | Store_Top_Uncheched Float,At_Offset_3
0098 00da | | Load_Top At_Offset_2
0099 00db | | Load_Top At_Offset_3
009a 023b | ; | Execute Float,Times
009b 004a | J | Store_Top Float,At_Offset_2
009c 00da | | Load_Top At_Offset_2
009d 00da | | Load_Top At_Offset_2
009e 023b | ; | Execute Float,Times
009f 5828 |X( | Indirect_Literal Float,0xc8,0.33333333333333165
00a0 00db | | Load_Top At_Offset_3
00a1 5822 |X" | Indirect_Literal Float,0xc4,0.19999999999393223
00a2 e604 | | Load 0x3,0x4
00a3 581c |X | Indirect_Literal Float,0xc0,0.14285713561807167
00a4 e604 | | Load 0x3,0x4
00a5 5816 |X | Indirect_Literal Float,0xbc,0.11110736283514525
00a6 e604 | | Load 0x3,0x4
00a7 5810 |X | Indirect_Literal Float,0xb8,0.09002981028544978
00a8 023b | ; | Execute Float,Times
00a9 023c | < | Execute Float,Minus
00aa 023b | ; | Execute Float,Times
00ab 023c | < | Execute Float,Minus
00ac 023b | ; | Execute Float,Times
00ad 023c | < | Execute Float,Minus
00ae 023b | ; | Execute Float,Times
00af 023c | < | Execute Float,Minus
00b0 023b | ; | Execute Float,Times
00b1 023f | ? | Execute Float,Unary_Minus
00b2 0049 | I | Store_Top Float,At_Offset_1
00b3 00d8 | | Load_Top At_Offset_0
00b4 c402 | | Store 0x2,0x2
00b5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00b6 0000 0000 | | .XXX[0x2]
00b8 3fb7 0c31 |? 1| .DBL 0.09002981028544978
00ba 92d7 51c1 | Q |
00bc 3fbc 7188 |? q | .DBL 0.11110736283514525
00be 39b8 c4ea |9 |
00c0 3fc2 4924 |? I$| .DBL 0.14285713561807167
00c2 82bd 6be0 | k |
00c4 3fc9 9999 |? | .DBL 0.19999999999393223
00c6 9996 43a3 | C |
00c8 3fd5 5555 |? UU| .DBL 0.33333333333333165
00ca 5555 5537 |UUU7|
00cc 0000 0000 | | .BLANK 0000[0x4]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00e1 | | .CONST 0x00e1 ; Address of begin
00d1 0004 | | .CONST 0x0004 ; Address of exception handler
00d2 0005 | | .CONST 0x0005 ; Number of locals
00d3 INIT_00d0:
00d3 00e6 | | Load_Encached Float_Cache
00d4 0241 | A | Execute Float,First
00d5 00e6 | | Load_Encached Float_Cache
00d6 0240 | @ | Execute Float,Last
00d7 00e6 | | Load_Encached Float_Cache
00d8 03e3 | | Declare_Type Float,Constrained
00d9 029f 0263 | c| Declare_Subprogram INIT_0260,For_Call
00db 00d9 | | Load_Top At_Offset_1
00dc 012a | * | Execute Any,Change_Utility
00dd 0007 | | Action Break_Optional
00de 00d8 | | Load_Top At_Offset_0
00df 03d8 | | Declare_Variable Float,Duplicate
00e0 03d8 | | Declare_Variable Float,Duplicate
00e1 BODY_00d0:
00e1 e5ff | | Load 0x2,-0x1
00e2 00d8 | | Load_Top At_Offset_0
00e3 e602 | | Load 0x3,0x2
00e4 0234 | 4 | Execute Float,In_Type
00e5 7001 |p | Jump_Nonzero 0xe7
00e6 0801 | | Execute_Immediate Raise,0x1
00e7 0043 | C | Store_Top_Uncheched Float,At_Offset_3
00e8 00da | | Load_Top At_Offset_2
00e9 00db | | Load_Top At_Offset_3
00ea 023b | ; | Execute Float,Times
00eb 004a | J | Store_Top Float,At_Offset_2
00ec 00da | | Load_Top At_Offset_2
00ed 00da | | Load_Top At_Offset_2
00ee 023b | ; | Execute Float,Times
00ef 5fd8 |_ | Indirect_Literal Float,0xc8,0.33333333333333165
00f0 00db | | Load_Top At_Offset_3
00f1 5fd2 |_ | Indirect_Literal Float,0xc4,0.19999999999393223
00f2 e604 | | Load 0x3,0x4
00f3 5fcc |_ | Indirect_Literal Float,0xc0,0.14285713561807167
00f4 e604 | | Load 0x3,0x4
00f5 5fc6 |_ | Indirect_Literal Float,0xbc,0.11110736283514525
00f6 e604 | | Load 0x3,0x4
00f7 5fc0 |_ | Indirect_Literal Float,0xb8,0.09002981028544978
00f8 023b | ; | Execute Float,Times
00f9 023c | < | Execute Float,Minus
00fa 023b | ; | Execute Float,Times
00fb 023c | < | Execute Float,Minus
00fc 023b | ; | Execute Float,Times
00fd 023c | < | Execute Float,Minus
00fe 023b | ; | Execute Float,Times
00ff 023c | < | Execute Float,Minus
0100 023b | ; | Execute Float,Times
0101 023f | ? | Execute Float,Unary_Minus
0102 0049 | I | Store_Top Float,At_Offset_1
0103 00d8 | | Load_Top At_Offset_0
0104 c402 | | Store 0x2,0x2
0105 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0106 0000 0000 | | .XXX[0x2]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 0119 | | .CONST 0x0119 ; Address of begin
0109 0004 | | .CONST 0x0004 ; Address of exception handler
010a 0005 | | .CONST 0x0005 ; 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 0273 | s| Declare_Subprogram INIT_0270,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 BODY_0108:
0119 e5ff | | Load 0x2,-0x1
011a 00d8 | | Load_Top At_Offset_0
011b e602 | | Load 0x3,0x2
011c 0234 | 4 | Execute Float,In_Type
011d 7001 |p | Jump_Nonzero 0x11f
011e 0801 | | Execute_Immediate Raise,0x1
011f 0043 | C | Store_Top_Uncheched Float,At_Offset_3
0120 00da | | Load_Top At_Offset_2
0121 00db | | Load_Top At_Offset_3
0122 023b | ; | Execute Float,Times
0123 004a | J | Store_Top Float,At_Offset_2
0124 00da | | Load_Top At_Offset_2
0125 00da | | Load_Top At_Offset_2
0126 023b | ; | Execute Float,Times
0127 5830 |X0 | Indirect_Literal Float,0x158,0.3333333333333333
0128 00db | | Load_Top At_Offset_3
0129 582a |X* | Indirect_Literal Float,0x154,0.19999999999999
012a e604 | | Load 0x3,0x4
012b 5824 |X$ | Indirect_Literal Float,0x150,0.1428571428406748
012c e604 | | Load 0x3,0x4
012d 581e |X | Indirect_Literal Float,0x14c,0.11111109864597904
012e e604 | | Load 0x3,0x4
012f 5818 |X | Indirect_Literal Float,0x148,0.09090431858097447
0130 e604 | | Load 0x3,0x4
0131 5812 |X | Indirect_Literal Float,0x144,0.07602322269400384
0132 023b | ; | Execute Float,Times
0133 023c | < | Execute Float,Minus
0134 023b | ; | Execute Float,Times
0135 023c | < | Execute Float,Minus
0136 023b | ; | Execute Float,Times
0137 023c | < | Execute Float,Minus
0138 023b | ; | Execute Float,Times
0139 023c | < | Execute Float,Minus
013a 023b | ; | Execute Float,Times
013b 023c | < | Execute Float,Minus
013c 023b | ; | Execute Float,Times
013d 023f | ? | Execute Float,Unary_Minus
013e 0049 | I | Store_Top Float,At_Offset_1
013f 00d8 | | Load_Top At_Offset_0
0140 c402 | | Store 0x2,0x2
0141 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0142 0000 0000 | | .XXX[0x2]
0144 3fb3 7642 |? vB| .DBL 0.07602322269400384
0146 0735 0fbf | 5 |
0148 3fb7 4581 |? E | .DBL 0.09090431858097447
014a 635e d5d8 |c^ |
014c 3fbc 71c6 |? q | .DBL 0.11111109864597904
014e e6e8 385a | 8Z|
0150 3fc2 4924 |? I$| .DBL 0.1428571428406748
0152 9240 16e6 | @ |
0154 3fc9 9999 |? | .DBL 0.19999999999999
0156 9999 9831 | 1|
0158 3fd5 5555 |? UU| .DBL 0.3333333333333333
015a 5555 5555 |UUUU|
015c 0000 0000 | | .BLANK 0000[0x4]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0171 | q | .CONST 0x0171 ; Address of begin
0161 0004 | | .CONST 0x0004 ; Address of exception handler
0162 0005 | | .CONST 0x0005 ; Number of locals
0163 INIT_0160:
0163 00e6 | | Load_Encached Float_Cache
0164 0241 | A | Execute Float,First
0165 00e6 | | Load_Encached Float_Cache
0166 0240 | @ | Execute Float,Last
0167 00e6 | | Load_Encached Float_Cache
0168 03e3 | | Declare_Type Float,Constrained
0169 029f 0283 | | Declare_Subprogram INIT_0280,For_Call
016b 00d9 | | Load_Top At_Offset_1
016c 012a | * | Execute Any,Change_Utility
016d 0007 | | Action Break_Optional
016e 00d8 | | Load_Top At_Offset_0
016f 03d8 | | Declare_Variable Float,Duplicate
0170 03d8 | | Declare_Variable Float,Duplicate
0171 BODY_0160:
0171 e5ff | | Load 0x2,-0x1
0172 00d8 | | Load_Top At_Offset_0
0173 e602 | | Load 0x3,0x2
0174 0234 | 4 | Execute Float,In_Type
0175 7001 |p | Jump_Nonzero 0x177
0176 0801 | | Execute_Immediate Raise,0x1
0177 0043 | C | Store_Top_Uncheched Float,At_Offset_3
0178 00da | | Load_Top At_Offset_2
0179 00db | | Load_Top At_Offset_3
017a 023b | ; | Execute Float,Times
017b 004a | J | Store_Top Float,At_Offset_2
017c 00da | | Load_Top At_Offset_2
017d 00da | | Load_Top At_Offset_2
017e 023b | ; | Execute Float,Times
017f 5fd8 |_ | Indirect_Literal Float,0x158,0.3333333333333333
0180 00db | | Load_Top At_Offset_3
0181 5842 |XB | Indirect_Literal Float,0x1c4,0.19999999999999998
0182 e604 | | Load 0x3,0x4
0183 583c |X< | Indirect_Literal Float,0x1c0,0.14285714285714285
0184 e604 | | Load 0x3,0x4
0185 5836 |X6 | Indirect_Literal Float,0x1bc,0.11111111111111094
0186 e604 | | Load 0x3,0x4
0187 5830 |X0 | Indirect_Literal Float,0x1b8,0.0909090909089284
0188 e604 | | Load 0x3,0x4
0189 582a |X* | Indirect_Literal Float,0x1b4,0.07692307682736185
018a e604 | | Load 0x3,0x4
018b 5824 |X$ | Indirect_Literal Float,0x1b0,0.06666663192872317
018c e604 | | Load 0x3,0x4
018d 581e |X | Indirect_Literal Float,0x1ac,0.058815928810683094
018e e604 | | Load 0x3,0x4
018f 5818 |X | Indirect_Literal Float,0x1a8,0.05171122330764825
0190 023b | ; | Execute Float,Times
0191 023c | < | Execute Float,Minus
0192 023b | ; | Execute Float,Times
0193 023c | < | Execute Float,Minus
0194 023b | ; | Execute Float,Times
0195 023c | < | Execute Float,Minus
0196 023b | ; | Execute Float,Times
0197 023c | < | Execute Float,Minus
0198 023b | ; | Execute Float,Times
0199 023c | < | Execute Float,Minus
019a 023b | ; | Execute Float,Times
019b 023c | < | Execute Float,Minus
019c 023b | ; | Execute Float,Times
019d 023c | < | Execute Float,Minus
019e 023b | ; | Execute Float,Times
019f 023c | < | Execute Float,Minus
01a0 023b | ; | Execute Float,Times
01a1 023f | ? | Execute Float,Unary_Minus
01a2 0049 | I | Store_Top Float,At_Offset_1
01a3 00d8 | | Load_Top At_Offset_0
01a4 c402 | | Store 0x2,0x2
01a5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01a6 0000 0000 | | .XXX[0x2]
01a8 3faa 79e4 |? y | .DBL 0.05171122330764825
01aa b9e2 8fa5 | |
01ac 3fae 1d1f |? | .DBL 0.058815928810683094
01ae 1573 9540 | s @|
01b0 3fb1 1110 |? | .DBL 0.06666663192872317
01b2 7bde 4b3b |{ K;|
01b4 3fb3 b13b |? ;| .DBL 0.07692307682736185
01b6 1347 fdae | G |
01b8 3fb7 45d1 |? E | .DBL 0.0909090909089284
01ba 745c e988 |t\ |
01bc 3fbc 71c7 |? q | .DBL 0.11111111111111094
01be 1c71 c710 | q |
01c0 3fc2 4924 |? I$| .DBL 0.14285714285714285
01c2 9249 2492 | I$ |
01c4 3fc9 9999 |? | .DBL 0.19999999999999998
01c6 9999 9999 | |
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 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 03d8 | | Declare_Variable Float,Duplicate
01d9 BODY_01c8:
01d9 e5ff | | Load 0x2,-0x1
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 0043 | C | Store_Top_Uncheched Float,At_Offset_3
01e0 00da | | Load_Top At_Offset_2
01e1 00db | | Load_Top At_Offset_3
01e2 023b | ; | Execute Float,Times
01e3 004a | J | Store_Top Float,At_Offset_2
01e4 00da | | Load_Top At_Offset_2
01e5 00da | | Load_Top At_Offset_2
01e6 023b | ; | Execute Float,Times
01e7 5850 |XP | Indirect_Literal Float,0x238,0.3333333333333333
01e8 00db | | Load_Top At_Offset_3
01e9 5fda |_ | Indirect_Literal Float,0x1c4,0.19999999999999998
01ea e604 | | Load 0x3,0x4
01eb 5fd4 |_ | Indirect_Literal Float,0x1c0,0.14285714285714285
01ec e604 | | Load 0x3,0x4
01ed 5846 |XF | Indirect_Literal Float,0x234,0.1111111111111111
01ee e604 | | Load 0x3,0x4
01ef 5840 |X@ | Indirect_Literal Float,0x230,0.0909090909090909
01f0 e604 | | Load 0x3,0x4
01f1 583a |X: | Indirect_Literal Float,0x22c,0.0769230769230761
01f2 e604 | | Load 0x3,0x4
01f3 5834 |X4 | Indirect_Literal Float,0x228,0.06666666666616515
01f4 e604 | | Load 0x3,0x4
01f5 582e |X. | Indirect_Literal Float,0x224,0.0588235292068496
01f6 e604 | | Load 0x3,0x4
01f7 5828 |X( | Indirect_Literal Float,0x220,0.05263152374603569
01f8 e604 | | Load 0x3,0x4
01f9 5822 |X" | Indirect_Literal Float,0x21c,0.04760962465862135
01fa e604 | | Load 0x3,0x4
01fb 581c |X | Indirect_Literal Float,0x218,0.04255342964372181
01fc 023b | ; | Execute Float,Times
01fd 023c | < | Execute Float,Minus
01fe 023b | ; | Execute Float,Times
01ff 023c | < | Execute Float,Minus
0200 023b | ; | Execute Float,Times
0201 023c | < | Execute Float,Minus
0202 023b | ; | Execute Float,Times
0203 023c | < | Execute Float,Minus
0204 023b | ; | Execute Float,Times
0205 023c | < | Execute Float,Minus
0206 023b | ; | Execute Float,Times
0207 023c | < | Execute Float,Minus
0208 023b | ; | Execute Float,Times
0209 023c | < | Execute Float,Minus
020a 023b | ; | Execute Float,Times
020b 023c | < | Execute Float,Minus
020c 023b | ; | Execute Float,Times
020d 023c | < | Execute Float,Minus
020e 023b | ; | Execute Float,Times
020f 023c | < | Execute Float,Minus
0210 023b | ; | Execute Float,Times
0211 023f | ? | Execute Float,Unary_Minus
0212 0049 | I | Store_Top Float,At_Offset_1
0213 00d8 | | Load_Top At_Offset_0
0214 c402 | | Store 0x2,0x2
0215 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0216 0000 0000 | | .XXX[0x2]
0218 3fa5 c990 |? | .DBL 0.04255342964372181
021a 294e 0a45 |)N E|
021c 3fa8 6049 |? `I| .DBL 0.04760962465862135
021e e9c4 6909 | i |
0220 3faa f284 |? | .DBL 0.05263152374603569
0222 e274 ab78 | t x|
0224 3fae 1e1e |? | .DBL 0.0588235292068496
0226 1c5b 812b | [ +|
0228 3fb1 1111 |? | .DBL 0.06666666666616515
022a 1110 83e7 | |
022c 3fb3 b13b |? ;| .DBL 0.0769230769230761
022e 13b1 3ad8 | : |
0230 3fb7 45d1 |? E | .DBL 0.0909090909090909
0232 745d 1745 |t] E|
0234 3fbc 71c7 |? q | .DBL 0.1111111111111111
0236 1c71 c71c | q |
0238 3fd5 5555 |? UU| .DBL 0.3333333333333333
023a 5555 5555 |UUUU|
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 0014 | | .DEBUG4 0x0004,0x0014,0x8f1b,0x0000,0x0001,0x0000
02a6 0000 0000 | | .BLANK 0000[0x6f]
0315 0020 | | .XXX[0x1]
0316 0000 0000 | | .BLANK 0000[0x5]
031b 0840 0000 | @ | .XXX[0x9e]
031d 0100 0000 | |
031f 0100 0100 | |
0321 0000 0000 | |
0323 0d00 0000 | |
0325 0600 0000 | |
0327 0400 0400 | |
0329 0000 0000 | |
032b 3800 0000 |8 |
032d 2000 0000 | |
032f 1000 1000 | |
0331 0000 0000 | |
0333 f000 0000 | |
0335 a000 0000 | |
0337 4000 4000 |@ @ |
0339 0000 0004 | |
033b 0000 0003 | |
033d 0000 0001 | |
033f 0001 0000 | |
0341 0000 0011 | |
0343 0000 000e | |
0345 0000 0004 | |
0347 0004 0000 | |
0349 0000 0048 | H|
034b 0000 0040 | @|
034d 0000 0010 | |
034f 0010 0000 | |
0351 0000 0130 | 0|
0353 0000 0120 | |
0355 0000 0040 | @|
0357 0040 0000 | @ |
0359 0000 0500 | |
035b 0000 0500 | |
035d 0000 0100 | |
035f 0100 0000 | |
0361 0000 1500 | |
0363 0000 1600 | |
0365 0000 0400 | |
0367 0400 0000 | |
0369 0000 5800 | X |
036b 0000 6000 | ` |
036d 0000 1000 | |
036f 1000 0000 | |
0371 0001 7000 | p |
0373 0001 a000 | |
0375 0000 4000 | @ |
0377 4000 0000 |@ |
0379 0006 0000 | |
037b 0007 0000 | |
037d 0001 0001 | |
037f 0000 0000 | |
0381 0019 0000 | |
0383 001e 0000 | |
0385 0004 0004 | |
0387 0000 0000 | |
0389 0068 0000 | h |
038b 0080 0000 | |
038d 0010 0010 | |
038f 0000 0000 | |
0391 01b0 0000 | |
0393 0220 0000 | |
0395 0040 0040 | @ @|
0397 0000 0000 | |
0399 0700 0000 | |
039b 0900 0000 | |
039d 0100 0100 | |
039f 0000 0000 | |
03a1 1d00 0000 | |
03a3 2600 0000 |& |
03a5 0400 0400 | |
03a7 0000 0000 | |
03a9 7800 0000 |x |
03ab a000 0000 | |
03ad 1000 1000 | |
03af 0000 0001 | |
03b1 f000 0002 | |
03b3 a000 0000 | |
03b5 4000 4000 |@ @ |
03b7 0000 0008 | |
03b9 0000 0000 | | .BLANK 0000[0x47]