|
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 0318 | | .CONST 0x0318 ; 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 00a3 | | Declare_Subprogram INIT_00a0,For_Call
0012 029f 010b | | Declare_Subprogram INIT_0108,For_Call
0014 029f 0153 | S| Declare_Subprogram INIT_0150,For_Call
0016 029f 01c3 | | Declare_Subprogram INIT_01c0,For_Call
0018 029f 023b | ;| Declare_Subprogram INIT_0238,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 0061 | a | .CONST 0x0061 ; Address of begin
0051 0004 | | .CONST 0x0004 ; Address of exception handler
0052 0005 | | .CONST 0x0005 ; 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 02bb | | Declare_Subprogram INIT_02b8,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 03d8 | | Declare_Variable Float,Duplicate
0061 BODY_0050:
0061 e402 | | Load 0x2,0x2
0062 e403 | | Load 0x2,0x3
0063 023d | = | Execute Float,Plus
0064 00d8 | | Load_Top At_Offset_0
0065 e602 | | Load 0x3,0x2
0066 0234 | 4 | Execute Float,In_Type
0067 7001 |p | Jump_Nonzero 0x69
0068 0801 | | Execute_Immediate Raise,0x1
0069 0043 | C | Store_Top_Uncheched Float,At_Offset_3
006a 00da | | Load_Top At_Offset_2
006b 00db | | Load_Top At_Offset_3
006c 023b | ; | Execute Float,Times
006d 004a | J | Store_Top Float,At_Offset_2
006e 00d9 | | Load_Top At_Offset_1
006f 5828 |X( | Indirect_Literal Float,0x98,0.16666662689999998
0070 00db | | Load_Top At_Offset_3
0071 5822 |X" | Indirect_Literal Float,0x94,0.008332937955
0072 e604 | | Load 0x3,0x4
0073 581c |X | Indirect_Literal Float,0x90,0.00019729494299999998
0074 e604 | | Load 0x3,0x4
0075 5816 |X | Indirect_Literal Float,0x8c,1.7898674839999998e-06
0076 023b | ; | Execute Float,Times
0077 023c | < | Execute Float,Minus
0078 023b | ; | Execute Float,Times
0079 023c | < | Execute Float,Minus
007a 023b | ; | Execute Float,Times
007b 023c | < | Execute Float,Minus
007c 023b | ; | Execute Float,Times
007d 0049 | I | Store_Top Float,At_Offset_1
007e e402 | | Load 0x2,0x2
007f e403 | | Load 0x2,0x3
0080 e402 | | Load 0x2,0x2
0081 e403 | | Load 0x2,0x3
0082 023d | = | Execute Float,Plus
0083 00db | | Load_Top At_Offset_3
0084 023b | ; | Execute Float,Times
0085 023c | < | Execute Float,Minus
0086 023d | = | Execute Float,Plus
0087 c404 | | Store 0x2,0x4
0088 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0089 0000 0000 | | .XXX[0x3]
008b 0000 | |
008c 3ebe 076c |> l| .DBL 1.7898674839999998e-06
008e 1c5f c26c | _ l|
0090 3f29 dc1e |?) | .DBL 0.00019729494299999998
0092 a7dc 1c43 | C|
0094 3f81 10db |? | .DBL 0.008332937955
0096 fff8 77bb | w |
0098 3fc5 5554 |? UT| .DBL 0.16666662689999998
009a ffef 608b | ` |
009c 0000 0000 | | .BLANK 0000[0x4]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00b1 | | .CONST 0x00b1 ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0005 | | .CONST 0x0005 ; Number of locals
00a3 INIT_00a0:
00a3 00e6 | | Load_Encached Float_Cache
00a4 0241 | A | Execute Float,First
00a5 00e6 | | Load_Encached Float_Cache
00a6 0240 | @ | Execute Float,Last
00a7 00e6 | | Load_Encached Float_Cache
00a8 03e3 | | Declare_Type Float,Constrained
00a9 029f 02cb | | Declare_Subprogram INIT_02c8,For_Call
00ab 00d9 | | Load_Top At_Offset_1
00ac 012a | * | Execute Any,Change_Utility
00ad 0007 | | Action Break_Optional
00ae 00d8 | | Load_Top At_Offset_0
00af 03d8 | | Declare_Variable Float,Duplicate
00b0 03d8 | | Declare_Variable Float,Duplicate
00b1 BODY_00a0:
00b1 e402 | | Load 0x2,0x2
00b2 e403 | | Load 0x2,0x3
00b3 023d | = | Execute Float,Plus
00b4 00d8 | | Load_Top At_Offset_0
00b5 e602 | | Load 0x3,0x2
00b6 0234 | 4 | Execute Float,In_Type
00b7 7001 |p | Jump_Nonzero 0xb9
00b8 0801 | | Execute_Immediate Raise,0x1
00b9 0043 | C | Store_Top_Uncheched Float,At_Offset_3
00ba 00da | | Load_Top At_Offset_2
00bb 00db | | Load_Top At_Offset_3
00bc 023b | ; | Execute Float,Times
00bd 004a | J | Store_Top Float,At_Offset_2
00be 00d9 | | Load_Top At_Offset_1
00bf 5840 |X@ | Indirect_Literal Float,0x100,0.1666666666666666
00c0 00db | | Load_Top At_Offset_3
00c1 583a |X: | Indirect_Literal Float,0xfc,0.008333333333332164
00c2 e604 | | Load 0x3,0x4
00c3 5834 |X4 | Indirect_Literal Float,0xf8,0.0001984126984004255
00c4 e604 | | Load 0x3,0x4
00c5 582e |X. | Indirect_Literal Float,0xf4,2.755731863010548e-06
00c6 e604 | | Load 0x3,0x4
00c7 5828 |X( | Indirect_Literal Float,0xf0,2.505196268354424e-08
00c8 e604 | | Load 0x3,0x4
00c9 5822 |X" | Indirect_Literal Float,0xec,1.604133183444283e-10
00ca e604 | | Load 0x3,0x4
00cb 581c |X | Indirect_Literal Float,0xe8,6.781012820360545e-13
00cc 023b | ; | Execute Float,Times
00cd 023c | < | Execute Float,Minus
00ce 023b | ; | Execute Float,Times
00cf 023c | < | Execute Float,Minus
00d0 023b | ; | Execute Float,Times
00d1 023c | < | Execute Float,Minus
00d2 023b | ; | Execute Float,Times
00d3 023c | < | Execute Float,Minus
00d4 023b | ; | Execute Float,Times
00d5 023c | < | Execute Float,Minus
00d6 023b | ; | Execute Float,Times
00d7 023c | < | Execute Float,Minus
00d8 023b | ; | Execute Float,Times
00d9 0049 | I | Store_Top Float,At_Offset_1
00da e402 | | Load 0x2,0x2
00db e403 | | Load 0x2,0x3
00dc e402 | | Load 0x2,0x2
00dd e403 | | Load 0x2,0x3
00de 023d | = | Execute Float,Plus
00df 00db | | Load_Top At_Offset_3
00e0 023b | ; | Execute Float,Times
00e1 023c | < | Execute Float,Minus
00e2 023d | = | Execute Float,Plus
00e3 c404 | | Store 0x2,0x4
00e4 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00e5 0000 0000 | | .XXX[0x3]
00e7 0000 | |
00e8 3d67 dbcb |=g | .DBL 6.781012820360545e-13
00ea 19c8 e560 | `|
00ec 3de6 0c0a |= | .DBL 1.604133183444283e-10
00ee b8b0 740d | t |
00f0 3e5a e63b |>Z ;| .DBL 2.505196268354424e-08
00f2 2739 dd9a |'9 |
00f4 3ec7 1de3 |> | .DBL 2.755731863010548e-06
00f6 9cfb 1934 | 4|
00f8 3f2a 01a0 |?* | .DBL 0.0001984126984004255
00fa 19fa b763 | c|
00fc 3f81 1111 |? | .DBL 0.008333333333332164
00fe 1111 0e6f | o|
0100 3fc5 5555 |? UU| .DBL 0.1666666666666666
0102 5555 5553 |UUUS|
0104 0000 0000 | | .BLANK 0000[0x4]
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 02db | | Declare_Subprogram INIT_02d8,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 e402 | | Load 0x2,0x2
011a e403 | | Load 0x2,0x3
011b 023d | = | Execute Float,Plus
011c 00d8 | | Load_Top At_Offset_0
011d e602 | | Load 0x3,0x2
011e 0234 | 4 | Execute Float,In_Type
011f 7001 |p | Jump_Nonzero 0x121
0120 0801 | | Execute_Immediate Raise,0x1
0121 0043 | C | Store_Top_Uncheched Float,At_Offset_3
0122 00da | | Load_Top At_Offset_2
0123 00db | | Load_Top At_Offset_3
0124 023b | ; | Execute Float,Times
0125 004a | J | Store_Top Float,At_Offset_2
0126 00d9 | | Load_Top At_Offset_1
0127 5fd8 |_ | Indirect_Literal Float,0x100,0.1666666666666666
0128 00db | | Load_Top At_Offset_3
0129 5fd2 |_ | Indirect_Literal Float,0xfc,0.008333333333332164
012a e604 | | Load 0x3,0x4
012b 5fcc |_ | Indirect_Literal Float,0xf8,0.0001984126984004255
012c e604 | | Load 0x3,0x4
012d 5fc6 |_ | Indirect_Literal Float,0xf4,2.755731863010548e-06
012e e604 | | Load 0x3,0x4
012f 5fc0 |_ | Indirect_Literal Float,0xf0,2.505196268354424e-08
0130 e604 | | Load 0x3,0x4
0131 5fba |_ | Indirect_Literal Float,0xec,1.604133183444283e-10
0132 e604 | | Load 0x3,0x4
0133 5fb4 |_ | Indirect_Literal Float,0xe8,6.781012820360545e-13
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 023c | < | Execute Float,Minus
013e 023b | ; | Execute Float,Times
013f 023c | < | Execute Float,Minus
0140 023b | ; | Execute Float,Times
0141 0049 | I | Store_Top Float,At_Offset_1
0142 e402 | | Load 0x2,0x2
0143 e403 | | Load 0x2,0x3
0144 e402 | | Load 0x2,0x2
0145 e403 | | Load 0x2,0x3
0146 023d | = | Execute Float,Plus
0147 00db | | Load_Top At_Offset_3
0148 023b | ; | Execute Float,Times
0149 023c | < | Execute Float,Minus
014a 023d | = | Execute Float,Plus
014b c404 | | Store 0x2,0x4
014c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
014d 0000 0000 | | .XXX[0x3]
014f 0000 | |
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0161 | a | .CONST 0x0161 ; Address of begin
0151 0004 | | .CONST 0x0004 ; Address of exception handler
0152 0005 | | .CONST 0x0005 ; Number of locals
0153 INIT_0150:
0153 00e6 | | Load_Encached Float_Cache
0154 0241 | A | Execute Float,First
0155 00e6 | | Load_Encached Float_Cache
0156 0240 | @ | Execute Float,Last
0157 00e6 | | Load_Encached Float_Cache
0158 03e3 | | Declare_Type Float,Constrained
0159 029f 02eb | | Declare_Subprogram INIT_02e8,For_Call
015b 00d9 | | Load_Top At_Offset_1
015c 012a | * | Execute Any,Change_Utility
015d 0007 | | Action Break_Optional
015e 00d8 | | Load_Top At_Offset_0
015f 03d8 | | Declare_Variable Float,Duplicate
0160 03d8 | | Declare_Variable Float,Duplicate
0161 BODY_0150:
0161 e402 | | Load 0x2,0x2
0162 e403 | | Load 0x2,0x3
0163 023d | = | Execute Float,Plus
0164 00d8 | | Load_Top At_Offset_0
0165 e602 | | Load 0x3,0x2
0166 0234 | 4 | Execute Float,In_Type
0167 7001 |p | Jump_Nonzero 0x169
0168 0801 | | Execute_Immediate Raise,0x1
0169 0043 | C | Store_Top_Uncheched Float,At_Offset_3
016a 00da | | Load_Top At_Offset_2
016b 00db | | Load_Top At_Offset_3
016c 023b | ; | Execute Float,Times
016d 004a | J | Store_Top Float,At_Offset_2
016e 00d9 | | Load_Top At_Offset_1
016f 5848 |XH | Indirect_Literal Float,0x1b8,0.16666666666666666
0170 00db | | Load_Top At_Offset_3
0171 5842 |XB | Indirect_Literal Float,0x1b4,0.008333333333333331
0172 e604 | | Load 0x3,0x4
0173 583c |X< | Indirect_Literal Float,0x1b0,0.0001984126984126774
0174 e604 | | Load 0x3,0x4
0175 5836 |X6 | Indirect_Literal Float,0x1ac,2.75573192225915e-06
0176 e604 | | Load 0x3,0x4
0177 5830 |X0 | Indirect_Literal Float,0x1a8,2.5052107889643872e-08
0178 e604 | | Load 0x3,0x4
0179 582a |X* | Indirect_Literal Float,0x1a4,1.6058946779624762e-10
017a e604 | | Load 0x3,0x4
017b 5824 |X$ | Indirect_Literal Float,0x1a0,7.637269506697078e-13
017c e604 | | Load 0x3,0x4
017d 581e |X | Indirect_Literal Float,0x19c,2.3950006743059353e-15
017e 023b | ; | Execute Float,Times
017f 023c | < | Execute Float,Minus
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 023b | ; | Execute Float,Times
018b 023c | < | Execute Float,Minus
018c 023b | ; | Execute Float,Times
018d 0049 | I | Store_Top Float,At_Offset_1
018e e402 | | Load 0x2,0x2
018f e403 | | Load 0x2,0x3
0190 e402 | | Load 0x2,0x2
0191 e403 | | Load 0x2,0x3
0192 023d | = | Execute Float,Plus
0193 00db | | Load_Top At_Offset_3
0194 023b | ; | Execute Float,Times
0195 023c | < | Execute Float,Minus
0196 023d | = | Execute Float,Plus
0197 c404 | | Store 0x2,0x4
0198 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0199 0000 0000 | | .XXX[0x3]
019b 0000 | |
019c 3ce5 927e |< ~| .DBL 2.3950006743059353e-15
019e dd25 366a | %6j|
01a0 3d6a df0a |=j | .DBL 7.637269506697078e-13
01a2 733d 050e |s= |
01a4 3de6 123d |= =| .DBL 1.6058946779624762e-10
01a6 55ab dbf8 |U |
01a8 3e5a e645 |>Z E| .DBL 2.5052107889643872e-08
01aa 5f06 ce1b |_ |
01ac 3ec7 1de3 |> | .DBL 2.75573192225915e-06
01ae a551 c11a | Q |
01b0 3f2a 01a0 |?* | .DBL 0.0001984126984126774
01b2 1a01 9d13 | |
01b4 3f81 1111 |? | .DBL 0.008333333333333331
01b6 1111 1110 | |
01b8 3fc5 5555 |? UU| .DBL 0.16666666666666666
01ba 5555 5555 |UUUU|
01bc 0000 0000 | | .BLANK 0000[0x4]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01d1 | | .CONST 0x01d1 ; Address of begin
01c1 0004 | | .CONST 0x0004 ; Address of exception handler
01c2 0005 | | .CONST 0x0005 ; Number of locals
01c3 INIT_01c0:
01c3 00e6 | | Load_Encached Float_Cache
01c4 0241 | A | Execute Float,First
01c5 00e6 | | Load_Encached Float_Cache
01c6 0240 | @ | Execute Float,Last
01c7 00e6 | | Load_Encached Float_Cache
01c8 03e3 | | Declare_Type Float,Constrained
01c9 029f 02fb | | Declare_Subprogram INIT_02f8,For_Call
01cb 00d9 | | Load_Top At_Offset_1
01cc 012a | * | Execute Any,Change_Utility
01cd 0007 | | Action Break_Optional
01ce 00d8 | | Load_Top At_Offset_0
01cf 03d8 | | Declare_Variable Float,Duplicate
01d0 03d8 | | Declare_Variable Float,Duplicate
01d1 BODY_01c0:
01d1 e402 | | Load 0x2,0x2
01d2 e403 | | Load 0x2,0x3
01d3 023d | = | Execute Float,Plus
01d4 00d8 | | Load_Top At_Offset_0
01d5 e602 | | Load 0x3,0x2
01d6 0234 | 4 | Execute Float,In_Type
01d7 7001 |p | Jump_Nonzero 0x1d9
01d8 0801 | | Execute_Immediate Raise,0x1
01d9 0043 | C | Store_Top_Uncheched Float,At_Offset_3
01da 00da | | Load_Top At_Offset_2
01db 00db | | Load_Top At_Offset_3
01dc 023b | ; | Execute Float,Times
01dd 004a | J | Store_Top Float,At_Offset_2
01de 00d9 | | Load_Top At_Offset_1
01df 5fd8 |_ | Indirect_Literal Float,0x1b8,0.16666666666666666
01e0 00db | | Load_Top At_Offset_3
01e1 5852 |XR | Indirect_Literal Float,0x234,0.008333333333333333
01e2 e604 | | Load 0x3,0x4
01e3 584c |XL | Indirect_Literal Float,0x230,0.0001984126984126984
01e4 e604 | | Load 0x3,0x4
01e5 5846 |XF | Indirect_Literal Float,0x22c,2.755731922398589e-06
01e6 e604 | | Load 0x3,0x4
01e7 5840 |X@ | Indirect_Literal Float,0x228,2.505210838544171e-08
01e8 e604 | | Load 0x3,0x4
01e9 583a |X: | Indirect_Literal Float,0x224,1.6059043836818545e-10
01ea e604 | | Load 0x3,0x4
01eb 5834 |X4 | Indirect_Literal Float,0x220,7.647163730910639e-13
01ec e604 | | Load 0x3,0x4
01ed 582e |X. | Indirect_Literal Float,0x21c,2.811457081793211e-15
01ee e604 | | Load 0x3,0x4
01ef 5828 |X( | Indirect_Literal Float,0x218,8.220432293080443e-18
01f0 e604 | | Load 0x3,0x4
01f1 5822 |X" | Indirect_Literal Float,0x214,1.9438178329937462e-20
01f2 023b | ; | Execute Float,Times
01f3 023c | < | Execute Float,Minus
01f4 023b | ; | Execute Float,Times
01f5 023c | < | Execute Float,Minus
01f6 023b | ; | Execute Float,Times
01f7 023c | < | Execute Float,Minus
01f8 023b | ; | Execute Float,Times
01f9 023c | < | Execute Float,Minus
01fa 023b | ; | Execute Float,Times
01fb 023c | < | Execute Float,Minus
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 0049 | I | Store_Top Float,At_Offset_1
0206 e402 | | Load 0x2,0x2
0207 e403 | | Load 0x2,0x3
0208 e402 | | Load 0x2,0x2
0209 e403 | | Load 0x2,0x3
020a 023d | = | Execute Float,Plus
020b 00db | | Load_Top At_Offset_3
020c 023b | ; | Execute Float,Times
020d 023c | < | Execute Float,Minus
020e 023d | = | Execute Float,Plus
020f c404 | | Store 0x2,0x4
0210 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0211 0000 0000 | | .XXX[0x3]
0213 0000 | |
0214 3bd6 f2d4 |; | .DBL 1.9438178329937462e-20
0216 33ed 2783 |3 ' |
0218 3c62 f47c |<b || .DBL 8.220432293080443e-18
021a 9b1e b5e3 | |
021c 3ce9 52c7 |< R | .DBL 2.811457081793211e-15
021e 561d 61fc |V a |
0220 3d6a e7f3 |=j | .DBL 7.647163730910639e-13
0222 e725 fae9 | % |
0224 3de6 1246 |= F| .DBL 1.6059043836818545e-10
0226 13a8 6866 | hf|
0228 3e5a e645 |>Z E| .DBL 2.505210838544171e-08
022a 67f5 44e1 |g D |
022c 3ec7 1de3 |> | .DBL 2.755731922398589e-06
022e a556 c733 | V 3|
0230 3f2a 01a0 |?* | .DBL 0.0001984126984126984
0232 1a01 a01a | |
0234 3f81 1111 |? | .DBL 0.008333333333333333
0236 1111 1111 | |
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 030b | | Declare_Subprogram INIT_0308,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 e402 | | Load 0x2,0x2
024a e403 | | Load 0x2,0x3
024b 023d | = | Execute Float,Plus
024c 00d8 | | Load_Top At_Offset_0
024d e602 | | Load 0x3,0x2
024e 0234 | 4 | Execute Float,In_Type
024f 7001 |p | Jump_Nonzero 0x251
0250 0801 | | Execute_Immediate Raise,0x1
0251 0043 | C | Store_Top_Uncheched Float,At_Offset_3
0252 00da | | Load_Top At_Offset_2
0253 00db | | Load_Top At_Offset_3
0254 023b | ; | Execute Float,Times
0255 004a | J | Store_Top Float,At_Offset_2
0256 00d9 | | Load_Top At_Offset_1
0257 585c |X\ | Indirect_Literal Float,0x2b4,0.16666666666666666
0258 00db | | Load_Top At_Offset_3
0259 5fda |_ | Indirect_Literal Float,0x234,0.008333333333333333
025a e604 | | Load 0x3,0x4
025b 5fd4 |_ | Indirect_Literal Float,0x230,0.0001984126984126984
025c e604 | | Load 0x3,0x4
025d 5fce |_ | Indirect_Literal Float,0x22c,2.755731922398589e-06
025e e604 | | Load 0x3,0x4
025f 5850 |XP | Indirect_Literal Float,0x2b0,2.5052108385441717e-08
0260 e604 | | Load 0x3,0x4
0261 584a |XJ | Indirect_Literal Float,0x2ac,1.6059043836821613e-10
0262 e604 | | Load 0x3,0x4
0263 5844 |XD | Indirect_Literal Float,0x2a8,7.647163731819812e-13
0264 e604 | | Load 0x3,0x4
0265 583e |X> | Indirect_Literal Float,0x2a4,2.8114572543444505e-15
0266 e604 | | Load 0x3,0x4
0267 5838 |X8 | Indirect_Literal Float,0x2a0,8.220635244690722e-18
0268 e604 | | Load 0x3,0x4
0269 5832 |X2 | Indirect_Literal Float,0x29c,1.957293878249404e-20
026a e604 | | Load 0x3,0x4
026b 582c |X, | Indirect_Literal Float,0x298,3.8680051543755155e-23
026c e604 | | Load 0x3,0x4
026d 5826 |X& | Indirect_Literal Float,0x294,6.383099586870782e-26
026e 023b | ; | Execute Float,Times
026f 023c | < | Execute Float,Minus
0270 023b | ; | Execute Float,Times
0271 023c | < | Execute Float,Minus
0272 023b | ; | Execute Float,Times
0273 023c | < | Execute Float,Minus
0274 023b | ; | Execute Float,Times
0275 023c | < | Execute Float,Minus
0276 023b | ; | Execute Float,Times
0277 023c | < | Execute Float,Minus
0278 023b | ; | Execute Float,Times
0279 023c | < | Execute Float,Minus
027a 023b | ; | Execute Float,Times
027b 023c | < | Execute Float,Minus
027c 023b | ; | Execute Float,Times
027d 023c | < | Execute Float,Minus
027e 023b | ; | Execute Float,Times
027f 023c | < | Execute Float,Minus
0280 023b | ; | Execute Float,Times
0281 023c | < | Execute Float,Minus
0282 023b | ; | Execute Float,Times
0283 023c | < | Execute Float,Minus
0284 023b | ; | Execute Float,Times
0285 0049 | I | Store_Top Float,At_Offset_1
0286 e402 | | Load 0x2,0x2
0287 e403 | | Load 0x2,0x3
0288 e402 | | Load 0x2,0x2
0289 e403 | | Load 0x2,0x3
028a 023d | = | Execute Float,Plus
028b 00db | | Load_Top At_Offset_3
028c 023b | ; | Execute Float,Times
028d 023c | < | Execute Float,Minus
028e 023d | = | Execute Float,Plus
028f c404 | | Store 0x2,0x4
0290 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0291 0000 0000 | | .XXX[0x3]
0293 0000 | |
0294 3ab3 c136 |: 6| .DBL 6.383099586870782e-26
0296 6753 848b |gS |
0298 3b47 6172 |;Gar| .DBL 3.8680051543755155e-23
029a b473 4d74 | sMt|
029c 3bd7 1b8e |; | .DBL 1.957293878249404e-20
029e c9af 6f93 | o |
02a0 3c62 f49b |<b | .DBL 8.220635244690722e-18
02a2 466e 1b10 |Fn |
02a4 3ce9 52c7 |< R | .DBL 2.8114572543444505e-15
02a6 7030 a2b1 |p0 |
02a8 3d6a e7f3 |=j | .DBL 7.647163731819812e-13
02aa e733 b81b | 3 |
02ac 3de6 1246 |= F| .DBL 1.6059043836821613e-10
02ae 13a8 6d09 | m |
02b0 3e5a e645 |>Z E| .DBL 2.5052108385441717e-08
02b2 67f5 44e3 |g D |
02b4 3fc5 5555 |? UU| .DBL 0.16666666666666666
02b6 5555 5555 |UUUU|
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bb | | .CONST 0x02bb ; Address of begin
02b9 0004 | | .CONST 0x0004 ; Address of exception handler
02ba 0001 | | .CONST 0x0001 ; Number of locals
02bb BODY_02b8:
02bb INIT_02b8:
02bb 4601 |F | Jump_Case 0x2
02bc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
02bd 7801 |x | Jump 0x2bf ; case 0x1
02be 4302 |C | .XXX[0x1]
02bf 4806 |H | Short_Literal 0x6
02c0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
02c1 0000 0000 | | .BLANK 0000[0x7]
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02cb | | .CONST 0x02cb ; Address of begin
02c9 0004 | | .CONST 0x0004 ; Address of exception handler
02ca 0001 | | .CONST 0x0001 ; Number of locals
02cb BODY_02c8:
02cb INIT_02c8:
02cb 4601 |F | Jump_Case 0x2
02cc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
02cd 7801 |x | Jump 0x2cf ; case 0x1
02ce 4302 |C | .XXX[0x1]
02cf 480f |H | Short_Literal 0xf
02d0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
02d1 0000 0000 | | .BLANK 0000[0x7]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02db | | .CONST 0x02db ; Address of begin
02d9 0004 | | .CONST 0x0004 ; Address of exception handler
02da 0001 | | .CONST 0x0001 ; Number of locals
02db BODY_02d8:
02db INIT_02d8:
02db 4601 |F | Jump_Case 0x2
02dc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
02dd 7801 |x | Jump 0x2df ; case 0x1
02de 4302 |C | .XXX[0x1]
02df 480f |H | Short_Literal 0xf
02e0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
02e1 0000 0000 | | .BLANK 0000[0x7]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02eb | | .CONST 0x02eb ; Address of begin
02e9 0004 | | .CONST 0x0004 ; Address of exception handler
02ea 0001 | | .CONST 0x0001 ; Number of locals
02eb BODY_02e8:
02eb INIT_02e8:
02eb 4601 |F | Jump_Case 0x2
02ec 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
02ed 7801 |x | Jump 0x2ef ; case 0x1
02ee 4302 |C | .XXX[0x1]
02ef 480f |H | Short_Literal 0xf
02f0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
02f1 0000 0000 | | .BLANK 0000[0x7]
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 02fb | | .CONST 0x02fb ; Address of begin
02f9 0004 | | .CONST 0x0004 ; Address of exception handler
02fa 0001 | | .CONST 0x0001 ; Number of locals
02fb BODY_02f8:
02fb INIT_02f8:
02fb 4601 |F | Jump_Case 0x2
02fc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
02fd 7801 |x | Jump 0x2ff ; case 0x1
02fe 4302 |C | .XXX[0x1]
02ff 480f |H | Short_Literal 0xf
0300 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0301 0000 0000 | | .BLANK 0000[0x7]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 030b | | .CONST 0x030b ; Address of begin
0309 0004 | | .CONST 0x0004 ; Address of exception handler
030a 0001 | | .CONST 0x0001 ; Number of locals
030b BODY_0308:
030b INIT_0308:
030b 4601 |F | Jump_Case 0x2
030c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
030d 7801 |x | Jump 0x30f ; case 0x1
030e 4302 |C | .XXX[0x1]
030f 480f |H | Short_Literal 0xf
0310 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0311 0000 0000 | | .BLANK 0000[0x7]
0318 ; --------------------------------------------------------------------------------------
0318 ; Debug Table
0318 ; --------------------------------------------------------------------------------------
0318 0004 0001 | | .DEBUG4 0x0004,0x0001,0xf285,0x0000,0x0001,0x000d
031e 000b 0352 | R| .DBG4T 0x000b,0x0352,0x1002,0x4000
0322 0053 036b | S k| .DBG4T 0x0053,0x036b,0x1004,0x0000
0326 00a3 0373 | s| .DBG4T 0x00a3,0x0373,0x1004,0x0000
032a 010b 037b | {| .DBG4T 0x010b,0x037b,0x1004,0x0000
032e 0153 0383 | S | .DBG4T 0x0153,0x0383,0x1004,0x0000
0332 01c3 038b | | .DBG4T 0x01c3,0x038b,0x1004,0x0000
0336 023b 0393 | ; | .DBG4T 0x023b,0x0393,0x1004,0x0000
033a 02bb 0000 | | .DBG4T 0x02bb,0x0000,0x1005,0x0000
033e 02cb 0000 | | .DBG4T 0x02cb,0x0000,0x1005,0x0000
0342 02db 0000 | | .DBG4T 0x02db,0x0000,0x1005,0x0000
0346 02eb 0000 | | .DBG4T 0x02eb,0x0000,0x1005,0x0000
034a 02fb 0000 | | .DBG4T 0x02fb,0x0000,0x1005,0x0000
034e 030b 0000 | | .DBG4T 0x030b,0x0000,0x1005,0x0000
0352 ; --------------------------------------------------------------------------------------
0352 ; Debug chain
0352 ; --------------------------------------------------------------------------------------
0352 0001 000b | | .DBGLEN 0x0001,0x000b
0354 000b 001a | | .DBGLNO 0x000b,0x001a,0x001c,0x001e,0x002f,0x0036,0x003a,0x003d,0x003f,0x0042,0x0044,0x0045
0360 0001 0002 | | .XXX[0xb]
0362 0003 0007 | |
0364 000a 0004 | |
0366 0005 0006 | |
0368 0008 0009 | |
036a 000b | |
036b ; --------------------------------------------------------------------------------------
036b ; Debug chain
036b ; --------------------------------------------------------------------------------------
036b 0002 0004 | | .DBGLEN 0x0002,0x0004
036d 0053 005e | S ^| .DBGLNO 0x0053,0x005e,0x0061,0x006a,0x006e,0x007e
0373 ; --------------------------------------------------------------------------------------
0373 ; Debug chain
0373 ; --------------------------------------------------------------------------------------
0373 0002 0004 | | .DBGLEN 0x0002,0x0004
0375 00a3 00ae | | .DBGLNO 0x00a3,0x00ae,0x00b1,0x00ba,0x00be,0x00da
037b ; --------------------------------------------------------------------------------------
037b ; Debug chain
037b ; --------------------------------------------------------------------------------------
037b 0002 0004 | | .DBGLEN 0x0002,0x0004
037d 010b 0116 | | .DBGLNO 0x010b,0x0116,0x0119,0x0122,0x0126,0x0142
0383 ; --------------------------------------------------------------------------------------
0383 ; Debug chain
0383 ; --------------------------------------------------------------------------------------
0383 0002 0004 | | .DBGLEN 0x0002,0x0004
0385 0153 015e | S ^| .DBGLNO 0x0153,0x015e,0x0161,0x016a,0x016e,0x018e
038b ; --------------------------------------------------------------------------------------
038b ; Debug chain
038b ; --------------------------------------------------------------------------------------
038b 0002 0004 | | .DBGLEN 0x0002,0x0004
038d 01c3 01ce | | .DBGLNO 0x01c3,0x01ce,0x01d1,0x01da,0x01de,0x0206
0393 ; --------------------------------------------------------------------------------------
0393 ; Debug chain
0393 ; --------------------------------------------------------------------------------------
0393 0002 0004 | | .DBGLEN 0x0002,0x0004
0395 023b 0246 | ; F| .DBGLNO 0x023b,0x0246,0x0249,0x0252,0x0256,0x0286
039b 0000 0000 | | .BLANK 0000[0x65]