|
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: 8192 (0x2000) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03b8fe
└─⟦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 0f08 | | .CONST 0x0f08 ; 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 8009 | | .CONST 0x8009 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0094 | | .CONST 0x0094 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0030 | 0 | .CONST 0x0030 ; Number of locals 000b INIT_0008: 000b 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated 000d 029a 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call,Visible,Unelaborated 000f 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated 0011 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated 0013 029a 02c3 | | Declare_Subprogram INIT_02c0,For_Outer_Call,Visible,Unelaborated 0015 029a 043b | ;| Declare_Subprogram INIT_0438,For_Outer_Call,Visible,Unelaborated 0017 029a 04fb | | Declare_Subprogram INIT_04f8,For_Outer_Call,Visible,Unelaborated 0019 029a 0513 | | Declare_Subprogram INIT_0510,For_Outer_Call,Visible,Unelaborated 001b 029a 05db | | Declare_Subprogram INIT_05d8,For_Outer_Call,Visible,Unelaborated 001d 029a 05f3 | | Declare_Subprogram INIT_05f0,For_Outer_Call,Visible,Unelaborated 001f 029a 06ab | | Declare_Subprogram INIT_06a8,For_Outer_Call,Visible,Unelaborated 0021 029a 06c3 | | Declare_Subprogram INIT_06c0,For_Outer_Call,Visible,Unelaborated 0023 029a 07a3 | | Declare_Subprogram INIT_07a0,For_Outer_Call,Visible,Unelaborated 0025 029a 07bb | | Declare_Subprogram INIT_07b8,For_Outer_Call,Visible,Unelaborated 0027 029a 087b | {| Declare_Subprogram INIT_0878,For_Outer_Call,Visible,Unelaborated 0029 029a 0893 | | Declare_Subprogram INIT_0890,For_Outer_Call,Visible,Unelaborated 002b 029a 096b | k| Declare_Subprogram INIT_0968,For_Outer_Call,Visible,Unelaborated 002d 029a 098b | | Declare_Subprogram INIT_0988,For_Outer_Call,Visible,Unelaborated 002f 029a 0a8b | | Declare_Subprogram INIT_0a88,For_Outer_Call,Visible,Unelaborated 0031 029a 0aab | | Declare_Subprogram INIT_0aa8,For_Outer_Call,Visible,Unelaborated 0033 029a 0abb | | Declare_Subprogram INIT_0ab8,For_Outer_Call,Visible,Unelaborated 0035 029a 0adb | | Declare_Subprogram INIT_0ad8,For_Outer_Call,Visible,Unelaborated 0037 029a 0ba3 | | Declare_Subprogram INIT_0ba0,For_Outer_Call,Visible,Unelaborated 0039 029a 0beb | | Declare_Subprogram INIT_0be8,For_Outer_Call,Visible,Unelaborated 003b 029a 0c7b | {| Declare_Subprogram INIT_0c78,For_Outer_Call,Visible,Unelaborated 003d 029a 0c8b | | Declare_Subprogram INIT_0c88,For_Outer_Call,Visible,Unelaborated 003f 029a 0ca3 | | Declare_Subprogram INIT_0ca0,For_Outer_Call,Visible,Unelaborated 0041 029a 0cbb | | Declare_Subprogram INIT_0cb8,For_Outer_Call,Visible,Unelaborated 0043 029a 0cdb | | Declare_Subprogram INIT_0cd8,For_Outer_Call,Visible,Unelaborated 0045 00bf | | Action Accept_Activation 0046 00e3 | | Load_Encached Natural_Cache 0047 0266 | f | Execute Discrete,Bounds 0048 00e6 | | Load_Encached Float_Cache 0049 02a0 | | Declare_Subprogram Null_Subprogram 004a 4801 |H | Short_Literal 0x1 004b 0350 | P | Declare_Type Array,Defined,Bounds_With_Object 004c 4801 |H | Short_Literal 0x1 004d 4811 |H | Short_Literal 0x11 004e 00da | | Load_Top At_Offset_2 004f 035b | [ | Declare_Type Array,Constrained 0050 0337 | 7 | Declare_Variable Array 0051 4801 |H | Short_Literal 0x1 0052 4808 |H | Short_Literal 0x8 0053 00db | | Load_Top At_Offset_3 0054 035b | [ | Declare_Type Array,Constrained 0055 0337 | 7 | Declare_Variable Array 0056 029d 0ceb | | Declare_Subprogram INIT_0ce8,For_Outer_Call 0058 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0059 00c7 | | Action Elaborate_Subprogram 005a 1d10 | | Execute_Immediate Reference_Lex_1,0x10 005b 00c7 | | Action Elaborate_Subprogram 005c 1d11 | | Execute_Immediate Reference_Lex_1,0x11 005d 00c7 | | Action Elaborate_Subprogram 005e 1d12 | | Execute_Immediate Reference_Lex_1,0x12 005f 00c7 | | Action Elaborate_Subprogram 0060 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0061 00c7 | | Action Elaborate_Subprogram 0062 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0063 00c7 | | Action Elaborate_Subprogram 0064 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0065 00c7 | | Action Elaborate_Subprogram 0066 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0067 00c7 | | Action Elaborate_Subprogram 0068 1d17 | | Execute_Immediate Reference_Lex_1,0x17 0069 00c7 | | Action Elaborate_Subprogram 006a 1d18 | | Execute_Immediate Reference_Lex_1,0x18 006b 00c7 | | Action Elaborate_Subprogram 006c 1d19 | | Execute_Immediate Reference_Lex_1,0x19 006d 00c7 | | Action Elaborate_Subprogram 006e 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 006f 00c7 | | Action Elaborate_Subprogram 0070 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 0071 00c7 | | Action Elaborate_Subprogram 0072 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0073 00c7 | | Action Elaborate_Subprogram 0074 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 0075 00c7 | | Action Elaborate_Subprogram 0076 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 0077 00c7 | | Action Elaborate_Subprogram 0078 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 0079 00c7 | | Action Elaborate_Subprogram 007a 1d20 | | Execute_Immediate Reference_Lex_1,0x20 007b 00c7 | | Action Elaborate_Subprogram 007c 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 007d 00c7 | | Action Elaborate_Subprogram 007e 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 007f 00c7 | | Action Elaborate_Subprogram 0080 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 0081 00c7 | | Action Elaborate_Subprogram 0082 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 0083 00c7 | | Action Elaborate_Subprogram 0084 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 0085 00c7 | | Action Elaborate_Subprogram 0086 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 0087 00c7 | | Action Elaborate_Subprogram 0088 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 0089 00c7 | | Action Elaborate_Subprogram 008a 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 008b 00c7 | | Action Elaborate_Subprogram 008c 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 008d 00c7 | | Action Elaborate_Subprogram 008e 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a 008f 00c7 | | Action Elaborate_Subprogram 0090 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b 0091 00c7 | | Action Elaborate_Subprogram 0092 029f 0d03 | | Declare_Subprogram INIT_0d00,For_Call 0094 BODY_0008: 0094 8230 | 0 | Call 0x1,0x30 0095 00bc | | Action Signal_Activated 0096 00bb | | Action Signal_Completion 0097 0000 | | .XXX[0x1] 0098 ; -------------------------------------------------------------------------------------- 0098 ; SUBPROGRAM 0098 ; -------------------------------------------------------------------------------------- 0098 00a5 | | .CONST 0x00a5 ; Address of begin 0099 0004 | | .CONST 0x0004 ; Address of exception handler 009a 0008 | | .CONST 0x0008 ; Number of locals 009b INIT_0098: 009b 00da | | Load_Top At_Offset_2 009c 00e6 | | Load_Encached Float_Cache 009d 03df | | Declare_Variable Float,With_Value 009e 00e6 | | Load_Encached Float_Cache 009f 00e6 | | Load_Encached Float_Cache 00a0 00e2 | | Load_Encached Integer_Cache 00a1 00e6 | | Load_Encached Float_Cache 00a2 00e3 | | Load_Encached Natural_Cache 00a3 029f 0ea3 | | Declare_Subprogram INIT_0ea0,For_Call 00a5 BODY_0098: 00a5 e5ff | | Load 0x2,-0x1 00a6 014b | K | Execute Float,Less_Zero 00a7 6802 |h | Jump_Zero 0xaa 00a8 e002 | | Load 0x0,0x2 00a9 0257 | W | Execute Discrete,Raise 00aa e5ff | | Load 0x2,-0x1 00ab 7004 |p | Jump_Nonzero 0xb0 00ac 5873 |Xs | Indirect_Literal Float,0x120,0.0 00ad e20e | | Load 0x1,0xe 00ae 0232 | 2 | Execute Float,Check_In_Type 00af 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00b0 e003 | | Load 0x0,0x3 00b1 e004 | | Load 0x0,0x4 00b2 e402 | | Load 0x2,0x2 00b3 8005 | | Call 0x0,0x5 00b4 c404 | | Store 0x2,0x4 00b5 c405 | | Store 0x2,0x5 00b6 5865 |Xe | Indirect_Literal Float,0x11c,0.41730999999999996 00b7 5860 |X` | Indirect_Literal Float,0x118,0.5901599999999999 00b8 e404 | | Load 0x2,0x4 00b9 023b | ; | Execute Float,Times 00ba 023d | = | Execute Float,Plus 00bb 0043 | C | Store_Top_Uncheched Float,At_Offset_3 00bc 00db | | Load_Top At_Offset_3 00bd 4802 |H | Short_Literal 0x2 00be 026f | o | Execute Discrete,Remainder 00bf 6807 |h | Jump_Zero 0xc7 00c0 00da | | Load_Top At_Offset_2 00c1 5852 |XR | Indirect_Literal Float,0x114,0.7071067811865475 00c2 023b | ; | Execute Float,Times 00c3 0043 | C | Store_Top_Uncheched Float,At_Offset_3 00c4 00db | | Load_Top At_Offset_3 00c5 0a01 | | Execute_Immediate Plus,0x1 00c6 c405 | | Store 0x2,0x5 00c7 00db | | Load_Top At_Offset_3 00c8 09ff | | Execute_Immediate Binary_Scale,-0x1 00c9 a405 | | Store_Unchecked 0x2,0x5 00ca 00da | | Load_Top At_Offset_2 00cb 5844 |XD | Indirect_Literal Float,0x110,2.0 00cc e405 | | Load 0x2,0x5 00cd 0239 | 9 | Execute Float,Exponentiate 00ce 023b | ; | Execute Float,Times 00cf 0043 | C | Store_Top_Uncheched Float,At_Offset_3 00d0 4808 |H | Short_Literal 0x8 00d1 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 00d2 00cf | | Action Mark_Auxiliary 00d3 780d |x | Jump 0xe1 00d4 5837 |X7 | Indirect_Literal Float,0x10c,0.5 00d5 e406 | | Load 0x2,0x6 00d6 e402 | | Load 0x2,0x2 00d7 e406 | | Load 0x2,0x6 00d8 023a | : | Execute Float,Divide 00d9 023d | = | Execute Float,Plus 00da 023b | ; | Execute Float,Times 00db a406 | | Store_Unchecked 0x2,0x6 00dc 00da | | Load_Top At_Offset_2 00dd 00db | | Load_Top At_Offset_3 00de 0273 | s | Execute Discrete,Plus 00df 005b | [ | Store_Top Discrete,At_Offset_3 00e0 00c9 | | Action Pop_Auxiliary_Loop 00e1 00da | | Load_Top At_Offset_2 00e2 00e6 | | Load_Encached Float_Cache 00e3 012c | , | Execute Any,Size 00e4 027c | | | Execute Discrete,Less 00e5 77ee |w | Jump_Nonzero 0xd4 00e6 00ce | | Action Pop_Auxiliary 00e7 00da | | Load_Top At_Offset_2 00e8 00db | | Load_Top At_Offset_3 00e9 023b | ; | Execute Float,Times 00ea a404 | | Store_Unchecked 0x2,0x4 00eb e404 | | Load 0x2,0x4 00ec e402 | | Load 0x2,0x2 00ed 0246 | F | Execute Float,Not_Equal 00ee 6816 |h | Jump_Zero 0x105 00ef 5820 |X | Indirect_Literal Float,0x110,2.0 00f0 e405 | | Load 0x2,0x5 00f1 0acb | | Execute_Immediate Plus,-0x35 00f2 0239 | 9 | Execute Float,Exponentiate 00f3 a403 | | Store_Unchecked 0x2,0x3 00f4 8408 | | Call 0x2,0x8 00f5 00cf | | Action Mark_Auxiliary 00f6 7809 |x | Jump 0x100 00f7 00db | | Load_Top At_Offset_3 00f8 e403 | | Load 0x2,0x3 00f9 023c | < | Execute Float,Minus 00fa a406 | | Store_Unchecked 0x2,0x6 00fb 00db | | Load_Top At_Offset_3 00fc e406 | | Load 0x2,0x6 00fd 023b | ; | Execute Float,Times 00fe a404 | | Store_Unchecked 0x2,0x4 00ff 00c9 | | Action Pop_Auxiliary_Loop 0100 e404 | | Load 0x2,0x4 0101 e402 | | Load 0x2,0x2 0102 0245 | E | Execute Float,Greater 0103 77f3 |w | Jump_Nonzero 0xf7 0104 00ce | | Action Pop_Auxiliary 0105 00da | | Load_Top At_Offset_2 0106 00d8 | | Load_Top At_Offset_0 0107 e20e | | Load 0x1,0xe 0108 0234 | 4 | Execute Float,In_Type 0109 7001 |p | Jump_Nonzero 0x10b 010a 0801 | | Execute_Immediate Raise,0x1 010b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 010c 3fe0 0000 |? | .DBL 0.5 010e 0000 0000 | | 0110 4000 0000 |@ | .DBL 2.0 0112 0000 0000 | | 0114 3fe6 a09e |? | .DBL 0.7071067811865475 0116 667f 3bcc |f ; | 0118 3fe2 e297 |? | .DBL 0.5901599999999999 011a 396d 0917 |9m | 011c 3fda b535 |? 5| .DBL 0.41730999999999996 011e 0092 ccf6 | | 0120 0000 0000 | | .DBL 0.0 0122 0000 0000 | | 0124 0000 0000 | | .BLANK 0000[0x4] 0128 ; -------------------------------------------------------------------------------------- 0128 ; SUBPROGRAM 0128 ; -------------------------------------------------------------------------------------- 0128 0132 | 2 | .CONST 0x0132 ; Address of begin 0129 0004 | | .CONST 0x0004 ; Address of exception handler 012a 0006 | | .CONST 0x0006 ; Number of locals 012b INIT_0128: 012b 00da | | Load_Top At_Offset_2 012c 00e6 | | Load_Encached Float_Cache 012d 03df | | Declare_Variable Float,With_Value 012e 00e6 | | Load_Encached Float_Cache 012f 00e2 | | Load_Encached Integer_Cache 0130 00e6 | | Load_Encached Float_Cache 0131 00e6 | | Load_Encached Float_Cache 0132 BODY_0128: 0132 e5ff | | Load 0x2,-0x1 0133 014b | K | Execute Float,Less_Zero 0134 6802 |h | Jump_Zero 0x137 0135 e002 | | Load 0x0,0x2 0136 0257 | W | Execute Discrete,Raise 0137 e5ff | | Load 0x2,-0x1 0138 7001 |p | Jump_Nonzero 0x13a 0139 08e0 | | Execute_Immediate Raise,0xe0 013a e003 | | Load 0x0,0x3 013b e004 | | Load 0x0,0x4 013c e402 | | Load 0x2,0x2 013d 8005 | | Call 0x0,0x5 013e c403 | | Store 0x2,0x3 013f 005b | [ | Store_Top Discrete,At_Offset_3 0140 00db | | Load_Top At_Offset_3 0141 5fd2 |_ | Indirect_Literal Float,0x114,0.7071067811865475 0142 0245 | E | Execute Float,Greater 0143 680d |h | Jump_Zero 0x151 0144 00db | | Load_Top At_Offset_3 0145 5fc6 |_ | Indirect_Literal Float,0x10c,0.5 0146 023c | < | Execute Float,Minus 0147 5fc4 |_ | Indirect_Literal Float,0x10c,0.5 0148 023c | < | Execute Float,Minus 0149 0042 | B | Store_Top_Unchecked Float,At_Offset_2 014a 00db | | Load_Top At_Offset_3 014b 5fc0 |_ | Indirect_Literal Float,0x10c,0.5 014c 023b | ; | Execute Float,Times 014d 5fbe |_ | Indirect_Literal Float,0x10c,0.5 014e 023d | = | Execute Float,Plus 014f 0041 | A | Store_Top_Unchecked Float,At_Offset_1 0150 780d |x | Jump 0x15e 0151 00da | | Load_Top At_Offset_2 0152 0aff | | Execute_Immediate Plus,-0x1 0153 005b | [ | Store_Top Discrete,At_Offset_3 0154 00db | | Load_Top At_Offset_3 0155 5fb6 |_ | Indirect_Literal Float,0x10c,0.5 0156 023c | < | Execute Float,Minus 0157 0042 | B | Store_Top_Unchecked Float,At_Offset_2 0158 00d9 | | Load_Top At_Offset_1 0159 5fb2 |_ | Indirect_Literal Float,0x10c,0.5 015a 023b | ; | Execute Float,Times 015b 5fb0 |_ | Indirect_Literal Float,0x10c,0.5 015c 023d | = | Execute Float,Plus 015d 0041 | A | Store_Top_Unchecked Float,At_Offset_1 015e 00d9 | | Load_Top At_Offset_1 015f 00d9 | | Load_Top At_Offset_1 0160 023a | : | Execute Float,Divide 0161 0042 | B | Store_Top_Unchecked Float,At_Offset_2 0162 00d9 | | Load_Top At_Offset_1 0163 00da | | Load_Top At_Offset_2 0164 023b | ; | Execute Float,Times 0165 a403 | | Store_Unchecked 0x2,0x3 0166 5851 |XQ | Indirect_Literal Float,0x1b8,0.7895611288749125 0167 e403 | | Load 0x2,0x3 0168 023b | ; | Execute Float,Times 0169 023f | ? | Execute Float,Unary_Minus 016a 5849 |XI | Indirect_Literal Float,0x1b4,16.383943563021532 016b 023d | = | Execute Float,Plus 016c e403 | | Load 0x2,0x3 016d 023b | ; | Execute Float,Times 016e 5841 |XA | Indirect_Literal Float,0x1b0,64.12494342374558 016f 023c | < | Execute Float,Minus 0170 e403 | | Load 0x2,0x3 0171 583a |X: | Indirect_Literal Float,0x1ac,35.66797773903464 0172 023c | < | Execute Float,Minus 0173 e403 | | Load 0x2,0x3 0174 023b | ; | Execute Float,Times 0175 5832 |X2 | Indirect_Literal Float,0x1a8,312.0322209192453 0176 023d | = | Execute Float,Plus 0177 e403 | | Load 0x2,0x3 0178 023b | ; | Execute Float,Times 0179 582a |X* | Indirect_Literal Float,0x1a4,769.4993210849487 017a 023c | < | Execute Float,Minus 017b 023a | : | Execute Float,Divide 017c 0041 | A | Store_Top_Unchecked Float,At_Offset_1 017d 00d9 | | Load_Top At_Offset_1 017e 00da | | Load_Top At_Offset_2 017f e403 | | Load 0x2,0x3 0180 00db | | Load_Top At_Offset_3 0181 023b | ; | Execute Float,Times 0182 023b | ; | Execute Float,Times 0183 023d | = | Execute Float,Plus 0184 a403 | | Store_Unchecked 0x2,0x3 0185 00da | | Load_Top At_Offset_2 0186 0237 | 7 | Execute Float,Convert_From_Discrete 0187 0042 | B | Store_Top_Unchecked Float,At_Offset_2 0188 5817 |X | Indirect_Literal Float,0x1a0,0.00021219444005469057 0189 00da | | Load_Top At_Offset_2 018a 023b | ; | Execute Float,Times 018b 023f | ? | Execute Float,Unary_Minus 018c e403 | | Load 0x2,0x3 018d 023d | = | Execute Float,Plus 018e a403 | | Store_Unchecked 0x2,0x3 018f 00db | | Load_Top At_Offset_3 0190 00da | | Load_Top At_Offset_2 0191 580a |X | Indirect_Literal Float,0x19c,0.693359375 0192 023b | ; | Execute Float,Times 0193 023d | = | Execute Float,Plus 0194 a403 | | Store_Unchecked 0x2,0x3 0195 00db | | Load_Top At_Offset_3 0196 00d8 | | Load_Top At_Offset_0 0197 e20e | | Load 0x1,0xe 0198 0234 | 4 | Execute Float,In_Type 0199 7001 |p | Jump_Nonzero 0x19b 019a 0801 | | Execute_Immediate Raise,0x1 019b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 019c 3fe6 3000 |? 0 | .DBL 0.693359375 019e 0000 0000 | | 01a0 3f2b d010 |?+ | .DBL 0.00021219444005469057 01a2 5c61 0ca8 |\a | 01a4 4088 0bfe |@ | .DBL 769.4993210849487 01a6 9c0d 9077 | w| 01a8 4073 8083 |@s | .DBL 312.0322209192453 01aa fa15 267d | &}| 01ac 4041 d580 |@A | .DBL 35.66797773903464 01ae 4b67 ce0e |Kg | 01b0 4050 07ff |@P | .DBL 64.12494342374558 01b2 12b3 b59a | | 01b4 4030 624a |@0bJ| .DBL 16.383943563021532 01b6 2016 afec | | 01b8 3fe9 4415 |? D | .DBL 0.7895611288749125 01ba b356 bd28 | V (| 01bc 0000 0000 | | .BLANK 0000[0x4] 01c0 ; -------------------------------------------------------------------------------------- 01c0 ; SUBPROGRAM 01c0 ; -------------------------------------------------------------------------------------- 01c0 01c3 | | .CONST 0x01c3 ; Address of begin 01c1 0004 | | .CONST 0x0004 ; Address of exception handler 01c2 0001 | | .CONST 0x0001 ; Number of locals 01c3 BODY_01c0: 01c3 INIT_01c0: 01c3 00da | | Load_Top At_Offset_2 01c4 014b | K | Execute Float,Less_Zero 01c5 e5fe | | Load 0x2,-0x2 01c6 0149 | I | Execute Float,Less_Equal_Zero 01c7 0278 | x | Execute Discrete,Or 01c8 e5fe | | Load 0x2,-0x2 01c9 5816 |X | Indirect_Literal Float,0x1e0,1.0 01ca 0247 | G | Execute Float,Equal 01cb 0278 | x | Execute Discrete,Or 01cc 6802 |h | Jump_Zero 0x1cf 01cd e002 | | Load 0x0,0x2 01ce 0257 | W | Execute Discrete,Raise 01cf 00da | | Load_Top At_Offset_2 01d0 7001 |p | Jump_Nonzero 0x1d2 01d1 08e0 | | Execute_Immediate Raise,0xe0 01d2 00da | | Load_Top At_Offset_2 01d3 e20e | | Load 0x1,0xe 01d4 0232 | 2 | Execute Float,Check_In_Type 01d5 8210 | | Call 0x1,0x10 01d6 e5fe | | Load 0x2,-0x2 01d7 e20e | | Load 0x1,0xe 01d8 0232 | 2 | Execute Float,Check_In_Type 01d9 8210 | | Call 0x1,0x10 01da 023a | : | Execute Float,Divide 01db e20e | | Load 0x1,0xe 01dc 0232 | 2 | Execute Float,Check_In_Type 01dd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 01de 0000 0000 | | .XXX[0x2] 01e0 3ff0 0000 |? | .DBL 1.0 01e2 0000 0000 | | 01e4 0000 0000 | | .BLANK 0000[0x4] 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; -------------------------------------------------------------------------------------- 01e8 01f6 | | .CONST 0x01f6 ; Address of begin 01e9 0004 | | .CONST 0x0004 ; Address of exception handler 01ea 000a | | .CONST 0x000a ; Number of locals 01eb INIT_01e8: 01eb 00da | | Load_Top At_Offset_2 01ec 00e6 | | Load_Encached Float_Cache 01ed 03df | | Declare_Variable Float,With_Value 01ee 00e2 | | Load_Encached Integer_Cache 01ef 00e6 | | Load_Encached Float_Cache 01f0 00e6 | | Load_Encached Float_Cache 01f1 00e2 | | Load_Encached Integer_Cache 01f2 00e6 | | Load_Encached Float_Cache 01f3 00e6 | | Load_Encached Float_Cache 01f4 00e6 | | Load_Encached Float_Cache 01f5 00e6 | | Load_Encached Float_Cache 01f6 BODY_01e8: 01f6 e402 | | Load 0x2,0x2 01f7 58c0 |X | Indirect_Literal Float,0x2b8,141.40202399999998 01f8 0245 | E | Execute Float,Greater 01f9 6801 |h | Jump_Zero 0x1fb 01fa 08e0 | | Execute_Immediate Raise,0xe0 01fb e402 | | Load 0x2,0x2 01fc 58b7 |X | Indirect_Literal Float,0x2b4,-711.169 01fd 0244 | D | Execute Float,Less 01fe 6804 |h | Jump_Zero 0x203 01ff 58b0 |X | Indirect_Literal Float,0x2b0,0.0 0200 e20e | | Load 0x1,0xe 0201 0232 | 2 | Execute Float,Check_In_Type 0202 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0203 e402 | | Load 0x2,0x2 0204 023e | > | Execute Float,Absolute_Value 0205 58a6 |X | Indirect_Literal Float,0x2ac,5.551115123125783e-17 0206 0244 | D | Execute Float,Less 0207 6804 |h | Jump_Zero 0x20c 0208 5fd7 |_ | Indirect_Literal Float,0x1e0,1.0 0209 e20e | | Load 0x1,0xe 020a 0232 | 2 | Execute Float,Check_In_Type 020b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 020c e402 | | Load 0x2,0x2 020d 589a |X | Indirect_Literal Float,0x2a8,1.4426950408889634 020e 023b | ; | Execute Float,Times 020f 0235 | 5 | Execute Float,Round_To_Discrete 0210 00e2 | | Load_Encached Integer_Cache 0211 025e | ^ | Execute Discrete,Convert 0212 a403 | | Store_Unchecked 0x2,0x3 0213 e403 | | Load 0x2,0x3 0214 0237 | 7 | Execute Float,Convert_From_Discrete 0215 a404 | | Store_Unchecked 0x2,0x4 0216 e402 | | Load 0x2,0x2 0217 023e | > | Execute Float,Absolute_Value 0218 0235 | 5 | Execute Float,Round_To_Discrete 0219 00e2 | | Load_Encached Integer_Cache 021a 025e | ^ | Execute Discrete,Convert 021b a406 | | Store_Unchecked 0x2,0x6 021c e406 | | Load 0x2,0x6 021d 0237 | 7 | Execute Float,Convert_From_Discrete 021e e402 | | Load 0x2,0x2 021f 023e | > | Execute Float,Absolute_Value 0220 0245 | E | Execute Float,Greater 0221 6803 |h | Jump_Zero 0x225 0222 e406 | | Load 0x2,0x6 0223 0aff | | Execute_Immediate Plus,-0x1 0224 c406 | | Store 0x2,0x6 0225 e402 | | Load 0x2,0x2 0226 014b | K | Execute Float,Less_Zero 0227 6805 |h | Jump_Zero 0x22d 0228 e406 | | Load 0x2,0x6 0229 0237 | 7 | Execute Float,Convert_From_Discrete 022a 023f | ? | Execute Float,Unary_Minus 022b a407 | | Store_Unchecked 0x2,0x7 022c 7803 |x | Jump 0x230 022d e406 | | Load 0x2,0x6 022e 0237 | 7 | Execute Float,Convert_From_Discrete 022f a407 | | Store_Unchecked 0x2,0x7 0230 e402 | | Load 0x2,0x2 0231 e407 | | Load 0x2,0x7 0232 023c | < | Execute Float,Minus 0233 0043 | C | Store_Top_Uncheched Float,At_Offset_3 0234 00db | | Load_Top At_Offset_3 0235 e404 | | Load 0x2,0x4 0236 586d |Xm | Indirect_Literal Float,0x2a4,0.693359375 0237 023b | ; | Execute Float,Times 0238 023c | < | Execute Float,Minus 0239 00db | | Load_Top At_Offset_3 023a 023d | = | Execute Float,Plus 023b e404 | | Load 0x2,0x4 023c 5863 |Xc | Indirect_Literal Float,0x2a0,0.00021219444005469057 023d 023b | ; | Execute Float,Times 023e 023d | = | Execute Float,Plus 023f a405 | | Store_Unchecked 0x2,0x5 0240 e405 | | Load 0x2,0x5 0241 00d8 | | Load_Top At_Offset_0 0242 023b | ; | Execute Float,Times 0243 a407 | | Store_Unchecked 0x2,0x7 0244 5857 |XW | Indirect_Literal Float,0x29c,1.6520330026827912e-05 0245 e407 | | Load 0x2,0x7 0246 023b | ; | Execute Float,Times 0247 5850 |XP | Indirect_Literal Float,0x298,0.006943600015117928 0248 023d | = | Execute Float,Plus 0249 e407 | | Load 0x2,0x7 024a 023b | ; | Execute Float,Times 024b 5848 |XH | Indirect_Literal Float,0x294,0.24999999999999997 024c 023d | = | Execute Float,Plus 024d 0042 | B | Store_Top_Unchecked Float,At_Offset_2 024e 5841 |XA | Indirect_Literal Float,0x290,0.0004958628849054413 024f e407 | | Load 0x2,0x7 0250 023b | ; | Execute Float,Times 0251 583a |X: | Indirect_Literal Float,0x28c,0.05555386669690011 0252 023d | = | Execute Float,Plus 0253 e407 | | Load 0x2,0x7 0254 023b | ; | Execute Float,Times 0255 5832 |X2 | Indirect_Literal Float,0x288,0.5 0256 023d | = | Execute Float,Plus 0257 0041 | A | Store_Top_Unchecked Float,At_Offset_1 0258 00d9 | | Load_Top At_Offset_1 0259 e405 | | Load 0x2,0x5 025a 023b | ; | Execute Float,Times 025b 0042 | B | Store_Top_Unchecked Float,At_Offset_2 025c 582b |X+ | Indirect_Literal Float,0x288,0.5 025d 00da | | Load_Top At_Offset_2 025e 00da | | Load_Top At_Offset_2 025f e409 | | Load 0x2,0x9 0260 023c | < | Execute Float,Minus 0261 023a | : | Execute Float,Divide 0262 023d | = | Execute Float,Plus 0263 a405 | | Store_Unchecked 0x2,0x5 0264 e403 | | Load 0x2,0x3 0265 0a01 | | Execute_Immediate Plus,0x1 0266 c403 | | Store 0x2,0x3 0267 e403 | | Load 0x2,0x3 0268 09ff | | Execute_Immediate Binary_Scale,-0x1 0269 a406 | | Store_Unchecked 0x2,0x6 026a e403 | | Load 0x2,0x3 026b e406 | | Load 0x2,0x6 026c 0272 | r | Execute Discrete,Minus 026d c403 | | Store 0x2,0x3 026e e405 | | Load 0x2,0x5 026f 5814 |X | Indirect_Literal Float,0x284,2.0 0270 e406 | | Load 0x2,0x6 0271 0239 | 9 | Execute Float,Exponentiate 0272 023b | ; | Execute Float,Times 0273 a405 | | Store_Unchecked 0x2,0x5 0274 e405 | | Load 0x2,0x5 0275 580e |X | Indirect_Literal Float,0x284,2.0 0276 e403 | | Load 0x2,0x3 0277 0239 | 9 | Execute Float,Exponentiate 0278 023b | ; | Execute Float,Times 0279 a405 | | Store_Unchecked 0x2,0x5 027a e405 | | Load 0x2,0x5 027b 00d8 | | Load_Top At_Offset_0 027c e20e | | Load 0x1,0xe 027d 0234 | 4 | Execute Float,In_Type 027e 7001 |p | Jump_Nonzero 0x280 027f 0801 | | Execute_Immediate Raise,0x1 0280 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0281 0000 0000 | | .XXX[0x3] 0283 0000 | | 0284 4000 0000 |@ | .DBL 2.0 0286 0000 0000 | | 0288 3fe0 0000 |? | .DBL 0.5 028a 0000 0000 | | 028c 3fac 718e |? q | .DBL 0.05555386669690011 028e 7142 51b1 |qBQ | 0290 3f40 3f99 |?@? | .DBL 0.0004958628849054413 0292 6fde 3809 |o 8 | 0294 3fcf ffff |? | .DBL 0.24999999999999997 0296 ffff ffff | | 0298 3f7c 70e4 |?|p | .DBL 0.006943600015117928 029a 6fb3 f6df |o | 029c 3ef1 52a4 |> R | .DBL 1.6520330026827912e-05 029e 6f58 dc1c |oX | 02a0 3f2b d010 |?+ | .DBL 0.00021219444005469057 02a2 5c61 0ca8 |\a | 02a4 3fe6 3000 |? 0 | .DBL 0.693359375 02a6 0000 0000 | | 02a8 3ff7 1547 |? G| .DBL 1.4426950408889634 02aa 652b 82fe |e+ | 02ac 3c90 0000 |< | .DBL 5.551115123125783e-17 02ae 0000 0000 | | 02b0 0000 0000 | | .DBL 0.0 02b2 0000 0000 | | 02b4 c086 395a | 9Z| .DBL -711.169 02b6 1cac 0831 | 1| 02b8 4061 acdd |@a | .DBL 141.40202399999998 02ba 616f 86a0 |ao | 02bc 0000 0000 | | .BLANK 0000[0x4] 02c0 ; -------------------------------------------------------------------------------------- 02c0 ; SUBPROGRAM 02c0 ; -------------------------------------------------------------------------------------- 02c0 02d1 | | .CONST 0x02d1 ; Address of begin 02c1 0004 | | .CONST 0x0004 ; Address of exception handler 02c2 000f | | .CONST 0x000f ; Number of locals 02c3 INIT_02c0: 02c3 00e2 | | Load_Encached Integer_Cache 02c4 00e6 | | Load_Encached Float_Cache 02c5 00e2 | | Load_Encached Integer_Cache 02c6 00e6 | | Load_Encached Float_Cache 02c7 00e6 | | Load_Encached Float_Cache 02c8 00e6 | | Load_Encached Float_Cache 02c9 00e6 | | Load_Encached Float_Cache 02ca 00e6 | | Load_Encached Float_Cache 02cb 00e6 | | Load_Encached Float_Cache 02cc 00e2 | | Load_Encached Integer_Cache 02cd 00e6 | | Load_Encached Float_Cache 02ce 00e6 | | Load_Encached Float_Cache 02cf 00e6 | | Load_Encached Float_Cache 02d0 00e2 | | Load_Encached Integer_Cache 02d1 BODY_02c0: 02d1 e5ff | | Load 0x2,-0x1 02d2 014e | N | Execute Float,Equal_Zero 02d3 e5fe | | Load 0x2,-0x2 02d4 014d | M | Execute Float,Not_Equal_Zero 02d5 0279 | y | Execute Discrete,And 02d6 6801 |h | Jump_Zero 0x2d8 02d7 08e0 | | Execute_Immediate Raise,0xe0 02d8 e5ff | | Load 0x2,-0x1 02d9 014b | K | Execute Float,Less_Zero 02da 6802 |h | Jump_Zero 0x2dd 02db e002 | | Load 0x0,0x2 02dc 0257 | W | Execute Discrete,Raise 02dd e5fe | | Load 0x2,-0x2 02de 7004 |p | Jump_Nonzero 0x2e3 02df 5950 |YP | Indirect_Literal Float,0x430,1.0 02e0 e20e | | Load 0x1,0xe 02e1 0232 | 2 | Execute Float,Check_In_Type 02e2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 02e3 e003 | | Load 0x0,0x3 02e4 e004 | | Load 0x0,0x4 02e5 e5ff | | Load 0x2,-0x1 02e6 8005 | | Call 0x0,0x5 02e7 c403 | | Store 0x2,0x3 02e8 c402 | | Store 0x2,0x2 02e9 4801 |H | Short_Literal 0x1 02ea a404 | | Store_Unchecked 0x2,0x4 02eb e403 | | Load 0x2,0x3 02ec 4809 |H | Short_Literal 0x9 02ed e22d | - | Load 0x1,0x2d 02ee 01d7 | | Execute Vector,Field_Read 02ef 0242 | B | Execute Float,Less_Equal 02f0 6802 |h | Jump_Zero 0x2f3 02f1 4809 |H | Short_Literal 0x9 02f2 a404 | | Store_Unchecked 0x2,0x4 02f3 e403 | | Load 0x2,0x3 02f4 e404 | | Load 0x2,0x4 02f5 0a04 | | Execute_Immediate Plus,0x4 02f6 e22d | - | Load 0x1,0x2d 02f7 01d7 | | Execute Vector,Field_Read 02f8 0242 | B | Execute Float,Less_Equal 02f9 6803 |h | Jump_Zero 0x2fd 02fa e404 | | Load 0x2,0x4 02fb 0a04 | | Execute_Immediate Plus,0x4 02fc c404 | | Store 0x2,0x4 02fd e403 | | Load 0x2,0x3 02fe e404 | | Load 0x2,0x4 02ff 0a02 | | Execute_Immediate Plus,0x2 0300 e22d | - | Load 0x1,0x2d 0301 01d7 | | Execute Vector,Field_Read 0302 0242 | B | Execute Float,Less_Equal 0303 6803 |h | Jump_Zero 0x307 0304 e404 | | Load 0x2,0x4 0305 0a02 | | Execute_Immediate Plus,0x2 0306 c404 | | Store 0x2,0x4 0307 e403 | | Load 0x2,0x3 0308 e404 | | Load 0x2,0x4 0309 0a01 | | Execute_Immediate Plus,0x1 030a e22d | - | Load 0x1,0x2d 030b 01d7 | | Execute Vector,Field_Read 030c 023c | < | Execute Float,Minus 030d a405 | | Store_Unchecked 0x2,0x5 030e e405 | | Load 0x2,0x5 030f e404 | | Load 0x2,0x4 0310 0a01 | | Execute_Immediate Plus,0x1 0311 09ff | | Execute_Immediate Binary_Scale,-0x1 0312 e22e | . | Load 0x1,0x2e 0313 01d7 | | Execute Vector,Field_Read 0314 023c | < | Execute Float,Minus 0315 a405 | | Store_Unchecked 0x2,0x5 0316 e405 | | Load 0x2,0x5 0317 e403 | | Load 0x2,0x3 0318 e404 | | Load 0x2,0x4 0319 0a01 | | Execute_Immediate Plus,0x1 031a e22d | - | Load 0x1,0x2d 031b 01d7 | | Execute Vector,Field_Read 031c 023d | = | Execute Float,Plus 031d 023a | : | Execute Float,Divide 031e a405 | | Store_Unchecked 0x2,0x5 031f e405 | | Load 0x2,0x5 0320 00d8 | | Load_Top At_Offset_0 0321 023d | = | Execute Float,Plus 0322 a405 | | Store_Unchecked 0x2,0x5 0323 e405 | | Load 0x2,0x5 0324 00d8 | | Load_Top At_Offset_0 0325 023b | ; | Execute Float,Times 0326 a403 | | Store_Unchecked 0x2,0x3 0327 5904 |Y | Indirect_Literal Float,0x42c,0.0004344577567216312 0328 e403 | | Load 0x2,0x3 0329 023b | ; | Execute Float,Times 032a 58fd |X | Indirect_Literal Float,0x428,0.0022321421285924257 032b 023d | = | Execute Float,Plus 032c e403 | | Load 0x2,0x3 032d 023b | ; | Execute Float,Times 032e 58f5 |X | Indirect_Literal Float,0x424,0.012500000000503799 032f 023d | = | Execute Float,Plus 0330 e403 | | Load 0x2,0x3 0331 023b | ; | Execute Float,Times 0332 58ed |X | Indirect_Literal Float,0x420,0.0833333333333332 0333 023d | = | Execute Float,Plus 0334 a406 | | Store_Unchecked 0x2,0x6 0335 e405 | | Load 0x2,0x5 0336 e403 | | Load 0x2,0x3 0337 023b | ; | Execute Float,Times 0338 e406 | | Load 0x2,0x6 0339 023b | ; | Execute Float,Times 033a a406 | | Store_Unchecked 0x2,0x6 033b e406 | | Load 0x2,0x6 033c 58df |X | Indirect_Literal Float,0x41c,0.4426950408889634 033d e406 | | Load 0x2,0x6 033e 023b | ; | Execute Float,Times 033f 023d | = | Execute Float,Plus 0340 a406 | | Store_Unchecked 0x2,0x6 0341 e406 | | Load 0x2,0x6 0342 e405 | | Load 0x2,0x5 0343 58d8 |X | Indirect_Literal Float,0x41c,0.4426950408889634 0344 023b | ; | Execute Float,Times 0345 023d | = | Execute Float,Plus 0346 e405 | | Load 0x2,0x5 0347 023d | = | Execute Float,Plus 0348 a408 | | Store_Unchecked 0x2,0x8 0349 e402 | | Load 0x2,0x2 034a 0904 | | Execute_Immediate Binary_Scale,0x4 034b e404 | | Load 0x2,0x4 034c 0272 | r | Execute Discrete,Minus 034d 0237 | 7 | Execute Float,Convert_From_Discrete 034e 58c9 |X | Indirect_Literal Float,0x418,0.0625 034f 023b | ; | Execute Float,Times 0350 a407 | | Store_Unchecked 0x2,0x7 0351 e5fe | | Load 0x2,-0x2 0352 58c1 |X | Indirect_Literal Float,0x414,16.0 0353 023b | ; | Execute Float,Times 0354 8006 | | Call 0x0,0x6 0355 58c2 |X | Indirect_Literal Float,0x418,0.0625 0356 023b | ; | Execute Float,Times 0357 a409 | | Store_Unchecked 0x2,0x9 0358 e5fe | | Load 0x2,-0x2 0359 e409 | | Load 0x2,0x9 035a 023c | < | Execute Float,Minus 035b a40a | | Store_Unchecked 0x2,0xa 035c e408 | | Load 0x2,0x8 035d e5fe | | Load 0x2,-0x2 035e 023b | ; | Execute Float,Times 035f e407 | | Load 0x2,0x7 0360 e40a | | Load 0x2,0xa 0361 023b | ; | Execute Float,Times 0362 023d | = | Execute Float,Plus 0363 a40c | | Store_Unchecked 0x2,0xc 0364 00db | | Load_Top At_Offset_3 0365 58ae |X | Indirect_Literal Float,0x414,16.0 0366 023b | ; | Execute Float,Times 0367 8006 | | Call 0x0,0x6 0368 58af |X | Indirect_Literal Float,0x418,0.0625 0369 023b | ; | Execute Float,Times 036a 0043 | C | Store_Top_Uncheched Float,At_Offset_3 036b 00db | | Load_Top At_Offset_3 036c 00db | | Load_Top At_Offset_3 036d 023c | < | Execute Float,Minus 036e 0042 | B | Store_Top_Unchecked Float,At_Offset_2 036f 00da | | Load_Top At_Offset_2 0370 e407 | | Load 0x2,0x7 0371 e409 | | Load 0x2,0x9 0372 023b | ; | Execute Float,Times 0373 023d | = | Execute Float,Plus 0374 a40c | | Store_Unchecked 0x2,0xc 0375 00db | | Load_Top At_Offset_3 0376 589d |X | Indirect_Literal Float,0x414,16.0 0377 023b | ; | Execute Float,Times 0378 8006 | | Call 0x0,0x6 0379 589e |X | Indirect_Literal Float,0x418,0.0625 037a 023b | ; | Execute Float,Times 037b 0043 | C | Store_Top_Uncheched Float,At_Offset_3 037c 00d9 | | Load_Top At_Offset_1 037d e40c | | Load 0x2,0xc 037e e40d | | Load 0x2,0xd 037f 023c | < | Execute Float,Minus 0380 023d | = | Execute Float,Plus 0381 0042 | B | Store_Top_Unchecked Float,At_Offset_2 0382 00d9 | | Load_Top At_Offset_1 0383 5890 |X | Indirect_Literal Float,0x414,16.0 0384 023b | ; | Execute Float,Times 0385 8006 | | Call 0x0,0x6 0386 5891 |X | Indirect_Literal Float,0x418,0.0625 0387 023b | ; | Execute Float,Times 0388 a40c | | Store_Unchecked 0x2,0xc 0389 588a |X | Indirect_Literal Float,0x414,16.0 038a 00db | | Load_Top At_Offset_3 038b e40c | | Load 0x2,0xc 038c 023d | = | Execute Float,Plus 038d 023b | ; | Execute Float,Times 038e 8006 | | Call 0x0,0x6 038f 0235 | 5 | Execute Float,Round_To_Discrete 0390 00e2 | | Load_Encached Integer_Cache 0391 025e | ^ | Execute Discrete,Convert 0392 a40b | | Store_Unchecked 0x2,0xb 0393 00d9 | | Load_Top At_Offset_1 0394 e40c | | Load 0x2,0xc 0395 023c | < | Execute Float,Minus 0396 0042 | B | Store_Top_Unchecked Float,At_Offset_2 0397 00d9 | | Load_Top At_Offset_1 0398 014c | L | Execute Float,Greater_Zero 0399 6807 |h | Jump_Zero 0x3a1 039a e40b | | Load 0x2,0xb 039b 0a01 | | Execute_Immediate Plus,0x1 039c c40b | | Store 0x2,0xb 039d 00d9 | | Load_Top At_Offset_1 039e 5879 |Xy | Indirect_Literal Float,0x418,0.0625 039f 023c | < | Execute Float,Minus 03a0 0042 | B | Store_Top_Unchecked Float,At_Offset_2 03a1 e40b | | Load 0x2,0xb 03a2 0d00 | | Execute_Immediate Less,0x0 03a3 6803 |h | Jump_Zero 0x3a7 03a4 4800 |H | Short_Literal 0x0 03a5 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 03a6 7802 |x | Jump 0x3a9 03a7 4801 |H | Short_Literal 0x1 03a8 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 03a9 e40b | | Load 0x2,0xb 03aa 09fc | | Execute_Immediate Binary_Scale,-0x4 03ab 00d9 | | Load_Top At_Offset_1 03ac 0273 | s | Execute Discrete,Plus 03ad c402 | | Store 0x2,0x2 03ae e402 | | Load 0x2,0x2 03af 0904 | | Execute_Immediate Binary_Scale,0x4 03b0 e40b | | Load 0x2,0xb 03b1 0272 | r | Execute Discrete,Minus 03b2 c404 | | Store 0x2,0x4 03b3 585c |X\ | Indirect_Literal Float,0x410,1.4928852680595607e-05 03b4 00da | | Load_Top At_Offset_2 03b5 023b | ; | Execute Float,Times 03b6 5855 |XU | Indirect_Literal Float,0x40c,0.00015400290440989762 03b7 023d | = | Execute Float,Plus 03b8 00da | | Load_Top At_Offset_2 03b9 023b | ; | Execute Float,Times 03ba 584d |XM | Indirect_Literal Float,0x408,0.0013333541313585784 03bb 023d | = | Execute Float,Plus 03bc 00da | | Load_Top At_Offset_2 03bd 023b | ; | Execute Float,Times 03be 5845 |XE | Indirect_Literal Float,0x404,0.009618129059517241 03bf 023d | = | Execute Float,Plus 03c0 00da | | Load_Top At_Offset_2 03c1 023b | ; | Execute Float,Times 03c2 583d |X= | Indirect_Literal Float,0x400,0.05550410866408559 03c3 023d | = | Execute Float,Plus 03c4 00da | | Load_Top At_Offset_2 03c5 023b | ; | Execute Float,Times 03c6 5835 |X5 | Indirect_Literal Float,0x3fc,0.24022650695909537 03c7 023d | = | Execute Float,Plus 03c8 00da | | Load_Top At_Offset_2 03c9 023b | ; | Execute Float,Times 03ca 582d |X- | Indirect_Literal Float,0x3f8,0.6931471805599453 03cb 023d | = | Execute Float,Plus 03cc 00da | | Load_Top At_Offset_2 03cd 023b | ; | Execute Float,Times 03ce a405 | | Store_Unchecked 0x2,0x5 03cf e404 | | Load 0x2,0x4 03d0 0a01 | | Execute_Immediate Plus,0x1 03d1 e22d | - | Load 0x1,0x2d 03d2 01d7 | | Execute Vector,Field_Read 03d3 e404 | | Load 0x2,0x4 03d4 0a01 | | Execute_Immediate Plus,0x1 03d5 e22d | - | Load 0x1,0x2d 03d6 01d7 | | Execute Vector,Field_Read 03d7 e405 | | Load 0x2,0x5 03d8 023b | ; | Execute Float,Times 03d9 023d | = | Execute Float,Plus 03da a405 | | Store_Unchecked 0x2,0x5 03db e402 | | Load 0x2,0x2 03dc 09ff | | Execute_Immediate Binary_Scale,-0x1 03dd 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 03de e402 | | Load 0x2,0x2 03df 00d9 | | Load_Top At_Offset_1 03e0 0272 | r | Execute Discrete,Minus 03e1 c402 | | Store 0x2,0x2 03e2 e405 | | Load 0x2,0x5 03e3 5ea0 |^ | Indirect_Literal Float,0x284,2.0 03e4 00da | | Load_Top At_Offset_2 03e5 0239 | 9 | Execute Float,Exponentiate 03e6 023b | ; | Execute Float,Times 03e7 a405 | | Store_Unchecked 0x2,0x5 03e8 e405 | | Load 0x2,0x5 03e9 5e9a |^ | Indirect_Literal Float,0x284,2.0 03ea e402 | | Load 0x2,0x2 03eb 0239 | 9 | Execute Float,Exponentiate 03ec 023b | ; | Execute Float,Times 03ed a405 | | Store_Unchecked 0x2,0x5 03ee e405 | | Load 0x2,0x5 03ef 00d8 | | Load_Top At_Offset_0 03f0 e20e | | Load 0x1,0xe 03f1 0234 | 4 | Execute Float,In_Type 03f2 7001 |p | Jump_Nonzero 0x3f4 03f3 0801 | | Execute_Immediate Raise,0x1 03f4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 03f5 0000 0000 | | .XXX[0x3] 03f7 0000 | | 03f8 3fe6 2e42 |? .B| .DBL 0.6931471805599453 03fa fefa 39ef | 9 | 03fc 3fce bfbd |? | .DBL 0.24022650695909537 03fe ff82 c4ce | | 0400 3fac 6b08 |? k | .DBL 0.05550410866408559 0402 d703 026c | l| 0404 3f83 b2ab |? | .DBL 0.009618129059517241 0406 6e13 1d98 |n | 0408 3f55 d87e |?U ~| .DBL 0.0013333541313585784 040a 18d7 cd9f | | 040c 3f24 2f7a |?$/z| .DBL 0.00015400290440989762 040e e038 4c73 | 8Ls| 0410 3eef 4edd |> N | .DBL 1.4928852680595607e-05 0412 e392 cc7f | | 0414 4030 0000 |@0 | .DBL 16.0 0416 0000 0000 | | 0418 3fb0 0000 |? | .DBL 0.0625 041a 0000 0000 | | 041c 3fdc 551d |? U | .DBL 0.4426950408889634 041e 94ae 0bf8 | | 0420 3fb5 5555 |? UU| .DBL 0.0833333333333332 0422 5555 554c |UUUL| 0424 3f89 9999 |? | .DBL 0.012500000000503799 0426 999e 080e | | 0428 3f62 4924 |?bI$| .DBL 0.0022321421285924257 042a 2e27 8dab |.' | 042c 3f3c 78fd |?<x | .DBL 0.0004344577567216312 042e db4a fc28 | J (| 0430 3ff0 0000 |? | .DBL 1.0 0432 0000 0000 | | 0434 0000 0000 | | .BLANK 0000[0x4] 0438 ; -------------------------------------------------------------------------------------- 0438 ; SUBPROGRAM 0438 ; -------------------------------------------------------------------------------------- 0438 0444 | D | .CONST 0x0444 ; Address of begin 0439 0004 | | .CONST 0x0004 ; Address of exception handler 043a 0008 | | .CONST 0x0008 ; Number of locals 043b INIT_0438: 043b 00e6 | | Load_Encached Float_Cache 043c 00e6 | | Load_Encached Float_Cache 043d 00e6 | | Load_Encached Float_Cache 043e e5ff | | Load 0x2,-0x1 043f 00e6 | | Load_Encached Float_Cache 0440 03df | | Declare_Variable Float,With_Value 0441 00e6 | | Load_Encached Float_Cache 0442 00e6 | | Load_Encached Float_Cache 0443 00e1 | | Load_Encached Boolean_Cache 0444 BODY_0438: 0444 00db | | Load_Top At_Offset_3 0445 014b | K | Execute Float,Less_Zero 0446 6806 |h | Jump_Zero 0x44d 0447 00db | | Load_Top At_Offset_3 0448 023f | ? | Execute Float,Unary_Minus 0449 a405 | | Store_Unchecked 0x2,0x5 044a 4801 |H | Short_Literal 0x1 044b 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 044c 7802 |x | Jump 0x44f 044d 4800 |H | Short_Literal 0x0 044e 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 044f 00db | | Load_Top At_Offset_3 0450 589f |X | Indirect_Literal Float,0x4f0,210828714.13315654 0451 0243 | C | Execute Float,Greater_Equal 0452 6804 |h | Jump_Zero 0x457 0453 5898 |X | Indirect_Literal Float,0x4ec,0.0 0454 e20e | | Load 0x1,0xe 0455 0232 | 2 | Execute Float,Check_In_Type 0456 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0457 00db | | Load_Top At_Offset_3 0458 588f |X | Indirect_Literal Float,0x4e8,0.31830988618379064 0459 023b | ; | Execute Float,Times 045a 8007 | | Call 0x0,0x7 045b 0043 | C | Store_Top_Uncheched Float,At_Offset_3 045c 00da | | Load_Top At_Offset_2 045d 822f | / | Call 0x1,0x2f 045e 6803 |h | Jump_Zero 0x462 045f 00d8 | | Load_Top At_Offset_0 0460 0f00 | | Execute_Immediate Equal,0x0 0461 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0462 00db | | Load_Top At_Offset_3 0463 8006 | | Call 0x0,0x6 0464 0042 | B | Store_Top_Unchecked Float,At_Offset_2 0465 00d9 | | Load_Top At_Offset_1 0466 00db | | Load_Top At_Offset_3 0467 587c |X| | Indirect_Literal Float,0x4e4,3.1416015625 0468 023b | ; | Execute Float,Times 0469 023c | < | Execute Float,Minus 046a e405 | | Load 0x2,0x5 046b 00db | | Load_Top At_Offset_3 046c 023c | < | Execute Float,Minus 046d 023d | = | Execute Float,Plus 046e 00db | | Load_Top At_Offset_3 046f 5870 |Xp | Indirect_Literal Float,0x4e0,8.908910206761536e-06 0470 023b | ; | Execute Float,Times 0471 023d | = | Execute Float,Plus 0472 a403 | | Store_Unchecked 0x2,0x3 0473 e403 | | Load 0x2,0x3 0474 023e | > | Execute Float,Absolute_Value 0475 5866 |Xf | Indirect_Literal Float,0x4dc,1.4901161193847656e-08 0476 0244 | D | Execute Float,Less 0477 680c |h | Jump_Zero 0x484 0478 00d8 | | Load_Top At_Offset_0 0479 6803 |h | Jump_Zero 0x47d 047a e403 | | Load 0x2,0x3 047b 023f | ? | Execute Float,Unary_Minus 047c a403 | | Store_Unchecked 0x2,0x3 047d e403 | | Load 0x2,0x3 047e 00d8 | | Load_Top At_Offset_0 047f e20e | | Load 0x1,0xe 0480 0234 | 4 | Execute Float,In_Type 0481 7001 |p | Jump_Nonzero 0x483 0482 0801 | | Execute_Immediate Raise,0x1 0483 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0484 e403 | | Load 0x2,0x3 0485 00d8 | | Load_Top At_Offset_0 0486 023b | ; | Execute Float,Times 0487 a404 | | Store_Unchecked 0x2,0x4 0488 584f |XO | Indirect_Literal Float,0x4d8,2.7204790957888843e-15 0489 e404 | | Load 0x2,0x4 048a 023b | ; | Execute Float,Times 048b 5848 |XH | Indirect_Literal Float,0x4d4,7.642917806891046e-13 048c 023c | < | Execute Float,Minus 048d e404 | | Load 0x2,0x4 048e 023b | ; | Execute Float,Times 048f 5840 |X@ | Indirect_Literal Float,0x4d0,1.6058936490371587e-10 0490 023d | = | Execute Float,Plus 0491 e404 | | Load 0x2,0x4 0492 023b | ; | Execute Float,Times 0493 5838 |X8 | Indirect_Literal Float,0x4cc,2.5052106798274583e-08 0494 023c | < | Execute Float,Minus 0495 e404 | | Load 0x2,0x4 0496 023b | ; | Execute Float,Times 0497 5830 |X0 | Indirect_Literal Float,0x4c8,2.7557319210152756e-06 0498 023d | = | Execute Float,Plus 0499 e404 | | Load 0x2,0x4 049a 023b | ; | Execute Float,Times 049b 5828 |X( | Indirect_Literal Float,0x4c4,0.0001984126984120184 049c 023c | < | Execute Float,Minus 049d e404 | | Load 0x2,0x4 049e 023b | ; | Execute Float,Times 049f 5820 |X | Indirect_Literal Float,0x4c0,0.008333333333333165 04a0 023d | = | Execute Float,Plus 04a1 e404 | | Load 0x2,0x4 04a2 023b | ; | Execute Float,Times 04a3 5818 |X | Indirect_Literal Float,0x4bc,0.16666666666666663 04a4 023c | < | Execute Float,Minus 04a5 e404 | | Load 0x2,0x4 04a6 023b | ; | Execute Float,Times 04a7 a402 | | Store_Unchecked 0x2,0x2 04a8 e403 | | Load 0x2,0x3 04a9 00d8 | | Load_Top At_Offset_0 04aa e402 | | Load 0x2,0x2 04ab 023b | ; | Execute Float,Times 04ac 023d | = | Execute Float,Plus 04ad a402 | | Store_Unchecked 0x2,0x2 04ae 00d8 | | Load_Top At_Offset_0 04af 6803 |h | Jump_Zero 0x4b3 04b0 e402 | | Load 0x2,0x2 04b1 023f | ? | Execute Float,Unary_Minus 04b2 a402 | | Store_Unchecked 0x2,0x2 04b3 e402 | | Load 0x2,0x2 04b4 00d8 | | Load_Top At_Offset_0 04b5 e20e | | Load 0x1,0xe 04b6 0234 | 4 | Execute Float,In_Type 04b7 7001 |p | Jump_Nonzero 0x4b9 04b8 0801 | | Execute_Immediate Raise,0x1 04b9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04ba 0000 0000 | | .XXX[0x2] 04bc 3fc5 5555 |? UU| .DBL 0.16666666666666663 04be 5555 5554 |UUUT| 04c0 3f81 1111 |? | .DBL 0.008333333333333165 04c2 1111 10b0 | | 04c4 3f2a 01a0 |?* | .DBL 0.0001984126984120184 04c6 1a01 3e1a | > | 04c8 3ec7 1de3 |> | .DBL 2.7557319210152756e-06 04ca a524 f063 | $ c| 04cc 3e5a e645 |>Z E| .DBL 2.5052106798274583e-08 04ce 4b5d c0ab |K] | 04d0 3de6 123c |= <| .DBL 1.6058936490371587e-10 04d2 686a d42f |hj /| 04d4 3d6a e420 |=j | .DBL 7.642917806891046e-13 04d6 dc08 499b | I | 04d8 3ce8 80ff |< | .DBL 2.7204790957888843e-15 04da 6993 df94 |i | 04dc 3e50 0000 |>P | .DBL 1.4901161193847656e-08 04de 0000 0000 | | 04e0 3ee2 aeef |> | .DBL 8.908910206761536e-06 04e2 4b9e e59d |K | 04e4 4009 2200 |@ " | .DBL 3.1416015625 04e6 0000 0000 | | 04e8 3fd4 5f30 |? _0| .DBL 0.31830988618379064 04ea 6dc9 c882 |m | 04ec 0000 0000 | | .DBL 0.0 04ee 0000 0000 | | 04f0 41a9 21fb |A ! | .DBL 210828714.13315654 04f2 5444 2d18 |TD- | 04f4 0000 0000 | | .BLANK 0000[0x4] 04f8 ; -------------------------------------------------------------------------------------- 04f8 ; SUBPROGRAM 04f8 ; -------------------------------------------------------------------------------------- 04f8 04fb | | .CONST 0x04fb ; Address of begin 04f9 0004 | | .CONST 0x0004 ; Address of exception handler 04fa 0001 | | .CONST 0x0001 ; Number of locals 04fb BODY_04f8: 04fb INIT_04f8: 04fb 00db | | Load_Top At_Offset_3 04fc 0149 | I | Execute Float,Less_Equal_Zero 04fd 6802 |h | Jump_Zero 0x500 04fe e002 | | Load 0x0,0x2 04ff 0257 | W | Execute Discrete,Raise 0500 580b |X | Indirect_Literal Float,0x50c,6.283185307179586 0501 00db | | Load_Top At_Offset_3 0502 023b | ; | Execute Float,Times 0503 e5fe | | Load 0x2,-0x2 0504 023a | : | Execute Float,Divide 0505 e20e | | Load 0x1,0xe 0506 0232 | 2 | Execute Float,Check_In_Type 0507 8214 | | Call 0x1,0x14 0508 e20e | | Load 0x1,0xe 0509 0232 | 2 | Execute Float,Check_In_Type 050a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 050b 0000 | | .XXX[0x1] 050c 4019 21fb |@ ! | .DBL 6.283185307179586 050e 5444 2d18 |TD- | 0510 ; -------------------------------------------------------------------------------------- 0510 ; SUBPROGRAM 0510 ; -------------------------------------------------------------------------------------- 0510 051a | | .CONST 0x051a ; Address of begin 0511 0004 | | .CONST 0x0004 ; Address of exception handler 0512 0008 | | .CONST 0x0008 ; Number of locals 0513 INIT_0510: 0513 00e6 | | Load_Encached Float_Cache 0514 00e6 | | Load_Encached Float_Cache 0515 00e6 | | Load_Encached Float_Cache 0516 00e6 | | Load_Encached Float_Cache 0517 00e6 | | Load_Encached Float_Cache 0518 00e6 | | Load_Encached Float_Cache 0519 00e1 | | Load_Encached Boolean_Cache 051a BODY_0510: 051a e5ff | | Load 0x2,-0x1 051b 023e | > | Execute Float,Absolute_Value 051c 58b3 |X | Indirect_Literal Float,0x5d0,1.5707963267948966 051d 023d | = | Execute Float,Plus 051e a405 | | Store_Unchecked 0x2,0x5 051f 4800 |H | Short_Literal 0x0 0520 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0521 00db | | Load_Top At_Offset_3 0522 58a9 |X | Indirect_Literal Float,0x5cc,210828714.13315654 0523 0243 | C | Execute Float,Greater_Equal 0524 6804 |h | Jump_Zero 0x529 0525 58a2 |X | Indirect_Literal Float,0x5c8,0.0 0526 e20e | | Load 0x1,0xe 0527 0232 | 2 | Execute Float,Check_In_Type 0528 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0529 00db | | Load_Top At_Offset_3 052a 5899 |X | Indirect_Literal Float,0x5c4,0.31830988618379064 052b 023b | ; | Execute Float,Times 052c 8007 | | Call 0x0,0x7 052d 0043 | C | Store_Top_Uncheched Float,At_Offset_3 052e 00da | | Load_Top At_Offset_2 052f 822f | / | Call 0x1,0x2f 0530 6803 |h | Jump_Zero 0x534 0531 00d8 | | Load_Top At_Offset_0 0532 0f00 | | Execute_Immediate Equal,0x0 0533 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0534 00da | | Load_Top At_Offset_2 0535 588a |X | Indirect_Literal Float,0x5c0,0.5 0536 023c | < | Execute Float,Minus 0537 0043 | C | Store_Top_Uncheched Float,At_Offset_3 0538 e5ff | | Load 0x2,-0x1 0539 023e | > | Execute Float,Absolute_Value 053a 8006 | | Call 0x0,0x6 053b 0042 | B | Store_Top_Unchecked Float,At_Offset_2 053c 00d9 | | Load_Top At_Offset_1 053d 00db | | Load_Top At_Offset_3 053e 587d |X} | Indirect_Literal Float,0x5bc,3.1416015625 053f 023b | ; | Execute Float,Times 0540 023c | < | Execute Float,Minus 0541 e5ff | | Load 0x2,-0x1 0542 023e | > | Execute Float,Absolute_Value 0543 00db | | Load_Top At_Offset_3 0544 023c | < | Execute Float,Minus 0545 023d | = | Execute Float,Plus 0546 00db | | Load_Top At_Offset_3 0547 5870 |Xp | Indirect_Literal Float,0x5b8,8.908910206761536e-06 0548 023b | ; | Execute Float,Times 0549 023d | = | Execute Float,Plus 054a a403 | | Store_Unchecked 0x2,0x3 054b e403 | | Load 0x2,0x3 054c 023e | > | Execute Float,Absolute_Value 054d 5866 |Xf | Indirect_Literal Float,0x5b4,1.4901161193847656e-08 054e 0244 | D | Execute Float,Less 054f 680c |h | Jump_Zero 0x55c 0550 00d8 | | Load_Top At_Offset_0 0551 6803 |h | Jump_Zero 0x555 0552 e403 | | Load 0x2,0x3 0553 023f | ? | Execute Float,Unary_Minus 0554 a403 | | Store_Unchecked 0x2,0x3 0555 e403 | | Load 0x2,0x3 0556 00d8 | | Load_Top At_Offset_0 0557 e20e | | Load 0x1,0xe 0558 0234 | 4 | Execute Float,In_Type 0559 7001 |p | Jump_Nonzero 0x55b 055a 0801 | | Execute_Immediate Raise,0x1 055b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 055c e403 | | Load 0x2,0x3 055d 00d8 | | Load_Top At_Offset_0 055e 023b | ; | Execute Float,Times 055f a404 | | Store_Unchecked 0x2,0x4 0560 584f |XO | Indirect_Literal Float,0x5b0,2.7204790957888843e-15 0561 e404 | | Load 0x2,0x4 0562 023b | ; | Execute Float,Times 0563 5848 |XH | Indirect_Literal Float,0x5ac,7.642917806891046e-13 0564 023c | < | Execute Float,Minus 0565 e404 | | Load 0x2,0x4 0566 023b | ; | Execute Float,Times 0567 5840 |X@ | Indirect_Literal Float,0x5a8,1.6058936490371587e-10 0568 023d | = | Execute Float,Plus 0569 e404 | | Load 0x2,0x4 056a 023b | ; | Execute Float,Times 056b 5838 |X8 | Indirect_Literal Float,0x5a4,2.5052106798274583e-08 056c 023c | < | Execute Float,Minus 056d e404 | | Load 0x2,0x4 056e 023b | ; | Execute Float,Times 056f 5830 |X0 | Indirect_Literal Float,0x5a0,2.7557319210152756e-06 0570 023d | = | Execute Float,Plus 0571 e404 | | Load 0x2,0x4 0572 023b | ; | Execute Float,Times 0573 5828 |X( | Indirect_Literal Float,0x59c,0.0001984126984120184 0574 023c | < | Execute Float,Minus 0575 e404 | | Load 0x2,0x4 0576 023b | ; | Execute Float,Times 0577 5820 |X | Indirect_Literal Float,0x598,0.008333333333333165 0578 023d | = | Execute Float,Plus 0579 e404 | | Load 0x2,0x4 057a 023b | ; | Execute Float,Times 057b 5818 |X | Indirect_Literal Float,0x594,0.16666666666666663 057c 023c | < | Execute Float,Minus 057d e404 | | Load 0x2,0x4 057e 023b | ; | Execute Float,Times 057f a402 | | Store_Unchecked 0x2,0x2 0580 e403 | | Load 0x2,0x3 0581 00d8 | | Load_Top At_Offset_0 0582 e402 | | Load 0x2,0x2 0583 023b | ; | Execute Float,Times 0584 023d | = | Execute Float,Plus 0585 a402 | | Store_Unchecked 0x2,0x2 0586 00d8 | | Load_Top At_Offset_0 0587 6803 |h | Jump_Zero 0x58b 0588 e402 | | Load 0x2,0x2 0589 023f | ? | Execute Float,Unary_Minus 058a a402 | | Store_Unchecked 0x2,0x2 058b e402 | | Load 0x2,0x2 058c 00d8 | | Load_Top At_Offset_0 058d e20e | | Load 0x1,0xe 058e 0234 | 4 | Execute Float,In_Type 058f 7001 |p | Jump_Nonzero 0x591 0590 0801 | | Execute_Immediate Raise,0x1 0591 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0592 0000 0000 | | .XXX[0x2] 0594 3fc5 5555 |? UU| .DBL 0.16666666666666663 0596 5555 5554 |UUUT| 0598 3f81 1111 |? | .DBL 0.008333333333333165 059a 1111 10b0 | | 059c 3f2a 01a0 |?* | .DBL 0.0001984126984120184 059e 1a01 3e1a | > | 05a0 3ec7 1de3 |> | .DBL 2.7557319210152756e-06 05a2 a524 f063 | $ c| 05a4 3e5a e645 |>Z E| .DBL 2.5052106798274583e-08 05a6 4b5d c0ab |K] | 05a8 3de6 123c |= <| .DBL 1.6058936490371587e-10 05aa 686a d42f |hj /| 05ac 3d6a e420 |=j | .DBL 7.642917806891046e-13 05ae dc08 499b | I | 05b0 3ce8 80ff |< | .DBL 2.7204790957888843e-15 05b2 6993 df94 |i | 05b4 3e50 0000 |>P | .DBL 1.4901161193847656e-08 05b6 0000 0000 | | 05b8 3ee2 aeef |> | .DBL 8.908910206761536e-06 05ba 4b9e e59d |K | 05bc 4009 2200 |@ " | .DBL 3.1416015625 05be 0000 0000 | | 05c0 3fe0 0000 |? | .DBL 0.5 05c2 0000 0000 | | 05c4 3fd4 5f30 |? _0| .DBL 0.31830988618379064 05c6 6dc9 c882 |m | 05c8 0000 0000 | | .DBL 0.0 05ca 0000 0000 | | 05cc 41a9 21fb |A ! | .DBL 210828714.13315654 05ce 5444 2d18 |TD- | 05d0 3ff9 21fb |? ! | .DBL 1.5707963267948966 05d2 5444 2d18 |TD- | 05d4 0000 0000 | | .BLANK 0000[0x4] 05d8 ; -------------------------------------------------------------------------------------- 05d8 ; SUBPROGRAM 05d8 ; -------------------------------------------------------------------------------------- 05d8 05db | | .CONST 0x05db ; Address of begin 05d9 0004 | | .CONST 0x0004 ; Address of exception handler 05da 0001 | | .CONST 0x0001 ; Number of locals 05db BODY_05d8: 05db INIT_05d8: 05db 00db | | Load_Top At_Offset_3 05dc 0149 | I | Execute Float,Less_Equal_Zero 05dd 6802 |h | Jump_Zero 0x5e0 05de e002 | | Load 0x0,0x2 05df 0257 | W | Execute Discrete,Raise 05e0 580b |X | Indirect_Literal Float,0x5ec,6.283185307179586 05e1 00db | | Load_Top At_Offset_3 05e2 023b | ; | Execute Float,Times 05e3 e5fe | | Load 0x2,-0x2 05e4 023a | : | Execute Float,Divide 05e5 e20e | | Load 0x1,0xe 05e6 0232 | 2 | Execute Float,Check_In_Type 05e7 8216 | | Call 0x1,0x16 05e8 e20e | | Load 0x1,0xe 05e9 0232 | 2 | Execute Float,Check_In_Type 05ea 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05eb 0000 | | .XXX[0x1] 05ec 4019 21fb |@ ! | .DBL 6.283185307179586 05ee 5444 2d18 |TD- | 05f0 ; -------------------------------------------------------------------------------------- 05f0 ; SUBPROGRAM 05f0 ; -------------------------------------------------------------------------------------- 05f0 05fc | | .CONST 0x05fc ; Address of begin 05f1 0004 | | .CONST 0x0004 ; Address of exception handler 05f2 0008 | | .CONST 0x0008 ; Number of locals 05f3 INIT_05f0: 05f3 00da | | Load_Top At_Offset_2 05f4 00e6 | | Load_Encached Float_Cache 05f5 03df | | Declare_Variable Float,With_Value 05f6 00e6 | | Load_Encached Float_Cache 05f7 00e6 | | Load_Encached Float_Cache 05f8 00e6 | | Load_Encached Float_Cache 05f9 00e6 | | Load_Encached Float_Cache 05fa 00e1 | | Load_Encached Boolean_Cache 05fb 00e6 | | Load_Encached Float_Cache 05fc BODY_05f0: 05fc e402 | | Load 0x2,0x2 05fd 023e | > | Execute Float,Absolute_Value 05fe a403 | | Store_Unchecked 0x2,0x3 05ff e403 | | Load 0x2,0x3 0600 58a3 |X | Indirect_Literal Float,0x6a4,105414357.06657827 0601 8006 | | Call 0x0,0x6 0602 0245 | E | Execute Float,Greater 0603 6804 |h | Jump_Zero 0x608 0604 589b |X | Indirect_Literal Float,0x6a0,0.0 0605 e20e | | Load 0x1,0xe 0606 0232 | 2 | Execute Float,Check_In_Type 0607 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0608 e402 | | Load 0x2,0x2 0609 5892 |X | Indirect_Literal Float,0x69c,0.6366197723675813 060a 023b | ; | Execute Float,Times 060b 8007 | | Call 0x0,0x7 060c 0041 | A | Store_Top_Unchecked Float,At_Offset_1 060d 00d8 | | Load_Top At_Offset_0 060e 822f | / | Call 0x1,0x2f 060f 0f00 | | Execute_Immediate Equal,0x0 0610 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0611 e402 | | Load 0x2,0x2 0612 8006 | | Call 0x0,0x6 0613 a404 | | Store_Unchecked 0x2,0x4 0614 e404 | | Load 0x2,0x4 0615 00d9 | | Load_Top At_Offset_1 0616 5881 |X | Indirect_Literal Float,0x698,1.57079 0617 023b | ; | Execute Float,Times 0618 023c | < | Execute Float,Minus 0619 e402 | | Load 0x2,0x2 061a e404 | | Load 0x2,0x4 061b 023c | < | Execute Float,Minus 061c 023d | = | Execute Float,Plus 061d 00d9 | | Load_Top At_Offset_1 061e 5875 |Xu | Indirect_Literal Float,0x694,6.326794896619231e-06 061f 023b | ; | Execute Float,Times 0620 023d | = | Execute Float,Plus 0621 a403 | | Store_Unchecked 0x2,0x3 0622 e403 | | Load 0x2,0x3 0623 023e | > | Execute Float,Absolute_Value 0624 586b |Xk | Indirect_Literal Float,0x690,1.4901161193847656e-08 0625 0244 | D | Execute Float,Less 0626 6805 |h | Jump_Zero 0x62c 0627 e403 | | Load 0x2,0x3 0628 a405 | | Store_Unchecked 0x2,0x5 0629 5862 |Xb | Indirect_Literal Float,0x68c,1.0 062a 0043 | C | Store_Top_Uncheched Float,At_Offset_3 062b 782b |x+ | Jump 0x657 062c e403 | | Load 0x2,0x3 062d 00d8 | | Load_Top At_Offset_0 062e 023b | ; | Execute Float,Times 062f a404 | | Store_Unchecked 0x2,0x4 0630 5857 |XW | Indirect_Literal Float,0x688,1.7861707342254424e-05 0631 e404 | | Load 0x2,0x4 0632 023b | ; | Execute Float,Times 0633 023f | ? | Execute Float,Unary_Minus 0634 584f |XO | Indirect_Literal Float,0x684,0.0034248878235890587 0635 023d | = | Execute Float,Plus 0636 e404 | | Load 0x2,0x4 0637 023b | ; | Execute Float,Times 0638 5847 |XG | Indirect_Literal Float,0x680,0.1333835000642196 0639 023c | < | Execute Float,Minus 063a e404 | | Load 0x2,0x4 063b 023b | ; | Execute Float,Times 063c e403 | | Load 0x2,0x3 063d 023b | ; | Execute Float,Times 063e e403 | | Load 0x2,0x3 063f 023d | = | Execute Float,Plus 0640 a405 | | Store_Unchecked 0x2,0x5 0641 583a |X: | Indirect_Literal Float,0x67c,4.981943399378651e-07 0642 e404 | | Load 0x2,0x4 0643 023b | ; | Execute Float,Times 0644 5833 |X3 | Indirect_Literal Float,0x678,0.00031181531907010027 0645 023c | < | Execute Float,Minus 0646 e404 | | Load 0x2,0x4 0647 023b | ; | Execute Float,Times 0648 582b |X+ | Indirect_Literal Float,0x674,0.025663832289440112 0649 023d | = | Execute Float,Plus 064a e404 | | Load 0x2,0x4 064b 023b | ; | Execute Float,Times 064c 5823 |X# | Indirect_Literal Float,0x670,0.46671683339755293 064d 023c | < | Execute Float,Minus 064e e404 | | Load 0x2,0x4 064f 023b | ; | Execute Float,Times 0650 581b |X | Indirect_Literal Float,0x66c,0.5 0651 023d | = | Execute Float,Plus 0652 0043 | C | Store_Top_Uncheched Float,At_Offset_3 0653 00da | | Load_Top At_Offset_2 0654 5817 |X | Indirect_Literal Float,0x66c,0.5 0655 023d | = | Execute Float,Plus 0656 0043 | C | Store_Top_Uncheched Float,At_Offset_3 0657 00d9 | | Load_Top At_Offset_1 0658 7006 |p | Jump_Nonzero 0x65f 0659 00da | | Load_Top At_Offset_2 065a e405 | | Load 0x2,0x5 065b 023f | ? | Execute Float,Unary_Minus 065c 023a | : | Execute Float,Divide 065d a405 | | Store_Unchecked 0x2,0x5 065e 7804 |x | Jump 0x663 065f 00db | | Load_Top At_Offset_3 0660 00db | | Load_Top At_Offset_3 0661 023a | : | Execute Float,Divide 0662 a405 | | Store_Unchecked 0x2,0x5 0663 00db | | Load_Top At_Offset_3 0664 00d8 | | Load_Top At_Offset_0 0665 e20e | | Load 0x1,0xe 0666 0234 | 4 | Execute Float,In_Type 0667 7001 |p | Jump_Nonzero 0x669 0668 0801 | | Execute_Immediate Raise,0x1 0669 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 066a 0000 0000 | | .XXX[0x2] 066c 3fe0 0000 |? | .DBL 0.5 066e 0000 0000 | | 0670 3fdd deb0 |? | .DBL 0.46671683339755293 0672 47fb d9d5 |G | 0674 3f9a 479e |? G | .DBL 0.025663832289440112 0676 a17e 2159 | ~!Y| 0678 3f34 6f64 |?4od| .DBL 0.00031181531907010027 067a 9909 4841 | HA| 067c 3ea0 b774 |> t| .DBL 4.981943399378651e-07 067e f076 78e9 | vx | 0680 3fc1 12b5 |? | .DBL 0.1333835000642196 0682 e54d 08ff | M | 0684 3f6c 0e82 |?l | .DBL 0.0034248878235890587 0686 a63b aade | ; | 0688 3ef2 bab7 |> | .DBL 1.7861707342254424e-05 068a 2ea2 c723 |. #| 068c 3ff0 0000 |? | .DBL 1.0 068e 0000 0000 | | 0690 3e50 0000 |>P | .DBL 1.4901161193847656e-08 0692 0000 0000 | | 0694 3eda 8958 |> X| .DBL 6.326794896619231e-06 0696 238b 74a9 |# t | 0698 3ff9 21f4 |? ! | .DBL 1.57079 069a b1ee 2435 | $5| 069c 3fe4 5f30 |? _0| .DBL 0.6366197723675813 069e 6dc9 c882 |m | 06a0 0000 0000 | | .DBL 0.0 06a2 0000 0000 | | 06a4 4199 21fb |A ! | .DBL 105414357.06657827 06a6 5444 2d18 |TD- | 06a8 ; -------------------------------------------------------------------------------------- 06a8 ; SUBPROGRAM 06a8 ; -------------------------------------------------------------------------------------- 06a8 06ab | | .CONST 0x06ab ; Address of begin 06a9 0004 | | .CONST 0x0004 ; Address of exception handler 06aa 0001 | | .CONST 0x0001 ; Number of locals 06ab BODY_06a8: 06ab INIT_06a8: 06ab 00db | | Load_Top At_Offset_3 06ac 0149 | I | Execute Float,Less_Equal_Zero 06ad 6802 |h | Jump_Zero 0x6b0 06ae e002 | | Load 0x0,0x2 06af 0257 | W | Execute Discrete,Raise 06b0 580b |X | Indirect_Literal Float,0x6bc,6.283185307179586 06b1 00db | | Load_Top At_Offset_3 06b2 023b | ; | Execute Float,Times 06b3 e5fe | | Load 0x2,-0x2 06b4 023a | : | Execute Float,Divide 06b5 e20e | | Load 0x1,0xe 06b6 0232 | 2 | Execute Float,Check_In_Type 06b7 8218 | | Call 0x1,0x18 06b8 e20e | | Load 0x1,0xe 06b9 0232 | 2 | Execute Float,Check_In_Type 06ba 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 06bb 0000 | | .XXX[0x1] 06bc 4019 21fb |@ ! | .DBL 6.283185307179586 06be 5444 2d18 |TD- | 06c0 ; -------------------------------------------------------------------------------------- 06c0 ; SUBPROGRAM 06c0 ; -------------------------------------------------------------------------------------- 06c0 06cc | | .CONST 0x06cc ; Address of begin 06c1 0004 | | .CONST 0x0004 ; Address of exception handler 06c2 0008 | | .CONST 0x0008 ; Number of locals 06c3 INIT_06c0: 06c3 00da | | Load_Top At_Offset_2 06c4 00e6 | | Load_Encached Float_Cache 06c5 03df | | Declare_Variable Float,With_Value 06c6 00e6 | | Load_Encached Float_Cache 06c7 00e6 | | Load_Encached Float_Cache 06c8 00e6 | | Load_Encached Float_Cache 06c9 00e6 | | Load_Encached Float_Cache 06ca 00e1 | | Load_Encached Boolean_Cache 06cb 00e6 | | Load_Encached Float_Cache 06cc BODY_06c0: 06cc e402 | | Load 0x2,0x2 06cd 023e | > | Execute Float,Absolute_Value 06ce a403 | | Store_Unchecked 0x2,0x3 06cf e403 | | Load 0x2,0x3 06d0 58c7 |X | Indirect_Literal Float,0x798,5e-324 06d1 0244 | D | Execute Float,Less 06d2 6814 |h | Jump_Zero 0x6e7 06d3 e402 | | Load 0x2,0x2 06d4 7001 |p | Jump_Nonzero 0x6d6 06d5 08e0 | | Execute_Immediate Raise,0xe0 06d6 e402 | | Load 0x2,0x2 06d7 014b | K | Execute Float,Less_Zero 06d8 6807 |h | Jump_Zero 0x6e0 06d9 58ba |X | Indirect_Literal Float,0x794,-1.7976931348623157e+308 06da 00d8 | | Load_Top At_Offset_0 06db e20e | | Load 0x1,0xe 06dc 0234 | 4 | Execute Float,In_Type 06dd 7001 |p | Jump_Nonzero 0x6df 06de 0801 | | Execute_Immediate Raise,0x1 06df 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06e0 58af |X | Indirect_Literal Float,0x790,1.7976931348623157e+308 06e1 00d8 | | Load_Top At_Offset_0 06e2 e20e | | Load 0x1,0xe 06e3 0234 | 4 | Execute Float,In_Type 06e4 7001 |p | Jump_Nonzero 0x6e6 06e5 0801 | | Execute_Immediate Raise,0x1 06e6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06e7 e403 | | Load 0x2,0x3 06e8 58a3 |X | Indirect_Literal Float,0x78c,105414357.06657827 06e9 8006 | | Call 0x0,0x6 06ea 0245 | E | Execute Float,Greater 06eb 6804 |h | Jump_Zero 0x6f0 06ec 589b |X | Indirect_Literal Float,0x788,0.0 06ed e20e | | Load 0x1,0xe 06ee 0232 | 2 | Execute Float,Check_In_Type 06ef 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06f0 e402 | | Load 0x2,0x2 06f1 5892 |X | Indirect_Literal Float,0x784,0.6366197723675813 06f2 023b | ; | Execute Float,Times 06f3 8007 | | Call 0x0,0x7 06f4 0041 | A | Store_Top_Unchecked Float,At_Offset_1 06f5 00d8 | | Load_Top At_Offset_0 06f6 822f | / | Call 0x1,0x2f 06f7 0f00 | | Execute_Immediate Equal,0x0 06f8 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 06f9 e402 | | Load 0x2,0x2 06fa 8006 | | Call 0x0,0x6 06fb a404 | | Store_Unchecked 0x2,0x4 06fc e404 | | Load 0x2,0x4 06fd 00d9 | | Load_Top At_Offset_1 06fe 5881 |X | Indirect_Literal Float,0x780,1.57080078125 06ff 023b | ; | Execute Float,Times 0700 023c | < | Execute Float,Minus 0701 e402 | | Load 0x2,0x2 0702 e404 | | Load 0x2,0x4 0703 023c | < | Execute Float,Minus 0704 023d | = | Execute Float,Plus 0705 00d9 | | Load_Top At_Offset_1 0706 5875 |Xu | Indirect_Literal Float,0x77c,4.454455103387068e-06 0707 023b | ; | Execute Float,Times 0708 023d | = | Execute Float,Plus 0709 a403 | | Store_Unchecked 0x2,0x3 070a e403 | | Load 0x2,0x3 070b 023e | > | Execute Float,Absolute_Value 070c 586b |Xk | Indirect_Literal Float,0x778,1.4901161193847656e-08 070d 0244 | D | Execute Float,Less 070e 6805 |h | Jump_Zero 0x714 070f e403 | | Load 0x2,0x3 0710 a405 | | Store_Unchecked 0x2,0x5 0711 5862 |Xb | Indirect_Literal Float,0x774,1.0 0712 0043 | C | Store_Top_Uncheched Float,At_Offset_3 0713 782b |x+ | Jump 0x73f 0714 e403 | | Load 0x2,0x3 0715 00d8 | | Load_Top At_Offset_0 0716 023b | ; | Execute Float,Times 0717 a404 | | Store_Unchecked 0x2,0x4 0718 5857 |XW | Indirect_Literal Float,0x770,1.7861707342254424e-05 0719 e404 | | Load 0x2,0x4 071a 023b | ; | Execute Float,Times 071b 023f | ? | Execute Float,Unary_Minus 071c 584f |XO | Indirect_Literal Float,0x76c,0.0034248878235890587 071d 023d | = | Execute Float,Plus 071e e404 | | Load 0x2,0x4 071f 023b | ; | Execute Float,Times 0720 5847 |XG | Indirect_Literal Float,0x768,0.1333835000642196 0721 023c | < | Execute Float,Minus 0722 e404 | | Load 0x2,0x4 0723 023b | ; | Execute Float,Times 0724 e403 | | Load 0x2,0x3 0725 023b | ; | Execute Float,Times 0726 e403 | | Load 0x2,0x3 0727 023d | = | Execute Float,Plus 0728 a405 | | Store_Unchecked 0x2,0x5 0729 583a |X: | Indirect_Literal Float,0x764,4.981943399378651e-07 072a e404 | | Load 0x2,0x4 072b 023b | ; | Execute Float,Times 072c 5833 |X3 | Indirect_Literal Float,0x760,0.00031181531907010027 072d 023c | < | Execute Float,Minus 072e e404 | | Load 0x2,0x4 072f 023b | ; | Execute Float,Times 0730 582b |X+ | Indirect_Literal Float,0x75c,0.025663832289440112 0731 023d | = | Execute Float,Plus 0732 e404 | | Load 0x2,0x4 0733 023b | ; | Execute Float,Times 0734 5823 |X# | Indirect_Literal Float,0x758,0.46671683339755293 0735 023c | < | Execute Float,Minus 0736 e404 | | Load 0x2,0x4 0737 023b | ; | Execute Float,Times 0738 581b |X | Indirect_Literal Float,0x754,0.5 0739 023d | = | Execute Float,Plus 073a 0043 | C | Store_Top_Uncheched Float,At_Offset_3 073b 00da | | Load_Top At_Offset_2 073c 5817 |X | Indirect_Literal Float,0x754,0.5 073d 023d | = | Execute Float,Plus 073e 0043 | C | Store_Top_Uncheched Float,At_Offset_3 073f 00d9 | | Load_Top At_Offset_1 0740 7006 |p | Jump_Nonzero 0x747 0741 00db | | Load_Top At_Offset_3 0742 00db | | Load_Top At_Offset_3 0743 023a | : | Execute Float,Divide 0744 023f | ? | Execute Float,Unary_Minus 0745 a405 | | Store_Unchecked 0x2,0x5 0746 7804 |x | Jump 0x74b 0747 00da | | Load_Top At_Offset_2 0748 e405 | | Load 0x2,0x5 0749 023a | : | Execute Float,Divide 074a a405 | | Store_Unchecked 0x2,0x5 074b 00db | | Load_Top At_Offset_3 074c 00d8 | | Load_Top At_Offset_0 074d e20e | | Load 0x1,0xe 074e 0234 | 4 | Execute Float,In_Type 074f 7001 |p | Jump_Nonzero 0x751 0750 0801 | | Execute_Immediate Raise,0x1 0751 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0752 0000 0000 | | .XXX[0x2] 0754 3fe0 0000 |? | .DBL 0.5 0756 0000 0000 | | 0758 3fdd deb0 |? | .DBL 0.46671683339755293 075a 47fb d9d5 |G | 075c 3f9a 479e |? G | .DBL 0.025663832289440112 075e a17e 2159 | ~!Y| 0760 3f34 6f64 |?4od| .DBL 0.00031181531907010027 0762 9909 4841 | HA| 0764 3ea0 b774 |> t| .DBL 4.981943399378651e-07 0766 f076 78e9 | vx | 0768 3fc1 12b5 |? | .DBL 0.1333835000642196 076a e54d 08ff | M | 076c 3f6c 0e82 |?l | .DBL 0.0034248878235890587 076e a63b aade | ; | 0770 3ef2 bab7 |> | .DBL 1.7861707342254424e-05 0772 2ea2 c723 |. #| 0774 3ff0 0000 |? | .DBL 1.0 0776 0000 0000 | | 0778 3e50 0000 |>P | .DBL 1.4901161193847656e-08 077a 0000 0000 | | 077c 3ed2 aeef |> | .DBL 4.454455103387068e-06 077e 4b9f 02ab |K | 0780 3ff9 2200 |? " | .DBL 1.57080078125 0782 0000 0000 | | 0784 3fe4 5f30 |? _0| .DBL 0.6366197723675813 0786 6dc9 c882 |m | 0788 0000 0000 | | .DBL 0.0 078a 0000 0000 | | 078c 4199 21fb |A ! | .DBL 105414357.06657827 078e 5444 2d18 |TD- | 0790 7fef ffff | | .DBL 1.7976931348623157e+308 0792 ffff ffff | | 0794 ffef ffff | | .DBL -1.7976931348623157e+308 0796 ffff ffff | | 0798 0000 0000 | | .DBL 5e-324 079a 0000 0001 | | 079c 0000 0000 | | .BLANK 0000[0x4] 07a0 ; -------------------------------------------------------------------------------------- 07a0 ; SUBPROGRAM 07a0 ; -------------------------------------------------------------------------------------- 07a0 07a3 | | .CONST 0x07a3 ; Address of begin 07a1 0004 | | .CONST 0x0004 ; Address of exception handler 07a2 0001 | | .CONST 0x0001 ; Number of locals 07a3 BODY_07a0: 07a3 INIT_07a0: 07a3 00db | | Load_Top At_Offset_3 07a4 0149 | I | Execute Float,Less_Equal_Zero 07a5 6802 |h | Jump_Zero 0x7a8 07a6 e002 | | Load 0x0,0x2 07a7 0257 | W | Execute Discrete,Raise 07a8 580b |X | Indirect_Literal Float,0x7b4,6.283185307179586 07a9 00db | | Load_Top At_Offset_3 07aa 023b | ; | Execute Float,Times 07ab e5fe | | Load 0x2,-0x2 07ac 023a | : | Execute Float,Divide 07ad e20e | | Load 0x1,0xe 07ae 0232 | 2 | Execute Float,Check_In_Type 07af 821a | | Call 0x1,0x1a 07b0 e20e | | Load 0x1,0xe 07b1 0232 | 2 | Execute Float,Check_In_Type 07b2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 07b3 0000 | | .XXX[0x1] 07b4 4019 21fb |@ ! | .DBL 6.283185307179586 07b6 5444 2d18 |TD- | 07b8 ; -------------------------------------------------------------------------------------- 07b8 ; SUBPROGRAM 07b8 ; -------------------------------------------------------------------------------------- 07b8 07c2 | | .CONST 0x07c2 ; Address of begin 07b9 0004 | | .CONST 0x0004 ; Address of exception handler 07ba 0005 | | .CONST 0x0005 ; Number of locals 07bb INIT_07b8: 07bb 00da | | Load_Top At_Offset_2 07bc 023e | > | Execute Float,Absolute_Value 07bd 00e6 | | Load_Encached Float_Cache 07be 03df | | Declare_Variable Float,With_Value 07bf 00e6 | | Load_Encached Float_Cache 07c0 00e6 | | Load_Encached Float_Cache 07c1 00e2 | | Load_Encached Integer_Cache 07c2 BODY_07b8: 07c2 e5ff | | Load 0x2,-0x1 07c3 023e | > | Execute Float,Absolute_Value 07c4 58af |X | Indirect_Literal Float,0x874,1.0 07c5 0245 | E | Execute Float,Greater 07c6 6802 |h | Jump_Zero 0x7c9 07c7 e002 | | Load 0x0,0x2 07c8 0257 | W | Execute Discrete,Raise 07c9 00db | | Load_Top At_Offset_3 07ca 58a5 |X | Indirect_Literal Float,0x870,1.4901161193847656e-08 07cb 0244 | D | Execute Float,Less 07cc 6805 |h | Jump_Zero 0x7d2 07cd 4800 |H | Short_Literal 0x0 07ce 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 07cf 00db | | Load_Top At_Offset_3 07d0 0042 | B | Store_Top_Unchecked Float,At_Offset_2 07d1 785c |x\ | Jump 0x82e 07d2 00db | | Load_Top At_Offset_3 07d3 5898 |X | Indirect_Literal Float,0x86c,0.5 07d4 0245 | E | Execute Float,Greater 07d5 681a |h | Jump_Zero 0x7f0 07d6 4801 |H | Short_Literal 0x1 07d7 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 07d8 5893 |X | Indirect_Literal Float,0x86c,0.5 07d9 e402 | | Load 0x2,0x2 07da 023c | < | Execute Float,Minus 07db 5890 |X | Indirect_Literal Float,0x86c,0.5 07dc 023d | = | Execute Float,Plus 07dd 588a |X | Indirect_Literal Float,0x868,2.0 07de 023a | : | Execute Float,Divide 07df 0043 | C | Store_Top_Uncheched Float,At_Offset_3 07e0 00da | | Load_Top At_Offset_2 07e1 00d8 | | Load_Top At_Offset_0 07e2 e20e | | Load 0x1,0xe 07e3 0234 | 4 | Execute Float,In_Type 07e4 7001 |p | Jump_Nonzero 0x7e6 07e5 0801 | | Execute_Immediate Raise,0x1 07e6 820f | | Call 0x1,0xf 07e7 a402 | | Store_Unchecked 0x2,0x2 07e8 00db | | Load_Top At_Offset_3 07e9 e402 | | Load 0x2,0x2 07ea 023d | = | Execute Float,Plus 07eb 023f | ? | Execute Float,Unary_Minus 07ec a402 | | Store_Unchecked 0x2,0x2 07ed 00da | | Load_Top At_Offset_2 07ee 0042 | B | Store_Top_Unchecked Float,At_Offset_2 07ef 7806 |x | Jump 0x7f6 07f0 4800 |H | Short_Literal 0x0 07f1 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 07f2 00db | | Load_Top At_Offset_3 07f3 e402 | | Load 0x2,0x2 07f4 023b | ; | Execute Float,Times 07f5 0042 | B | Store_Top_Unchecked Float,At_Offset_2 07f6 586d |Xm | Indirect_Literal Float,0x864,0.6967457344735064 07f7 00da | | Load_Top At_Offset_2 07f8 023b | ; | Execute Float,Times 07f9 023f | ? | Execute Float,Unary_Minus 07fa 5865 |Xe | Indirect_Literal Float,0x860,10.152522233806463 07fb 023d | = | Execute Float,Plus 07fc 00da | | Load_Top At_Offset_2 07fd 023b | ; | Execute Float,Times 07fe 585d |X] | Indirect_Literal Float,0x85c,39.68886299750488 07ff 023c | < | Execute Float,Minus 0800 00da | | Load_Top At_Offset_2 0801 023b | ; | Execute Float,Times 0802 5855 |XU | Indirect_Literal Float,0x858,57.20822787789173 0803 023d | = | Execute Float,Plus 0804 00da | | Load_Top At_Offset_2 0805 023b | ; | Execute Float,Times 0806 584d |XM | Indirect_Literal Float,0x854,27.368494524164255 0807 023c | < | Execute Float,Minus 0808 00da | | Load_Top At_Offset_2 0809 023b | ; | Execute Float,Times 080a 00da | | Load_Top At_Offset_2 080b 5844 |XD | Indirect_Literal Float,0x850,23.823859153670238 080c 023c | < | Execute Float,Minus 080d 00db | | Load_Top At_Offset_3 080e 023b | ; | Execute Float,Times 080f 583c |X< | Indirect_Literal Float,0x84c,150.95270841030603 0810 023d | = | Execute Float,Plus 0811 00db | | Load_Top At_Offset_3 0812 023b | ; | Execute Float,Times 0813 5834 |X4 | Indirect_Literal Float,0x848,381.86303361750146 0814 023c | < | Execute Float,Minus 0815 00db | | Load_Top At_Offset_3 0816 023b | ; | Execute Float,Times 0817 582c |X, | Indirect_Literal Float,0x844,417.1443024826041 0818 023d | = | Execute Float,Plus 0819 00db | | Load_Top At_Offset_3 081a 023b | ; | Execute Float,Times 081b 5824 |X$ | Indirect_Literal Float,0x840,164.2109671449856 081c 023c | < | Execute Float,Minus 081d 023a | : | Execute Float,Divide 081e 0043 | C | Store_Top_Uncheched Float,At_Offset_3 081f 00db | | Load_Top At_Offset_3 0820 e402 | | Load 0x2,0x2 0821 e403 | | Load 0x2,0x3 0822 023b | ; | Execute Float,Times 0823 023d | = | Execute Float,Plus 0824 0042 | B | Store_Top_Unchecked Float,At_Offset_2 0825 00d8 | | Load_Top At_Offset_0 0826 0f01 | | Execute_Immediate Equal,0x1 0827 6806 |h | Jump_Zero 0x82e 0828 5813 |X | Indirect_Literal Float,0x83c,0.7853981633974483 0829 5812 |X | Indirect_Literal Float,0x83c,0.7853981633974483 082a 00db | | Load_Top At_Offset_3 082b 023d | = | Execute Float,Plus 082c 023d | = | Execute Float,Plus 082d 0042 | B | Store_Top_Unchecked Float,At_Offset_2 082e e5ff | | Load 0x2,-0x1 082f 014b | K | Execute Float,Less_Zero 0830 6803 |h | Jump_Zero 0x834 0831 00d9 | | Load_Top At_Offset_1 0832 023f | ? | Execute Float,Unary_Minus 0833 0042 | B | Store_Top_Unchecked Float,At_Offset_2 0834 00d9 | | Load_Top At_Offset_1 0835 00d8 | | Load_Top At_Offset_0 0836 e20e | | Load 0x1,0xe 0837 0234 | 4 | Execute Float,In_Type 0838 7001 |p | Jump_Nonzero 0x83a 0839 0801 | | Execute_Immediate Raise,0x1 083a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 083b 0000 | | .XXX[0x1] 083c 3fe9 21fb |? ! | .DBL 0.7853981633974483 083e 5444 2d18 |TD- | 0840 4064 86c0 |@d | .DBL 164.2109671449856 0842 3e2b 87cc |>+ | 0844 407a 124f |@z O| .DBL 417.1443024826041 0846 101e b842 | B| 0848 4077 ddce |@w | .DBL 381.86303361750146 084a fc56 a847 | V G| 084c 4062 de7c |@b || .DBL 150.95270841030603 084e 9659 1c6f | Y o| 0850 4037 d2e8 |@7 | .DBL 23.823859153670238 0852 6ef9 861f |n | 0854 403b 5e55 |@;^U| .DBL 27.368494524164255 0856 a83a 0a62 | : b| 0858 404c 9aa7 |@L | .DBL 57.20822787789173 085a 360a d48a |6 | 085c 4043 d82c |@C ,| .DBL 39.68886299750488 085e a9a6 da9f | | 0860 4024 4e17 |@$N | .DBL 10.152522233806463 0862 64ec 3927 |d 9'| 0864 3fe6 4bbd |? K | .DBL 0.6967457344735064 0866 b5e6 1e64 | d| 0868 4000 0000 |@ | .DBL 2.0 086a 0000 0000 | | 086c 3fe0 0000 |? | .DBL 0.5 086e 0000 0000 | | 0870 3e50 0000 |>P | .DBL 1.4901161193847656e-08 0872 0000 0000 | | 0874 3ff0 0000 |? | .DBL 1.0 0876 0000 0000 | | 0878 ; -------------------------------------------------------------------------------------- 0878 ; SUBPROGRAM 0878 ; -------------------------------------------------------------------------------------- 0878 087b | { | .CONST 0x087b ; Address of begin 0879 0004 | | .CONST 0x0004 ; Address of exception handler 087a 0001 | | .CONST 0x0001 ; Number of locals 087b BODY_0878: 087b INIT_0878: 087b 00db | | Load_Top At_Offset_3 087c 0149 | I | Execute Float,Less_Equal_Zero 087d 6802 |h | Jump_Zero 0x880 087e e002 | | Load 0x0,0x2 087f 0257 | W | Execute Discrete,Raise 0880 00da | | Load_Top At_Offset_2 0881 e20e | | Load 0x1,0xe 0882 0232 | 2 | Execute Float,Check_In_Type 0883 821c | | Call 0x1,0x1c 0884 e5fe | | Load 0x2,-0x2 0885 023b | ; | Execute Float,Times 0886 5805 |X | Indirect_Literal Float,0x88c,0.15915494309189532 0887 023b | ; | Execute Float,Times 0888 e20e | | Load 0x1,0xe 0889 0232 | 2 | Execute Float,Check_In_Type 088a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 088b 0000 | | .XXX[0x1] 088c 3fc4 5f30 |? _0| .DBL 0.15915494309189532 088e 6dc9 c882 |m | 0890 ; -------------------------------------------------------------------------------------- 0890 ; SUBPROGRAM 0890 ; -------------------------------------------------------------------------------------- 0890 089d | | .CONST 0x089d ; Address of begin 0891 0004 | | .CONST 0x0004 ; Address of exception handler 0892 0006 | | .CONST 0x0006 ; Number of locals 0893 INIT_0890: 0893 00da | | Load_Top At_Offset_2 0894 00e6 | | Load_Encached Float_Cache 0895 03df | | Declare_Variable Float,With_Value 0896 00db | | Load_Top At_Offset_3 0897 023e | > | Execute Float,Absolute_Value 0898 00e6 | | Load_Encached Float_Cache 0899 03df | | Declare_Variable Float,With_Value 089a 00e6 | | Load_Encached Float_Cache 089b 00e6 | | Load_Encached Float_Cache 089c 00e2 | | Load_Encached Integer_Cache 089d BODY_0890: 089d 00db | | Load_Top At_Offset_3 089e 58c5 |X | Indirect_Literal Float,0x964,1.0 089f 0245 | E | Execute Float,Greater 08a0 6802 |h | Jump_Zero 0x8a3 08a1 e002 | | Load 0x0,0x2 08a2 0257 | W | Execute Discrete,Raise 08a3 00db | | Load_Top At_Offset_3 08a4 58bb |X | Indirect_Literal Float,0x960,1.4901161193847656e-08 08a5 0244 | D | Execute Float,Less 08a6 6805 |h | Jump_Zero 0x8ac 08a7 4801 |H | Short_Literal 0x1 08a8 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 08a9 00db | | Load_Top At_Offset_3 08aa 0042 | B | Store_Top_Unchecked Float,At_Offset_2 08ab 7853 |xS | Jump 0x8ff 08ac 00db | | Load_Top At_Offset_3 08ad 58ae |X | Indirect_Literal Float,0x95c,0.5 08ae 0245 | E | Execute Float,Greater 08af 681a |h | Jump_Zero 0x8ca 08b0 4800 |H | Short_Literal 0x0 08b1 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 08b2 58a9 |X | Indirect_Literal Float,0x95c,0.5 08b3 e403 | | Load 0x2,0x3 08b4 023c | < | Execute Float,Minus 08b5 58a6 |X | Indirect_Literal Float,0x95c,0.5 08b6 023d | = | Execute Float,Plus 08b7 58a0 |X | Indirect_Literal Float,0x958,2.0 08b8 023a | : | Execute Float,Divide 08b9 0043 | C | Store_Top_Uncheched Float,At_Offset_3 08ba 00da | | Load_Top At_Offset_2 08bb 00d8 | | Load_Top At_Offset_0 08bc e20e | | Load 0x1,0xe 08bd 0234 | 4 | Execute Float,In_Type 08be 7001 |p | Jump_Nonzero 0x8c0 08bf 0801 | | Execute_Immediate Raise,0x1 08c0 820f | | Call 0x1,0xf 08c1 a403 | | Store_Unchecked 0x2,0x3 08c2 00db | | Load_Top At_Offset_3 08c3 e403 | | Load 0x2,0x3 08c4 023d | = | Execute Float,Plus 08c5 023f | ? | Execute Float,Unary_Minus 08c6 a403 | | Store_Unchecked 0x2,0x3 08c7 00da | | Load_Top At_Offset_2 08c8 0042 | B | Store_Top_Unchecked Float,At_Offset_2 08c9 7806 |x | Jump 0x8d0 08ca 4801 |H | Short_Literal 0x1 08cb 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 08cc 00db | | Load_Top At_Offset_3 08cd e403 | | Load 0x2,0x3 08ce 023b | ; | Execute Float,Times 08cf 0042 | B | Store_Top_Unchecked Float,At_Offset_2 08d0 5883 |X | Indirect_Literal Float,0x954,0.6967457344735064 08d1 00da | | Load_Top At_Offset_2 08d2 023b | ; | Execute Float,Times 08d3 023f | ? | Execute Float,Unary_Minus 08d4 587b |X{ | Indirect_Literal Float,0x950,10.152522233806463 08d5 023d | = | Execute Float,Plus 08d6 00da | | Load_Top At_Offset_2 08d7 023b | ; | Execute Float,Times 08d8 5873 |Xs | Indirect_Literal Float,0x94c,39.68886299750488 08d9 023c | < | Execute Float,Minus 08da 00da | | Load_Top At_Offset_2 08db 023b | ; | Execute Float,Times 08dc 586b |Xk | Indirect_Literal Float,0x948,57.20822787789173 08dd 023d | = | Execute Float,Plus 08de 00da | | Load_Top At_Offset_2 08df 023b | ; | Execute Float,Times 08e0 5863 |Xc | Indirect_Literal Float,0x944,27.368494524164255 08e1 023c | < | Execute Float,Minus 08e2 00da | | Load_Top At_Offset_2 08e3 023b | ; | Execute Float,Times 08e4 00da | | Load_Top At_Offset_2 08e5 585a |XZ | Indirect_Literal Float,0x940,23.823859153670238 08e6 023c | < | Execute Float,Minus 08e7 00db | | Load_Top At_Offset_3 08e8 023b | ; | Execute Float,Times 08e9 5852 |XR | Indirect_Literal Float,0x93c,150.95270841030603 08ea 023d | = | Execute Float,Plus 08eb 00db | | Load_Top At_Offset_3 08ec 023b | ; | Execute Float,Times 08ed 584a |XJ | Indirect_Literal Float,0x938,381.86303361750146 08ee 023c | < | Execute Float,Minus 08ef 00db | | Load_Top At_Offset_3 08f0 023b | ; | Execute Float,Times 08f1 5842 |XB | Indirect_Literal Float,0x934,417.1443024826041 08f2 023d | = | Execute Float,Plus 08f3 00db | | Load_Top At_Offset_3 08f4 023b | ; | Execute Float,Times 08f5 583a |X: | Indirect_Literal Float,0x930,164.2109671449856 08f6 023c | < | Execute Float,Minus 08f7 023a | : | Execute Float,Divide 08f8 0043 | C | Store_Top_Uncheched Float,At_Offset_3 08f9 00db | | Load_Top At_Offset_3 08fa e403 | | Load 0x2,0x3 08fb e404 | | Load 0x2,0x4 08fc 023b | ; | Execute Float,Times 08fd 023d | = | Execute Float,Plus 08fe 0042 | B | Store_Top_Unchecked Float,At_Offset_2 08ff e402 | | Load 0x2,0x2 0900 014b | K | Execute Float,Less_Zero 0901 6811 |h | Jump_Zero 0x913 0902 00d8 | | Load_Top At_Offset_0 0903 0f01 | | Execute_Immediate Equal,0x1 0904 6807 |h | Jump_Zero 0x90c 0905 5826 |X& | Indirect_Literal Float,0x92c,0.7853981633974483 0906 5825 |X% | Indirect_Literal Float,0x92c,0.7853981633974483 0907 00db | | Load_Top At_Offset_3 0908 023d | = | Execute Float,Plus 0909 023d | = | Execute Float,Plus 090a 0042 | B | Store_Top_Unchecked Float,At_Offset_2 090b 7814 |x | Jump 0x920 090c 581b |X | Indirect_Literal Float,0x928,1.5707963267948966 090d 581a |X | Indirect_Literal Float,0x928,1.5707963267948966 090e 00db | | Load_Top At_Offset_3 090f 023d | = | Execute Float,Plus 0910 023d | = | Execute Float,Plus 0911 0042 | B | Store_Top_Unchecked Float,At_Offset_2 0912 780d |x | Jump 0x920 0913 00d8 | | Load_Top At_Offset_0 0914 0f01 | | Execute_Immediate Equal,0x1 0915 6807 |h | Jump_Zero 0x91d 0916 5815 |X | Indirect_Literal Float,0x92c,0.7853981633974483 0917 5814 |X | Indirect_Literal Float,0x92c,0.7853981633974483 0918 00db | | Load_Top At_Offset_3 0919 023c | < | Execute Float,Minus 091a 023d | = | Execute Float,Plus 091b 0042 | B | Store_Top_Unchecked Float,At_Offset_2 091c 7803 |x | Jump 0x920 091d 00d9 | | Load_Top At_Offset_1 091e 023f | ? | Execute Float,Unary_Minus 091f 0042 | B | Store_Top_Unchecked Float,At_Offset_2 0920 00d9 | | Load_Top At_Offset_1 0921 00d8 | | Load_Top At_Offset_0 0922 e20e | | Load 0x1,0xe 0923 0234 | 4 | Execute Float,In_Type 0924 7001 |p | Jump_Nonzero 0x926 0925 0801 | | Execute_Immediate Raise,0x1 0926 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0927 0000 | | .XXX[0x1] 0928 3ff9 21fb |? ! | .DBL 1.5707963267948966 092a 5444 2d18 |TD- | 092c 3fe9 21fb |? ! | .DBL 0.7853981633974483 092e 5444 2d18 |TD- | 0930 4064 86c0 |@d | .DBL 164.2109671449856 0932 3e2b 87cc |>+ | 0934 407a 124f |@z O| .DBL 417.1443024826041 0936 101e b842 | B| 0938 4077 ddce |@w | .DBL 381.86303361750146 093a fc56 a847 | V G| 093c 4062 de7c |@b || .DBL 150.95270841030603 093e 9659 1c6f | Y o| 0940 4037 d2e8 |@7 | .DBL 23.823859153670238 0942 6ef9 861f |n | 0944 403b 5e55 |@;^U| .DBL 27.368494524164255 0946 a83a 0a62 | : b| 0948 404c 9aa7 |@L | .DBL 57.20822787789173 094a 360a d48a |6 | 094c 4043 d82c |@C ,| .DBL 39.68886299750488 094e a9a6 da9f | | 0950 4024 4e17 |@$N | .DBL 10.152522233806463 0952 64ec 3927 |d 9'| 0954 3fe6 4bbd |? K | .DBL 0.6967457344735064 0956 b5e6 1e64 | d| 0958 4000 0000 |@ | .DBL 2.0 095a 0000 0000 | | 095c 3fe0 0000 |? | .DBL 0.5 095e 0000 0000 | | 0960 3e50 0000 |>P | .DBL 1.4901161193847656e-08 0962 0000 0000 | | 0964 3ff0 0000 |? | .DBL 1.0 0966 0000 0000 | | 0968 ; -------------------------------------------------------------------------------------- 0968 ; SUBPROGRAM 0968 ; -------------------------------------------------------------------------------------- 0968 096b | k | .CONST 0x096b ; Address of begin 0969 0004 | | .CONST 0x0004 ; Address of exception handler 096a 0001 | | .CONST 0x0001 ; Number of locals 096b BODY_0968: 096b INIT_0968: 096b 00da | | Load_Top At_Offset_2 096c 023e | > | Execute Float,Absolute_Value 096d 5ff6 |_ | Indirect_Literal Float,0x964,1.0 096e 0245 | E | Execute Float,Greater 096f e5fe | | Load 0x2,-0x2 0970 0149 | I | Execute Float,Less_Equal_Zero 0971 0278 | x | Execute Discrete,Or 0972 6802 |h | Jump_Zero 0x975 0973 e002 | | Load 0x0,0x2 0974 0257 | W | Execute Discrete,Raise 0975 00da | | Load_Top At_Offset_2 0976 e20e | | Load 0x1,0xe 0977 0232 | 2 | Execute Float,Check_In_Type 0978 821e | | Call 0x1,0x1e 0979 e5fe | | Load 0x2,-0x2 097a 023b | ; | Execute Float,Times 097b 5804 |X | Indirect_Literal Float,0x980,0.15915494309189532 097c 023b | ; | Execute Float,Times 097d e20e | | Load 0x1,0xe 097e 0232 | 2 | Execute Float,Check_In_Type 097f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0980 3fc4 5f30 |? _0| .DBL 0.15915494309189532 0982 6dc9 c882 |m | 0984 0000 0000 | | .BLANK 0000[0x4] 0988 ; -------------------------------------------------------------------------------------- 0988 ; SUBPROGRAM 0988 ; -------------------------------------------------------------------------------------- 0988 0993 | | .CONST 0x0993 ; Address of begin 0989 0004 | | .CONST 0x0004 ; Address of exception handler 098a 0006 | | .CONST 0x0006 ; Number of locals 098b INIT_0988: 098b 00e6 | | Load_Encached Float_Cache 098c 00e6 | | Load_Encached Float_Cache 098d 00e6 | | Load_Encached Float_Cache 098e 00e6 | | Load_Encached Float_Cache 098f 4800 |H | Short_Literal 0x0 0990 4803 |H | Short_Literal 0x3 0991 00e3 | | Load_Encached Natural_Cache 0992 03f8 | | Declare_Type Discrete,Constrained 0993 BODY_0988: 0993 e5fe | | Load 0x2,-0x2 0994 700f |p | Jump_Nonzero 0x9a4 0995 e5ff | | Load 0x2,-0x1 0996 7002 |p | Jump_Nonzero 0x999 0997 e002 | | Load 0x0,0x2 0998 0257 | W | Execute Discrete,Raise 0999 e5ff | | Load 0x2,-0x1 099a 014c | L | Execute Float,Greater_Zero 099b 6804 |h | Jump_Zero 0x9a0 099c 58e7 |X | Indirect_Literal Float,0xa84,1.5707963267948966 099d e20e | | Load 0x1,0xe 099e 0232 | 2 | Execute Float,Check_In_Type 099f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 09a0 58df |X | Indirect_Literal Float,0xa80,-1.5707963267948966 09a1 e20e | | Load 0x1,0xe 09a2 0232 | 2 | Execute Float,Check_In_Type 09a3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 09a4 e5ff | | Load 0x2,-0x1 09a5 700b |p | Jump_Nonzero 0x9b1 09a6 e5fe | | Load 0x2,-0x2 09a7 014c | L | Execute Float,Greater_Zero 09a8 6804 |h | Jump_Zero 0x9ad 09a9 58d2 |X | Indirect_Literal Float,0xa7c,0.0 09aa e20e | | Load 0x1,0xe 09ab 0232 | 2 | Execute Float,Check_In_Type 09ac 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 09ad 58ca |X | Indirect_Literal Float,0xa78,3.141592653589793 09ae e20e | | Load 0x1,0xe 09af 0232 | 2 | Execute Float,Check_In_Type 09b0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 09b1 e5fe | | Load 0x2,-0x2 09b2 58c1 |X | Indirect_Literal Float,0xa74,1.0 09b3 0247 | G | Execute Float,Equal 09b4 6803 |h | Jump_Zero 0x9b8 09b5 e5ff | | Load 0x2,-0x1 09b6 a402 | | Store_Unchecked 0x2,0x2 09b7 7804 |x | Jump 0x9bc 09b8 e5ff | | Load 0x2,-0x1 09b9 e5fe | | Load 0x2,-0x2 09ba 023a | : | Execute Float,Divide 09bb a402 | | Store_Unchecked 0x2,0x2 09bc e402 | | Load 0x2,0x2 09bd 023e | > | Execute Float,Absolute_Value 09be a403 | | Store_Unchecked 0x2,0x3 09bf 00db | | Load_Top At_Offset_3 09c0 58b3 |X | Indirect_Literal Float,0xa74,1.0 09c1 0245 | E | Execute Float,Greater 09c2 6807 |h | Jump_Zero 0x9ca 09c3 58b0 |X | Indirect_Literal Float,0xa74,1.0 09c4 e403 | | Load 0x2,0x3 09c5 023a | : | Execute Float,Divide 09c6 a403 | | Store_Unchecked 0x2,0x3 09c7 4802 |H | Short_Literal 0x2 09c8 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 09c9 7802 |x | Jump 0x9cc 09ca 4800 |H | Short_Literal 0x0 09cb 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 09cc 00db | | Load_Top At_Offset_3 09cd 58a2 |X | Indirect_Literal Float,0xa70,0.2679491924311227 09ce 0245 | E | Execute Float,Greater 09cf 6811 |h | Jump_Zero 0x9e1 09d0 589b |X | Indirect_Literal Float,0xa6c,0.7320508075688772 09d1 e403 | | Load 0x2,0x3 09d2 023b | ; | Execute Float,Times 09d3 5894 |X | Indirect_Literal Float,0xa68,0.5 09d4 023c | < | Execute Float,Minus 09d5 5892 |X | Indirect_Literal Float,0xa68,0.5 09d6 023c | < | Execute Float,Minus 09d7 e403 | | Load 0x2,0x3 09d8 023d | = | Execute Float,Plus 09d9 588a |X | Indirect_Literal Float,0xa64,1.7320508075688772 09da e403 | | Load 0x2,0x3 09db 023d | = | Execute Float,Plus 09dc 023a | : | Execute Float,Divide 09dd a403 | | Store_Unchecked 0x2,0x3 09de 00d8 | | Load_Top At_Offset_0 09df 0a01 | | Execute_Immediate Plus,0x1 09e0 0059 | Y | Store_Top Discrete,At_Offset_1 09e1 00db | | Load_Top At_Offset_3 09e2 023e | > | Execute Float,Absolute_Value 09e3 587c |X| | Indirect_Literal Float,0xa60,1.4901161193847656e-08 09e4 0243 | C | Execute Float,Greater_Equal 09e5 682b |h+ | Jump_Zero 0xa11 09e6 00db | | Load_Top At_Offset_3 09e7 e403 | | Load 0x2,0x3 09e8 023b | ; | Execute Float,Times 09e9 0043 | C | Store_Top_Uncheched Float,At_Offset_3 09ea 5871 |Xq | Indirect_Literal Float,0xa5c,0.8375829936815006 09eb 00db | | Load_Top At_Offset_3 09ec 023b | ; | Execute Float,Times 09ed 023f | ? | Execute Float,Unary_Minus 09ee 5869 |Xi | Indirect_Literal Float,0xa58,8.494624035132068 09ef 023c | < | Execute Float,Minus 09f0 00db | | Load_Top At_Offset_3 09f1 023b | ; | Execute Float,Times 09f2 5861 |Xa | Indirect_Literal Float,0xa54,20.50585519586165 09f3 023c | < | Execute Float,Minus 09f4 00db | | Load_Top At_Offset_3 09f5 023b | ; | Execute Float,Times 09f6 5859 |XY | Indirect_Literal Float,0xa50,13.688768894191925 09f7 023c | < | Execute Float,Minus 09f8 00db | | Load_Top At_Offset_3 09f9 023b | ; | Execute Float,Times 09fa 00db | | Load_Top At_Offset_3 09fb 5850 |XP | Indirect_Literal Float,0xa4c,15.024001160028575 09fc 023d | = | Execute Float,Plus 09fd e404 | | Load 0x2,0x4 09fe 023b | ; | Execute Float,Times 09ff 5848 |XH | Indirect_Literal Float,0xa48,59.57843614259734 0a00 023d | = | Execute Float,Plus 0a01 e404 | | Load 0x2,0x4 0a02 023b | ; | Execute Float,Times 0a03 5840 |X@ | Indirect_Literal Float,0xa44,86.15734959713023 0a04 023d | = | Execute Float,Plus 0a05 e404 | | Load 0x2,0x4 0a06 023b | ; | Execute Float,Times 0a07 5838 |X8 | Indirect_Literal Float,0xa40,41.06630668257578 0a08 023d | = | Execute Float,Plus 0a09 023a | : | Execute Float,Divide 0a0a 0042 | B | Store_Top_Unchecked Float,At_Offset_2 0a0b 00db | | Load_Top At_Offset_3 0a0c e403 | | Load 0x2,0x3 0a0d 00db | | Load_Top At_Offset_3 0a0e 023b | ; | Execute Float,Times 0a0f 023d | = | Execute Float,Plus 0a10 a403 | | Store_Unchecked 0x2,0x3 0a11 00d8 | | Load_Top At_Offset_0 0a12 0c02 | | Execute_Immediate Greater_Equal,0x2 0a13 6803 |h | Jump_Zero 0xa17 0a14 00db | | Load_Top At_Offset_3 0a15 023f | ? | Execute Float,Unary_Minus 0a16 a403 | | Store_Unchecked 0x2,0x3 0a17 00d8 | | Load_Top At_Offset_0 0a18 4603 |F | Jump_Case 0x4 0a19 7811 |x | Jump 0xa2b ; case 0x0 0a1a 7807 |x | Jump 0xa22 ; case 0x1 0a1b 780b |x | Jump 0xa27 ; case 0x2 0a1c 7800 |x | Jump 0xa1d ; case 0x3 0a1d 00db | | Load_Top At_Offset_3 0a1e 581d |X | Indirect_Literal Float,0xa3c,1.0471975511965976 0a1f 023d | = | Execute Float,Plus 0a20 a403 | | Store_Unchecked 0x2,0x3 0a21 7809 |x | Jump 0xa2b 0a22 00db | | Load_Top At_Offset_3 0a23 5814 |X | Indirect_Literal Float,0xa38,0.5235987755982988 0a24 023d | = | Execute Float,Plus 0a25 a403 | | Store_Unchecked 0x2,0x3 0a26 7804 |x | Jump 0xa2b 0a27 00db | | Load_Top At_Offset_3 0a28 585b |X[ | Indirect_Literal Float,0xa84,1.5707963267948966 0a29 023d | = | Execute Float,Plus 0a2a a403 | | Store_Unchecked 0x2,0x3 0a2b e402 | | Load 0x2,0x2 0a2c 014b | K | Execute Float,Less_Zero 0a2d 6803 |h | Jump_Zero 0xa31 0a2e 00db | | Load_Top At_Offset_3 0a2f 023f | ? | Execute Float,Unary_Minus 0a30 a403 | | Store_Unchecked 0x2,0x3 0a31 00db | | Load_Top At_Offset_3 0a32 00d8 | | Load_Top At_Offset_0 0a33 e20e | | Load 0x1,0xe 0a34 0234 | 4 | Execute Float,In_Type 0a35 7001 |p | Jump_Nonzero 0xa37 0a36 0801 | | Execute_Immediate Raise,0x1 0a37 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0a38 3fe0 c152 |? R| .DBL 0.5235987755982988 0a3a 382d 7365 |8-se| 0a3c 3ff0 c152 |? R| .DBL 1.0471975511965976 0a3e 382d 7365 |8-se| 0a40 4044 887c |@D || .DBL 41.06630668257578 0a42 bcc4 95a9 | | 0a44 4055 8a12 |@U | .DBL 86.15734959713023 0a46 040b 6da4 | m | 0a48 404d ca0a |@M | .DBL 59.57843614259734 0a4a 320d a3d6 |2 | 0a4c 402e 0c49 |@. I| .DBL 15.024001160028575 0a4e e14a c710 | J | 0a50 402b 60a6 |@+` | .DBL 13.688768894191925 0a52 5106 1ce1 |Q | 0a54 4034 817f |@4 | .DBL 20.50585519586165 0a56 b9e2 bcca | | 0a58 4020 fd3f |@ ?| .DBL 8.494624035132068 0a5a 5c8d 6a63 |\ jc| 0a5c 3fea cd7a |? z| .DBL 0.8375829936815006 0a5e d9b1 87bd | | 0a60 3e50 0000 |>P | .DBL 1.4901161193847656e-08 0a62 0000 0000 | | 0a64 3ffb b67a |? z| .DBL 1.7320508075688772 0a66 e858 4caa | XL | 0a68 3fe0 0000 |? | .DBL 0.5 0a6a 0000 0000 | | 0a6c 3fe7 6cf5 |? l | .DBL 0.7320508075688772 0a6e d0b0 9954 | T| 0a70 3fd1 2614 |? & | .DBL 0.2679491924311227 0a72 5e9e cd56 |^ V| 0a74 3ff0 0000 |? | .DBL 1.0 0a76 0000 0000 | | 0a78 4009 21fb |@ ! | .DBL 3.141592653589793 0a7a 5444 2d18 |TD- | 0a7c 0000 0000 | | .DBL 0.0 0a7e 0000 0000 | | 0a80 bff9 21fb | ! | .DBL -1.5707963267948966 0a82 5444 2d18 |TD- | 0a84 3ff9 21fb |? ! | .DBL 1.5707963267948966 0a86 5444 2d18 |TD- | 0a88 ; -------------------------------------------------------------------------------------- 0a88 ; SUBPROGRAM 0a88 ; -------------------------------------------------------------------------------------- 0a88 0a8b | | .CONST 0x0a8b ; Address of begin 0a89 0004 | | .CONST 0x0004 ; Address of exception handler 0a8a 0001 | | .CONST 0x0001 ; Number of locals 0a8b BODY_0a88: 0a8b INIT_0a88: 0a8b e5fd | | Load 0x2,-0x3 0a8c 0149 | I | Execute Float,Less_Equal_Zero 0a8d 6802 |h | Jump_Zero 0xa90 0a8e e002 | | Load 0x0,0x2 0a8f 0257 | W | Execute Discrete,Raise 0a90 00db | | Load_Top At_Offset_3 0a91 e20e | | Load 0x1,0xe 0a92 0232 | 2 | Execute Float,Check_In_Type 0a93 00db | | Load_Top At_Offset_3 0a94 e20e | | Load 0x1,0xe 0a95 0232 | 2 | Execute Float,Check_In_Type 0a96 8220 | | Call 0x1,0x20 0a97 e5fd | | Load 0x2,-0x3 0a98 023b | ; | Execute Float,Times 0a99 5806 |X | Indirect_Literal Float,0xaa0,0.15915494309189532 0a9a 023b | ; | Execute Float,Times 0a9b e20e | | Load 0x1,0xe 0a9c 0232 | 2 | Execute Float,Check_In_Type 0a9d 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0a9e 0000 0000 | | .XXX[0x2] 0aa0 3fc4 5f30 |? _0| .DBL 0.15915494309189532 0aa2 6dc9 c882 |m | 0aa4 0000 0000 | | .BLANK 0000[0x4] 0aa8 ; -------------------------------------------------------------------------------------- 0aa8 ; SUBPROGRAM 0aa8 ; -------------------------------------------------------------------------------------- 0aa8 0aab | | .CONST 0x0aab ; Address of begin 0aa9 0004 | | .CONST 0x0004 ; Address of exception handler 0aaa 0001 | | .CONST 0x0001 ; Number of locals 0aab BODY_0aa8: 0aab INIT_0aa8: 0aab 00da | | Load_Top At_Offset_2 0aac e20e | | Load 0x1,0xe 0aad 0232 | 2 | Execute Float,Check_In_Type 0aae e5fe | | Load 0x2,-0x2 0aaf e20e | | Load 0x1,0xe 0ab0 0232 | 2 | Execute Float,Check_In_Type 0ab1 8220 | | Call 0x1,0x20 0ab2 e20e | | Load 0x1,0xe 0ab3 0232 | 2 | Execute Float,Check_In_Type 0ab4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0ab5 0000 0000 | | .XXX[0x3] 0ab7 0000 | | 0ab8 ; -------------------------------------------------------------------------------------- 0ab8 ; SUBPROGRAM 0ab8 ; -------------------------------------------------------------------------------------- 0ab8 0abb | | .CONST 0x0abb ; Address of begin 0ab9 0004 | | .CONST 0x0004 ; Address of exception handler 0aba 0001 | | .CONST 0x0001 ; Number of locals 0abb BODY_0ab8: 0abb INIT_0ab8: 0abb e5fd | | Load 0x2,-0x3 0abc 0149 | I | Execute Float,Less_Equal_Zero 0abd 6802 |h | Jump_Zero 0xac0 0abe e002 | | Load 0x0,0x2 0abf 0257 | W | Execute Discrete,Raise 0ac0 00db | | Load_Top At_Offset_3 0ac1 e20e | | Load 0x1,0xe 0ac2 0232 | 2 | Execute Float,Check_In_Type 0ac3 00db | | Load_Top At_Offset_3 0ac4 e20e | | Load 0x1,0xe 0ac5 0232 | 2 | Execute Float,Check_In_Type 0ac6 8222 | " | Call 0x1,0x22 0ac7 e5fd | | Load 0x2,-0x3 0ac8 023b | ; | Execute Float,Times 0ac9 5806 |X | Indirect_Literal Float,0xad0,0.15915494309189532 0aca 023b | ; | Execute Float,Times 0acb e20e | | Load 0x1,0xe 0acc 0232 | 2 | Execute Float,Check_In_Type 0acd 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0ace 0000 0000 | | .XXX[0x2] 0ad0 3fc4 5f30 |? _0| .DBL 0.15915494309189532 0ad2 6dc9 c882 |m | 0ad4 0000 0000 | | .BLANK 0000[0x4] 0ad8 ; -------------------------------------------------------------------------------------- 0ad8 ; SUBPROGRAM 0ad8 ; -------------------------------------------------------------------------------------- 0ad8 0ae4 | | .CONST 0x0ae4 ; Address of begin 0ad9 0004 | | .CONST 0x0004 ; Address of exception handler 0ada 0005 | | .CONST 0x0005 ; Number of locals 0adb INIT_0ad8: 0adb 00da | | Load_Top At_Offset_2 0adc 00e6 | | Load_Encached Float_Cache 0add 03df | | Declare_Variable Float,With_Value 0ade 00d8 | | Load_Top At_Offset_0 0adf 023e | > | Execute Float,Absolute_Value 0ae0 00e6 | | Load_Encached Float_Cache 0ae1 03df | | Declare_Variable Float,With_Value 0ae2 00e6 | | Load_Encached Float_Cache 0ae3 00e6 | | Load_Encached Float_Cache 0ae4 BODY_0ad8: 0ae4 00da | | Load_Top At_Offset_2 0ae5 58b2 |X | Indirect_Literal Float,0xb98,1.0 0ae6 0245 | E | Execute Float,Greater 0ae7 6845 |hE | Jump_Zero 0xb2d 0ae8 00da | | Load_Top At_Offset_2 0ae9 58aa |X | Indirect_Literal Float,0xb94,141.40202399999998 0aea 0242 | B | Execute Float,Less_Equal 0aeb 681d |h | Jump_Zero 0xb09 0aec 00da | | Load_Top At_Offset_2 0aed 00d8 | | Load_Top At_Offset_0 0aee e20e | | Load 0x1,0xe 0aef 0234 | 4 | Execute Float,In_Type 0af0 7001 |p | Jump_Nonzero 0xaf2 0af1 0801 | | Execute_Immediate Raise,0x1 0af2 8212 | | Call 0x1,0x12 0af3 0041 | A | Store_Top_Unchecked Float,At_Offset_1 0af4 00d8 | | Load_Top At_Offset_0 0af5 589a |X | Indirect_Literal Float,0xb90,0.5 0af6 023b | ; | Execute Float,Times 0af7 5898 |X | Indirect_Literal Float,0xb90,0.5 0af8 00da | | Load_Top At_Offset_2 0af9 023a | : | Execute Float,Divide 0afa 023c | < | Execute Float,Minus 0afb 0041 | A | Store_Top_Unchecked Float,At_Offset_1 0afc 00db | | Load_Top At_Offset_3 0afd 014b | K | Execute Float,Less_Zero 0afe 6803 |h | Jump_Zero 0xb02 0aff 00d8 | | Load_Top At_Offset_0 0b00 023f | ? | Execute Float,Unary_Minus 0b01 0041 | A | Store_Top_Unchecked Float,At_Offset_1 0b02 00d8 | | Load_Top At_Offset_0 0b03 00d8 | | Load_Top At_Offset_0 0b04 e20e | | Load 0x1,0xe 0b05 0234 | 4 | Execute Float,In_Type 0b06 7001 |p | Jump_Nonzero 0xb08 0b07 0801 | | Execute_Immediate Raise,0x1 0b08 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0b09 00da | | Load_Top At_Offset_2 0b0a 5881 |X | Indirect_Literal Float,0xb8c,0.6931610107421875 0b0b 023c | < | Execute Float,Minus 0b0c 0042 | B | Store_Top_Unchecked Float,At_Offset_2 0b0d 00d9 | | Load_Top At_Offset_1 0b0e 5885 |X | Indirect_Literal Float,0xb94,141.40202399999998 0b0f 0245 | E | Execute Float,Greater 0b10 6801 |h | Jump_Zero 0xb12 0b11 08e0 | | Execute_Immediate Raise,0xe0 0b12 00d9 | | Load_Top At_Offset_1 0b13 00d8 | | Load_Top At_Offset_0 0b14 e20e | | Load 0x1,0xe 0b15 0234 | 4 | Execute Float,In_Type 0b16 7001 |p | Jump_Nonzero 0xb18 0b17 0801 | | Execute_Immediate Raise,0x1 0b18 8212 | | Call 0x1,0x12 0b19 0041 | A | Store_Top_Unchecked Float,At_Offset_1 0b1a 00d8 | | Load_Top At_Offset_0 0b1b 586c |Xl | Indirect_Literal Float,0xb88,1.3830277879601902e-05 0b1c 00da | | Load_Top At_Offset_2 0b1d 023b | ; | Execute Float,Times 0b1e 023d | = | Execute Float,Plus 0b1f 0041 | A | Store_Top_Unchecked Float,At_Offset_1 0b20 00db | | Load_Top At_Offset_3 0b21 014b | K | Execute Float,Less_Zero 0b22 6803 |h | Jump_Zero 0xb26 0b23 00d8 | | Load_Top At_Offset_0 0b24 023f | ? | Execute Float,Unary_Minus 0b25 0041 | A | Store_Top_Unchecked Float,At_Offset_1 0b26 00d8 | | Load_Top At_Offset_0 0b27 00d8 | | Load_Top At_Offset_0 0b28 e20e | | Load 0x1,0xe 0b29 0234 | 4 | Execute Float,In_Type 0b2a 7001 |p | Jump_Nonzero 0xb2c 0b2b 0801 | | Execute_Immediate Raise,0x1 0b2c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0b2d 00da | | Load_Top At_Offset_2 0b2e 5855 |XU | Indirect_Literal Float,0xb84,1.4901161193847656e-08 0b2f 0244 | D | Execute Float,Less 0b30 6807 |h | Jump_Zero 0xb38 0b31 00db | | Load_Top At_Offset_3 0b32 00d8 | | Load_Top At_Offset_0 0b33 e20e | | Load 0x1,0xe 0b34 0234 | 4 | Execute Float,In_Type 0b35 7001 |p | Jump_Nonzero 0xb37 0b36 0801 | | Execute_Immediate Raise,0x1 0b37 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0b38 00db | | Load_Top At_Offset_3 0b39 e402 | | Load 0x2,0x2 0b3a 023b | ; | Execute Float,Times 0b3b 0043 | C | Store_Top_Uncheched Float,At_Offset_3 0b3c 5843 |XC | Indirect_Literal Float,0xb80,0.7896612741735709 0b3d 00db | | Load_Top At_Offset_3 0b3e 023b | ; | Execute Float,Times 0b3f 023f | ? | Execute Float,Unary_Minus 0b40 583b |X; | Indirect_Literal Float,0xb7c,163.7579820263075 0b41 023c | < | Execute Float,Minus 0b42 00db | | Load_Top At_Offset_3 0b43 023b | ; | Execute Float,Times 0b44 5833 |X3 | Indirect_Literal Float,0xb78,11563.521196851767 0b45 023c | < | Execute Float,Minus 0b46 00db | | Load_Top At_Offset_3 0b47 023b | ; | Execute Float,Times 0b48 582b |X+ | Indirect_Literal Float,0xb74,351812.83430177113 0b49 023c | < | Execute Float,Minus 0b4a 00db | | Load_Top At_Offset_3 0b4b 023b | ; | Execute Float,Times 0b4c 00db | | Load_Top At_Offset_3 0b4d 5822 |X" | Indirect_Literal Float,0xb70,277.735231196507 0b4e 023c | < | Execute Float,Minus 0b4f e403 | | Load 0x2,0x3 0b50 023b | ; | Execute Float,Times 0b51 581a |X | Indirect_Literal Float,0xb6c,36162.72310942183 0b52 023d | = | Execute Float,Plus 0b53 e403 | | Load 0x2,0x3 0b54 023b | ; | Execute Float,Times 0b55 5812 |X | Indirect_Literal Float,0xb68,2110877.005810627 0b56 023c | < | Execute Float,Minus 0b57 023a | : | Execute Float,Divide 0b58 0042 | B | Store_Top_Unchecked Float,At_Offset_2 0b59 00db | | Load_Top At_Offset_3 0b5a e402 | | Load 0x2,0x2 0b5b 00db | | Load_Top At_Offset_3 0b5c 023b | ; | Execute Float,Times 0b5d 023d | = | Execute Float,Plus 0b5e 0042 | B | Store_Top_Unchecked Float,At_Offset_2 0b5f 00d9 | | Load_Top At_Offset_1 0b60 00d8 | | Load_Top At_Offset_0 0b61 e20e | | Load 0x1,0xe 0b62 0234 | 4 | Execute Float,In_Type 0b63 7001 |p | Jump_Nonzero 0xb65 0b64 0801 | | Execute_Immediate Raise,0x1 0b65 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0b66 0000 0000 | | .XXX[0x2] 0b68 4140 1ace |A@ | .DBL 2110877.005810627 0b6a 80be 6712 | g | 0b6c 40e1 a857 |@ W| .DBL 36162.72310942183 0b6e 23b6 5ec6 |# ^ | 0b70 4071 5bc3 |@q[ | .DBL 277.735231196507 0b72 81c9 7ff2 | | 0b74 4115 7913 |A y | .DBL 351812.83430177113 0b76 5653 3418 |VS4 | 0b78 40c6 95c2 |@ | .DBL 11563.521196851767 0b7a b694 148f | | 0b7c 4064 7841 |@dxA| .DBL 163.7579820263075 0b7e 6385 be4a |c J| 0b80 3fe9 44e7 |? D | .DBL 0.7896612741735709 0b82 b86f c81a | o | 0b84 3e50 0000 |>P | .DBL 1.4901161193847656e-08 0b86 0000 0000 | | 0b88 3eed 0112 |> | .DBL 1.3830277879601902e-05 0b8a eb02 02d6 | | 0b8c 3fe6 2e60 |? .`| .DBL 0.6931610107421875 0b8e 0000 0000 | | 0b90 3fe0 0000 |? | .DBL 0.5 0b92 0000 0000 | | 0b94 4061 acdd |@a | .DBL 141.40202399999998 0b96 616f 86a0 |ao | 0b98 3ff0 0000 |? | .DBL 1.0 0b9a 0000 0000 | | 0b9c 0000 0000 | | .BLANK 0000[0x4] 0ba0 ; -------------------------------------------------------------------------------------- 0ba0 ; SUBPROGRAM 0ba0 ; -------------------------------------------------------------------------------------- 0ba0 0bac | | .CONST 0x0bac ; Address of begin 0ba1 0004 | | .CONST 0x0004 ; Address of exception handler 0ba2 0005 | | .CONST 0x0005 ; Number of locals 0ba3 INIT_0ba0: 0ba3 00da | | Load_Top At_Offset_2 0ba4 00e6 | | Load_Encached Float_Cache 0ba5 03df | | Declare_Variable Float,With_Value 0ba6 00d8 | | Load_Top At_Offset_0 0ba7 023e | > | Execute Float,Absolute_Value 0ba8 00e6 | | Load_Encached Float_Cache 0ba9 03df | | Declare_Variable Float,With_Value 0baa 00e6 | | Load_Encached Float_Cache 0bab 00e6 | | Load_Encached Float_Cache 0bac BODY_0ba0: 0bac 00da | | Load_Top At_Offset_2 0bad 5fe6 |_ | Indirect_Literal Float,0xb94,141.40202399999998 0bae 0242 | B | Execute Float,Less_Equal 0baf 6817 |h | Jump_Zero 0xbc7 0bb0 00da | | Load_Top At_Offset_2 0bb1 00d8 | | Load_Top At_Offset_0 0bb2 e20e | | Load 0x1,0xe 0bb3 0234 | 4 | Execute Float,In_Type 0bb4 7001 |p | Jump_Nonzero 0xbb6 0bb5 0801 | | Execute_Immediate Raise,0x1 0bb6 8212 | | Call 0x1,0x12 0bb7 0041 | A | Store_Top_Unchecked Float,At_Offset_1 0bb8 00d8 | | Load_Top At_Offset_0 0bb9 5fd6 |_ | Indirect_Literal Float,0xb90,0.5 0bba 023b | ; | Execute Float,Times 0bbb 5fd4 |_ | Indirect_Literal Float,0xb90,0.5 0bbc 00da | | Load_Top At_Offset_2 0bbd 023a | : | Execute Float,Divide 0bbe 023d | = | Execute Float,Plus 0bbf 0041 | A | Store_Top_Unchecked Float,At_Offset_1 0bc0 00d8 | | Load_Top At_Offset_0 0bc1 00d8 | | Load_Top At_Offset_0 0bc2 e20e | | Load 0x1,0xe 0bc3 0234 | 4 | Execute Float,In_Type 0bc4 7001 |p | Jump_Nonzero 0xbc6 0bc5 0801 | | Execute_Immediate Raise,0x1 0bc6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0bc7 00da | | Load_Top At_Offset_2 0bc8 5fc3 |_ | Indirect_Literal Float,0xb8c,0.6931610107421875 0bc9 023c | < | Execute Float,Minus 0bca 0042 | B | Store_Top_Unchecked Float,At_Offset_2 0bcb 00d9 | | Load_Top At_Offset_1 0bcc 5fc7 |_ | Indirect_Literal Float,0xb94,141.40202399999998 0bcd 0245 | E | Execute Float,Greater 0bce 6801 |h | Jump_Zero 0xbd0 0bcf 08e0 | | Execute_Immediate Raise,0xe0 0bd0 00d9 | | Load_Top At_Offset_1 0bd1 00d8 | | Load_Top At_Offset_0 0bd2 e20e | | Load 0x1,0xe 0bd3 0234 | 4 | Execute Float,In_Type 0bd4 7001 |p | Jump_Nonzero 0xbd6 0bd5 0801 | | Execute_Immediate Raise,0x1 0bd6 8212 | | Call 0x1,0x12 0bd7 0041 | A | Store_Top_Unchecked Float,At_Offset_1 0bd8 00d8 | | Load_Top At_Offset_0 0bd9 5fae |_ | Indirect_Literal Float,0xb88,1.3830277879601902e-05 0bda 00da | | Load_Top At_Offset_2 0bdb 023b | ; | Execute Float,Times 0bdc 023d | = | Execute Float,Plus 0bdd 0041 | A | Store_Top_Unchecked Float,At_Offset_1 0bde 00d8 | | Load_Top At_Offset_0 0bdf 00d8 | | Load_Top At_Offset_0 0be0 e20e | | Load 0x1,0xe 0be1 0234 | 4 | Execute Float,In_Type 0be2 7001 |p | Jump_Nonzero 0xbe4 0be3 0801 | | Execute_Immediate Raise,0x1 0be4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0be5 0000 0000 | | .XXX[0x3] 0be7 0000 | | 0be8 ; -------------------------------------------------------------------------------------- 0be8 ; SUBPROGRAM 0be8 ; -------------------------------------------------------------------------------------- 0be8 0bf4 | | .CONST 0x0bf4 ; Address of begin 0be9 0004 | | .CONST 0x0004 ; Address of exception handler 0bea 0005 | | .CONST 0x0005 ; Number of locals 0beb INIT_0be8: 0beb 00da | | Load_Top At_Offset_2 0bec 00e6 | | Load_Encached Float_Cache 0bed 03df | | Declare_Variable Float,With_Value 0bee 00d8 | | Load_Top At_Offset_0 0bef 023e | > | Execute Float,Absolute_Value 0bf0 00e6 | | Load_Encached Float_Cache 0bf1 03df | | Declare_Variable Float,With_Value 0bf2 00e6 | | Load_Encached Float_Cache 0bf3 00e6 | | Load_Encached Float_Cache 0bf4 BODY_0be8: 0bf4 00da | | Load_Top At_Offset_2 0bf5 587e |X~ | Indirect_Literal Float,0xc74,19.061547465398498 0bf6 0245 | E | Execute Float,Greater 0bf7 6803 |h | Jump_Zero 0xbfb 0bf8 5877 |Xw | Indirect_Literal Float,0xc70,1.0 0bf9 0041 | A | Store_Top_Unchecked Float,At_Offset_1 0bfa 7843 |xC | Jump 0xc3e 0bfb 00da | | Load_Top At_Offset_2 0bfc 586f |Xo | Indirect_Literal Float,0xc6c,0.5493061443340548 0bfd 0245 | E | Execute Float,Greater 0bfe 6815 |h | Jump_Zero 0xc14 0bff 5868 |Xh | Indirect_Literal Float,0xc68,0.5 0c00 586f |Xo | Indirect_Literal Float,0xc70,1.0 0c01 e403 | | Load 0x2,0x3 0c02 00d8 | | Load_Top At_Offset_0 0c03 023d | = | Execute Float,Plus 0c04 00d8 | | Load_Top At_Offset_0 0c05 e20e | | Load 0x1,0xe 0c06 0234 | 4 | Execute Float,In_Type 0c07 7001 |p | Jump_Nonzero 0xc09 0c08 0801 | | Execute_Immediate Raise,0x1 0c09 8212 | | Call 0x1,0x12 0c0a 5865 |Xe | Indirect_Literal Float,0xc70,1.0 0c0b 023d | = | Execute Float,Plus 0c0c 023a | : | Execute Float,Divide 0c0d 023c | < | Execute Float,Minus 0c0e 0041 | A | Store_Top_Unchecked Float,At_Offset_1 0c0f 00d8 | | Load_Top At_Offset_0 0c10 00d9 | | Load_Top At_Offset_1 0c11 023d | = | Execute Float,Plus 0c12 0041 | A | Store_Top_Unchecked Float,At_Offset_1 0c13 782a |x* | Jump 0xc3e 0c14 00da | | Load_Top At_Offset_2 0c15 584e |XN | Indirect_Literal Float,0xc64,1.4901161193847656e-08 0c16 0244 | D | Execute Float,Less 0c17 6803 |h | Jump_Zero 0xc1b 0c18 00da | | Load_Top At_Offset_2 0c19 0041 | A | Store_Top_Unchecked Float,At_Offset_1 0c1a 7823 |x# | Jump 0xc3e 0c1b 00da | | Load_Top At_Offset_2 0c1c 00db | | Load_Top At_Offset_3 0c1d 023b | ; | Execute Float,Times 0c1e 0042 | B | Store_Top_Unchecked Float,At_Offset_2 0c1f 5840 |X@ | Indirect_Literal Float,0xc60,0.9643749277722546 0c20 00da | | Load_Top At_Offset_2 0c21 023b | ; | Execute Float,Times 0c22 023f | ? | Execute Float,Unary_Minus 0c23 5838 |X8 | Indirect_Literal Float,0xc5c,99.22592967223608 0c24 023c | < | Execute Float,Minus 0c25 00da | | Load_Top At_Offset_2 0c26 023b | ; | Execute Float,Times 0c27 5830 |X0 | Indirect_Literal Float,0xc58,1613.4119023996227 0c28 023c | < | Execute Float,Minus 0c29 00da | | Load_Top At_Offset_2 0c2a 023b | ; | Execute Float,Times 0c2b 00da | | Load_Top At_Offset_2 0c2c 5827 |X' | Indirect_Literal Float,0xc54,112.74474380534949 0c2d 023d | = | Execute Float,Plus 0c2e 00db | | Load_Top At_Offset_3 0c2f 023b | ; | Execute Float,Times 0c30 581f |X | Indirect_Literal Float,0xc50,2233.772071896231 0c31 023d | = | Execute Float,Plus 0c32 00db | | Load_Top At_Offset_3 0c33 023b | ; | Execute Float,Times 0c34 5817 |X | Indirect_Literal Float,0xc4c,4840.235707198868 0c35 023d | = | Execute Float,Plus 0c36 023a | : | Execute Float,Divide 0c37 0041 | A | Store_Top_Unchecked Float,At_Offset_1 0c38 00da | | Load_Top At_Offset_2 0c39 00db | | Load_Top At_Offset_3 0c3a 00da | | Load_Top At_Offset_2 0c3b 023b | ; | Execute Float,Times 0c3c 023d | = | Execute Float,Plus 0c3d 0041 | A | Store_Top_Unchecked Float,At_Offset_1 0c3e 00db | | Load_Top At_Offset_3 0c3f 014b | K | Execute Float,Less_Zero 0c40 6803 |h | Jump_Zero 0xc44 0c41 00d8 | | Load_Top At_Offset_0 0c42 023f | ? | Execute Float,Unary_Minus 0c43 0041 | A | Store_Top_Unchecked Float,At_Offset_1 0c44 00d8 | | Load_Top At_Offset_0 0c45 00d8 | | Load_Top At_Offset_0 0c46 e20e | | Load 0x1,0xe 0c47 0234 | 4 | Execute Float,In_Type 0c48 7001 |p | Jump_Nonzero 0xc4a 0c49 0801 | | Execute_Immediate Raise,0x1 0c4a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c4b 0000 | | .XXX[0x1] 0c4c 40b2 e83c |@ <| .DBL 4840.235707198868 0c4e 574e 9692 |WN | 0c50 40a1 738b |@ s | .DBL 2233.772071896231 0c52 4d01 f0f2 |M | 0c54 405c 2fa9 |@\/ | .DBL 112.74474380534949 0c56 e1eb f7fa | | 0c58 4099 35a5 |@ 5 | .DBL 1613.4119023996227 0c5a c9be 1e18 | | 0c5c 4058 ce75 |@X u| .DBL 99.22592967223608 0c5e a1ba 5ccc | \ | 0c60 3fee dc28 |? (| .DBL 0.9643749277722546 0c62 cefb a77e | ~| 0c64 3e50 0000 |>P | .DBL 1.4901161193847656e-08 0c66 0000 0000 | | 0c68 3fe0 0000 |? | .DBL 0.5 0c6a 0000 0000 | | 0c6c 3fe1 93ea |? | .DBL 0.5493061443340548 0c6e 7aad 030a |z | 0c70 3ff0 0000 |? | .DBL 1.0 0c72 0000 0000 | | 0c74 4033 0fc1 |@3 | .DBL 19.061547465398498 0c76 931f 09ca | | 0c78 ; -------------------------------------------------------------------------------------- 0c78 ; SUBPROGRAM 0c78 ; -------------------------------------------------------------------------------------- 0c78 0c7b | { | .CONST 0x0c7b ; Address of begin 0c79 0004 | | .CONST 0x0004 ; Address of exception handler 0c7a 0001 | | .CONST 0x0001 ; Number of locals 0c7b BODY_0c78: 0c7b INIT_0c78: 0c7b 5ff4 |_ | Indirect_Literal Float,0xc70,1.0 0c7c 00db | | Load_Top At_Offset_3 0c7d e20e | | Load 0x1,0xe 0c7e 0232 | 2 | Execute Float,Check_In_Type 0c7f 8226 | & | Call 0x1,0x26 0c80 023a | : | Execute Float,Divide 0c81 e20e | | Load 0x1,0xe 0c82 0232 | 2 | Execute Float,Check_In_Type 0c83 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c84 0000 0000 | | .BLANK 0000[0x4] 0c88 ; -------------------------------------------------------------------------------------- 0c88 ; SUBPROGRAM 0c88 ; -------------------------------------------------------------------------------------- 0c88 0c8b | | .CONST 0x0c8b ; Address of begin 0c89 0004 | | .CONST 0x0004 ; Address of exception handler 0c8a 0001 | | .CONST 0x0001 ; Number of locals 0c8b BODY_0c88: 0c8b INIT_0c88: 0c8b 00da | | Load_Top At_Offset_2 0c8c 00db | | Load_Top At_Offset_3 0c8d e5ff | | Load 0x2,-0x1 0c8e 023b | ; | Execute Float,Times 0c8f 580c |X | Indirect_Literal Float,0xc9c,1.0 0c90 023d | = | Execute Float,Plus 0c91 e20e | | Load 0x1,0xe 0c92 0232 | 2 | Execute Float,Check_In_Type 0c93 820f | | Call 0x1,0xf 0c94 023d | = | Execute Float,Plus 0c95 e20e | | Load 0x1,0xe 0c96 0232 | 2 | Execute Float,Check_In_Type 0c97 8210 | | Call 0x1,0x10 0c98 e20e | | Load 0x1,0xe 0c99 0232 | 2 | Execute Float,Check_In_Type 0c9a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c9b 0000 | | .XXX[0x1] 0c9c 3ff0 0000 |? | .DBL 1.0 0c9e 0000 0000 | | 0ca0 ; -------------------------------------------------------------------------------------- 0ca0 ; SUBPROGRAM 0ca0 ; -------------------------------------------------------------------------------------- 0ca0 0ca3 | | .CONST 0x0ca3 ; Address of begin 0ca1 0004 | | .CONST 0x0004 ; Address of exception handler 0ca2 0001 | | .CONST 0x0001 ; Number of locals 0ca3 BODY_0ca0: 0ca3 INIT_0ca0: 0ca3 00da | | Load_Top At_Offset_2 0ca4 00db | | Load_Top At_Offset_3 0ca5 e5ff | | Load 0x2,-0x1 0ca6 023b | ; | Execute Float,Times 0ca7 5ff4 |_ | Indirect_Literal Float,0xc9c,1.0 0ca8 023c | < | Execute Float,Minus 0ca9 e20e | | Load 0x1,0xe 0caa 0232 | 2 | Execute Float,Check_In_Type 0cab 820f | | Call 0x1,0xf 0cac 023d | = | Execute Float,Plus 0cad e20e | | Load 0x1,0xe 0cae 0232 | 2 | Execute Float,Check_In_Type 0caf 8210 | | Call 0x1,0x10 0cb0 e20e | | Load 0x1,0xe 0cb1 0232 | 2 | Execute Float,Check_In_Type 0cb2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0cb3 0000 0000 | | .BLANK 0000[0x5] 0cb8 ; -------------------------------------------------------------------------------------- 0cb8 ; SUBPROGRAM 0cb8 ; -------------------------------------------------------------------------------------- 0cb8 0cbb | | .CONST 0x0cbb ; Address of begin 0cb9 0004 | | .CONST 0x0004 ; Address of exception handler 0cba 0001 | | .CONST 0x0001 ; Number of locals 0cbb BODY_0cb8: 0cbb INIT_0cb8: 0cbb 5814 |X | Indirect_Literal Float,0xcd0,1.0 0cbc 00db | | Load_Top At_Offset_3 0cbd 023d | = | Execute Float,Plus 0cbe 5811 |X | Indirect_Literal Float,0xcd0,1.0 0cbf e5ff | | Load 0x2,-0x1 0cc0 023c | < | Execute Float,Minus 0cc1 023a | : | Execute Float,Divide 0cc2 e20e | | Load 0x1,0xe 0cc3 0232 | 2 | Execute Float,Check_In_Type 0cc4 8210 | | Call 0x1,0x10 0cc5 5806 |X | Indirect_Literal Float,0xccc,2.0 0cc6 023a | : | Execute Float,Divide 0cc7 e20e | | Load 0x1,0xe 0cc8 0232 | 2 | Execute Float,Check_In_Type 0cc9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0cca 0000 0000 | | .XXX[0x2] 0ccc 4000 0000 |@ | .DBL 2.0 0cce 0000 0000 | | 0cd0 3ff0 0000 |? | .DBL 1.0 0cd2 0000 0000 | | 0cd4 0000 0000 | | .BLANK 0000[0x4] 0cd8 ; -------------------------------------------------------------------------------------- 0cd8 ; SUBPROGRAM 0cd8 ; -------------------------------------------------------------------------------------- 0cd8 0cdb | | .CONST 0x0cdb ; Address of begin 0cd9 0004 | | .CONST 0x0004 ; Address of exception handler 0cda 0001 | | .CONST 0x0001 ; Number of locals 0cdb BODY_0cd8: 0cdb INIT_0cd8: 0cdb 5ff4 |_ | Indirect_Literal Float,0xcd0,1.0 0cdc 00db | | Load_Top At_Offset_3 0cdd 023a | : | Execute Float,Divide 0cde e20e | | Load 0x1,0xe 0cdf 0232 | 2 | Execute Float,Check_In_Type 0ce0 822a | * | Call 0x1,0x2a 0ce1 e20e | | Load 0x1,0xe 0ce2 0232 | 2 | Execute Float,Check_In_Type 0ce3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0ce4 0000 0000 | | .BLANK 0000[0x4] 0ce8 ; -------------------------------------------------------------------------------------- 0ce8 ; SUBPROGRAM 0ce8 ; -------------------------------------------------------------------------------------- 0ce8 0cf0 | | .CONST 0x0cf0 ; Address of begin 0ce9 0004 | | .CONST 0x0004 ; Address of exception handler 0cea 0002 | | .CONST 0x0002 ; Number of locals 0ceb INIT_0ce8: 0ceb 00da | | Load_Top At_Offset_2 0cec 580b |X | Indirect_Literal Float,0xcf8,2.0 0ced 023a | : | Execute Float,Divide 0cee 00e6 | | Load_Encached Float_Cache 0cef 03df | | Declare_Variable Float,With_Value 0cf0 BODY_0ce8: 0cf0 00d8 | | Load_Top At_Offset_0 0cf1 8006 | | Call 0x0,0x6 0cf2 00d9 | | Load_Top At_Offset_1 0cf3 0246 | F | Execute Float,Not_Equal 0cf4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0cf5 0000 0000 | | .XXX[0x3] 0cf7 0000 | | 0cf8 4000 0000 |@ | .DBL 2.0 0cfa 0000 0000 | | 0cfc 0000 0000 | | .BLANK 0000[0x4] 0d00 ; -------------------------------------------------------------------------------------- 0d00 ; SUBPROGRAM 0d00 ; -------------------------------------------------------------------------------------- 0d00 0d0b | | .CONST 0x0d0b ; Address of begin 0d01 0004 | | .CONST 0x0004 ; Address of exception handler 0d02 0003 | | .CONST 0x0003 ; Number of locals 0d03 INIT_0d00: 0d03 00e4 | | Load_Encached Positive_Cache 0d04 0266 | f | Execute Discrete,Bounds 0d05 00e3 | | Load_Encached Natural_Cache 0d06 02a0 | | Declare_Subprogram Null_Subprogram 0d07 4801 |H | Short_Literal 0x1 0d08 0350 | P | Declare_Type Array,Defined,Bounds_With_Object 0d09 029f 0ecb | | Declare_Subprogram INIT_0ec8,For_Call 0d0b BODY_0d00: 0d0b 598c |Y | Indirect_Literal Float,0xe98,1.0 0d0c 4801 |H | Short_Literal 0x1 0d0d e22d | - | Load 0x1,0x2d 0d0e 01d6 | | Execute Vector,Field_Write 0d0f 5984 |Y | Indirect_Literal Float,0xe94,0.9170040432046712 0d10 4803 |H | Short_Literal 0x3 0d11 e22d | - | Load 0x1,0x2d 0d12 01d6 | | Execute Vector,Field_Write 0d13 597c |Y| | Indirect_Literal Float,0xe90,0.8408964152537145 0d14 4805 |H | Short_Literal 0x5 0d15 e22d | - | Load 0x1,0x2d 0d16 01d6 | | Execute Vector,Field_Write 0d17 5974 |Yt | Indirect_Literal Float,0xe8c,0.7711054127039704 0d18 4807 |H | Short_Literal 0x7 0d19 e22d | - | Load 0x1,0x2d 0d1a 01d6 | | Execute Vector,Field_Write 0d1b 596c |Yl | Indirect_Literal Float,0xe88,0.7071067811865475 0d1c 4809 |H | Short_Literal 0x9 0d1d e22d | - | Load 0x1,0x2d 0d1e 01d6 | | Execute Vector,Field_Write 0d1f 5964 |Yd | Indirect_Literal Float,0xe84,0.6484197773255048 0d20 480b |H | Short_Literal 0xb 0d21 e22d | - | Load 0x1,0x2d 0d22 01d6 | | Execute Vector,Field_Write 0d23 595c |Y\ | Indirect_Literal Float,0xe80,0.5946035575013605 0d24 480d |H | Short_Literal 0xd 0d25 e22d | - | Load 0x1,0x2d 0d26 01d6 | | Execute Vector,Field_Write 0d27 5954 |YT | Indirect_Literal Float,0xe7c,0.5452538663326287 0d28 480f |H | Short_Literal 0xf 0d29 e22d | - | Load 0x1,0x2d 0d2a 01d6 | | Execute Vector,Field_Write 0d2b 594c |YL | Indirect_Literal Float,0xe78,0.5 0d2c 4811 |H | Short_Literal 0x11 0d2d e22d | - | Load 0x1,0x2d 0d2e 01d6 | | Execute Vector,Field_Write 0d2f 4801 |H | Short_Literal 0x1 0d30 e22e | . | Load 0x1,0x2e 0d31 01d7 | | Execute Vector,Field_Read 0d32 4802 |H | Short_Literal 0x2 0d33 e22d | - | Load 0x1,0x2d 0d34 01d7 | | Execute Vector,Field_Read 0d35 4801 |H | Short_Literal 0x1 0d36 4803 |H | Short_Literal 0x3 0d37 e402 | | Load 0x2,0x2 0d38 0334 | 4 | Declare_Variable Array,With_Constraint 0d39 613a |a: | Indirect_Literal Discrete,0xe74,{0x00000000, 0x3d495f45} 0d3a 4801 |H | Short_Literal 0x1 0d3b 00da | | Load_Top At_Offset_2 0d3c 01d6 | | Execute Vector,Field_Write 0d3d 6132 |a2 | Indirect_Literal Discrete,0xe70,{0x00000000, 0x12486cc2} 0d3e 4802 |H | Short_Literal 0x2 0d3f 00da | | Load_Top At_Offset_2 0d40 01d6 | | Execute Vector,Field_Write 0d41 612a |a* | Indirect_Literal Discrete,0xe6c,{0x00000000, 0x31ee7432} 0d42 4803 |H | Short_Literal 0x3 0d43 00da | | Load_Top At_Offset_2 0d44 01d6 | | Execute Vector,Field_Write 0d45 8403 | | Call 0x2,0x3 0d46 4802 |H | Short_Literal 0x2 0d47 e22d | - | Load 0x1,0x2d 0d48 01d6 | | Execute Vector,Field_Write 0d49 4801 |H | Short_Literal 0x1 0d4a e22e | . | Load 0x1,0x2e 0d4b 01d6 | | Execute Vector,Field_Write 0d4c 4802 |H | Short_Literal 0x2 0d4d e22e | . | Load 0x1,0x2e 0d4e 01d7 | | Execute Vector,Field_Read 0d4f 4804 |H | Short_Literal 0x4 0d50 e22d | - | Load 0x1,0x2d 0d51 01d7 | | Execute Vector,Field_Read 0d52 4801 |H | Short_Literal 0x1 0d53 4803 |H | Short_Literal 0x3 0d54 e402 | | Load 0x2,0x2 0d55 0334 | 4 | Declare_Variable Array,With_Constraint 0d56 6111 |a | Indirect_Literal Discrete,0xe68,{0x00000000, 0x383337bb} 0d57 4801 |H | Short_Literal 0x1 0d58 00da | | Load_Top At_Offset_2 0d59 01d6 | | Execute Vector,Field_Write 0d5a 6109 |a | Indirect_Literal Discrete,0xe64,{0x00000000, 0x02a94e11} 0d5b 4802 |H | Short_Literal 0x2 0d5c 00da | | Load_Top At_Offset_2 0d5d 01d6 | | Execute Vector,Field_Write 0d5e 6101 |a | Indirect_Literal Discrete,0xe60,{0x00000000, 0x04196254} 0d5f 4803 |H | Short_Literal 0x3 0d60 00da | | Load_Top At_Offset_2 0d61 01d6 | | Execute Vector,Field_Write 0d62 8403 | | Call 0x2,0x3 0d63 4804 |H | Short_Literal 0x4 0d64 e22d | - | Load 0x1,0x2d 0d65 01d6 | | Execute Vector,Field_Write 0d66 4802 |H | Short_Literal 0x2 0d67 e22e | . | Load 0x1,0x2e 0d68 01d6 | | Execute Vector,Field_Write 0d69 4803 |H | Short_Literal 0x3 0d6a e22e | . | Load 0x1,0x2e 0d6b 01d7 | | Execute Vector,Field_Read 0d6c 4806 |H | Short_Literal 0x6 0d6d e22d | - | Load 0x1,0x2d 0d6e 01d7 | | Execute Vector,Field_Read 0d6f 4801 |H | Short_Literal 0x1 0d70 4803 |H | Short_Literal 0x3 0d71 e402 | | Load 0x2,0x2 0d72 0334 | 4 | Declare_Variable Array,With_Constraint 0d73 60e8 |` | Indirect_Literal Discrete,0xe5c,{0x00000000, 0x33892305} 0d74 4801 |H | Short_Literal 0x1 0d75 00da | | Load_Top At_Offset_2 0d76 01d6 | | Execute Vector,Field_Write 0d77 60e0 |` | Indirect_Literal Discrete,0xe58,{0x00000000, 0x11f8480e} 0d78 4802 |H | Short_Literal 0x2 0d79 00da | | Load_Top At_Offset_2 0d7a 01d6 | | Execute Vector,Field_Write 0d7b 60d8 |` | Indirect_Literal Discrete,0xe54,{0x00000000, 0x0f88d60e} 0d7c 4803 |H | Short_Literal 0x3 0d7d 00da | | Load_Top At_Offset_2 0d7e 01d6 | | Execute Vector,Field_Write 0d7f 8403 | | Call 0x2,0x3 0d80 4806 |H | Short_Literal 0x6 0d81 e22d | - | Load 0x1,0x2d 0d82 01d6 | | Execute Vector,Field_Write 0d83 4803 |H | Short_Literal 0x3 0d84 e22e | . | Load 0x1,0x2e 0d85 01d6 | | Execute Vector,Field_Write 0d86 4804 |H | Short_Literal 0x4 0d87 e22e | . | Load 0x1,0x2e 0d88 01d7 | | Execute Vector,Field_Read 0d89 4808 |H | Short_Literal 0x8 0d8a e22d | - | Load 0x1,0x2d 0d8b 01d7 | | Execute Vector,Field_Read 0d8c 4801 |H | Short_Literal 0x1 0d8d 4803 |H | Short_Literal 0x3 0d8e e402 | | Load 0x2,0x2 0d8f 0334 | 4 | Declare_Variable Array,With_Constraint 0d90 60bf |` | Indirect_Literal Discrete,0xe50,{0x00000000, 0x2f4228e7} 0d91 4801 |H | Short_Literal 0x1 0d92 00da | | Load_Top At_Offset_2 0d93 01d6 | | Execute Vector,Field_Write 0d94 60b7 |` | Indirect_Literal Discrete,0xe4c,{0x00000000, 0x3580c36b} 0d95 4802 |H | Short_Literal 0x2 0d96 00da | | Load_Top At_Offset_2 0d97 01d6 | | Execute Vector,Field_Write 0d98 60af |` | Indirect_Literal Discrete,0xe48,{0x00000000, 0x3aa2047f} 0d99 4803 |H | Short_Literal 0x3 0d9a 00da | | Load_Top At_Offset_2 0d9b 01d6 | | Execute Vector,Field_Write 0d9c 8403 | | Call 0x2,0x3 0d9d 4808 |H | Short_Literal 0x8 0d9e e22d | - | Load 0x1,0x2d 0d9f 01d6 | | Execute Vector,Field_Write 0da0 4804 |H | Short_Literal 0x4 0da1 e22e | . | Load 0x1,0x2e 0da2 01d6 | | Execute Vector,Field_Write 0da3 4805 |H | Short_Literal 0x5 0da4 e22e | . | Load 0x1,0x2e 0da5 01d7 | | Execute Vector,Field_Read 0da6 480a |H | Short_Literal 0xa 0da7 e22d | - | Load 0x1,0x2d 0da8 01d7 | | Execute Vector,Field_Read 0da9 4801 |H | Short_Literal 0x1 0daa 4803 |H | Short_Literal 0x3 0dab e402 | | Load 0x2,0x2 0dac 0334 | 4 | Declare_Variable Array,With_Constraint 0dad 6096 |` | Indirect_Literal Discrete,0xe44,{0x00000000, 0x2b560fba} 0dae 4801 |H | Short_Literal 0x1 0daf 00da | | Load_Top At_Offset_2 0db0 01d6 | | Execute Vector,Field_Write 0db1 608e |` | Indirect_Literal Discrete,0xe40,{0x00000000, 0x242a14ac} 0db2 4802 |H | Short_Literal 0x2 0db3 00da | | Load_Top At_Offset_2 0db4 01d6 | | Execute Vector,Field_Write 0db5 6086 |` | Indirect_Literal Discrete,0xe3c,{0x00000000, 0x192602a3} 0db6 4803 |H | Short_Literal 0x3 0db7 00da | | Load_Top At_Offset_2 0db8 01d6 | | Execute Vector,Field_Write 0db9 8403 | | Call 0x2,0x3 0dba 480a |H | Short_Literal 0xa 0dbb e22d | - | Load 0x1,0x2d 0dbc 01d6 | | Execute Vector,Field_Write 0dbd 4805 |H | Short_Literal 0x5 0dbe e22e | . | Load 0x1,0x2e 0dbf 01d6 | | Execute Vector,Field_Write 0dc0 4806 |H | Short_Literal 0x6 0dc1 e22e | . | Load 0x1,0x2e 0dc2 01d7 | | Execute Vector,Field_Read 0dc3 480c |H | Short_Literal 0xc 0dc4 e22d | - | Load 0x1,0x2d 0dc5 01d7 | | Execute Vector,Field_Read 0dc6 4801 |H | Short_Literal 0x1 0dc7 4803 |H | Short_Literal 0x3 0dc8 e402 | | Load 0x2,0x2 0dc9 0334 | 4 | Declare_Variable Array,With_Constraint 0dca 606d |`m | Indirect_Literal Discrete,0xe38,{0x00000000, 0x27bd4c98} 0dcb 4801 |H | Short_Literal 0x1 0dcc 00da | | Load_Top At_Offset_2 0dcd 01d6 | | Execute Vector,Field_Write 0dce 6065 |`e | Indirect_Literal Discrete,0xe34,{0x00000000, 0x091a111a} 0dcf 4802 |H | Short_Literal 0x2 0dd0 00da | | Load_Top At_Offset_2 0dd1 01d6 | | Execute Vector,Field_Write 0dd2 605d |`] | Indirect_Literal Discrete,0xe30,{0x00000000, 0x3682447c} 0dd3 4803 |H | Short_Literal 0x3 0dd4 00da | | Load_Top At_Offset_2 0dd5 01d6 | | Execute Vector,Field_Write 0dd6 8403 | | Call 0x2,0x3 0dd7 480c |H | Short_Literal 0xc 0dd8 e22d | - | Load 0x1,0x2d 0dd9 01d6 | | Execute Vector,Field_Write 0dda 4806 |H | Short_Literal 0x6 0ddb e22e | . | Load 0x1,0x2e 0ddc 01d6 | | Execute Vector,Field_Write 0ddd 4807 |H | Short_Literal 0x7 0dde e22e | . | Load 0x1,0x2e 0ddf 01d7 | | Execute Vector,Field_Read 0de0 480e |H | Short_Literal 0xe 0de1 e22d | - | Load 0x1,0x2d 0de2 01d7 | | Execute Vector,Field_Read 0de3 4801 |H | Short_Literal 0x1 0de4 4803 |H | Short_Literal 0x3 0de5 e402 | | Load 0x2,0x2 0de6 0334 | 4 | Declare_Variable Array,With_Constraint 0de7 6044 |`D | Indirect_Literal Discrete,0xe2c,{0x00000000, 0x2470f4dc} 0de8 4801 |H | Short_Literal 0x1 0de9 00da | | Load_Top At_Offset_2 0dea 01d6 | | Execute Vector,Field_Write 0deb 603c |`< | Indirect_Literal Discrete,0xe28,{0x00000000, 0x3ab11c33} 0dec 4802 |H | Short_Literal 0x2 0ded 00da | | Load_Top At_Offset_2 0dee 01d6 | | Execute Vector,Field_Write 0def 6034 |`4 | Indirect_Literal Discrete,0xe24,{0x00000000, 0x183f5b64} 0df0 4803 |H | Short_Literal 0x3 0df1 00da | | Load_Top At_Offset_2 0df2 01d6 | | Execute Vector,Field_Write 0df3 8403 | | Call 0x2,0x3 0df4 480e |H | Short_Literal 0xe 0df5 e22d | - | Load 0x1,0x2d 0df6 01d6 | | Execute Vector,Field_Write 0df7 4807 |H | Short_Literal 0x7 0df8 e22e | . | Load 0x1,0x2e 0df9 01d6 | | Execute Vector,Field_Write 0dfa 4808 |H | Short_Literal 0x8 0dfb e22e | . | Load 0x1,0x2e 0dfc 01d7 | | Execute Vector,Field_Read 0dfd 4810 |H | Short_Literal 0x10 0dfe e22d | - | Load 0x1,0x2d 0dff 01d7 | | Execute Vector,Field_Read 0e00 4801 |H | Short_Literal 0x1 0e01 4803 |H | Short_Literal 0x3 0e02 e402 | | Load 0x2,0x2 0e03 0334 | 4 | Declare_Variable Array,With_Constraint 0e04 601b |` | Indirect_Literal Discrete,0xe20,{0x00000000, 0x216ab0d9} 0e05 4801 |H | Short_Literal 0x1 0e06 00da | | Load_Top At_Offset_2 0e07 01d6 | | Execute Vector,Field_Write 0e08 6013 |` | Indirect_Literal Discrete,0xe1c,{0x00000000, 0x3cc487b1} 0e09 4802 |H | Short_Literal 0x2 0e0a 00da | | Load_Top At_Offset_2 0e0b 01d6 | | Execute Vector,Field_Write 0e0c 600b |` | Indirect_Literal Discrete,0xe18,{0x00000000, 0x1317256e} 0e0d 4803 |H | Short_Literal 0x3 0e0e 00da | | Load_Top At_Offset_2 0e0f 01d6 | | Execute Vector,Field_Write 0e10 8403 | | Call 0x2,0x3 0e11 4810 |H | Short_Literal 0x10 0e12 e22d | - | Load 0x1,0x2d 0e13 01d6 | | Execute Vector,Field_Write 0e14 4808 |H | Short_Literal 0x8 0e15 e22e | . | Load 0x1,0x2e 0e16 01d6 | | Execute Vector,Field_Write 0e17 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0e18 0000 0000 | | .LITERAL {0x00000000, 0x1317256e} 0e1c 0000 0000 | | .LITERAL {0x00000000, 0x3cc487b1} 0e20 0000 0000 | | .LITERAL {0x00000000, 0x216ab0d9} 0e24 0000 0000 | | .LITERAL {0x00000000, 0x183f5b64} 0e28 0000 0000 | | .LITERAL {0x00000000, 0x3ab11c33} 0e2c 0000 0000 | | .LITERAL {0x00000000, 0x2470f4dc} 0e30 0000 0000 | | .LITERAL {0x00000000, 0x3682447c} 0e34 0000 0000 | | .LITERAL {0x00000000, 0x091a111a} 0e38 0000 0000 | | .LITERAL {0x00000000, 0x27bd4c98} 0e3c 0000 0000 | | .LITERAL {0x00000000, 0x192602a3} 0e40 0000 0000 | | .LITERAL {0x00000000, 0x242a14ac} 0e44 0000 0000 | | .LITERAL {0x00000000, 0x2b560fba} 0e48 0000 0000 | | .LITERAL {0x00000000, 0x3aa2047f} 0e4c 0000 0000 | | .LITERAL {0x00000000, 0x3580c36b} 0e50 0000 0000 | | .LITERAL {0x00000000, 0x2f4228e7} 0e54 0000 0000 | | .LITERAL {0x00000000, 0x0f88d60e} 0e58 0000 0000 | | .LITERAL {0x00000000, 0x11f8480e} 0e5c 0000 0000 | | .LITERAL {0x00000000, 0x33892305} 0e60 0000 0000 | | .LITERAL {0x00000000, 0x04196254} 0e64 0000 0000 | | .LITERAL {0x00000000, 0x02a94e11} 0e68 0000 0000 | | .LITERAL {0x00000000, 0x383337bb} 0e6c 0000 0000 | | .LITERAL {0x00000000, 0x31ee7432} 0e70 0000 0000 | | .LITERAL {0x00000000, 0x12486cc2} 0e74 0000 0000 | | .LITERAL {0x00000000, 0x3d495f45} 0e78 3fe0 0000 |? | .DBL 0.5 0e7a 0000 0000 | | 0e7c 3fe1 72b8 |? r | .DBL 0.5452538663326287 0e7e 3c7d 517a |<}Qz| 0e80 3fe3 06fe |? | .DBL 0.5946035575013605 0e82 0a31 b715 | 1 | 0e84 3fe4 bfda |? | .DBL 0.6484197773255048 0e86 d536 2a27 | 6*'| 0e88 3fe6 a09e |? | .DBL 0.7071067811865475 0e8a 667f 3bcc |f ; | 0e8c 3fe8 ace5 |? | .DBL 0.7711054127039704 0e8e 422a a0db |B* | 0e90 3fea e89f |? | .DBL 0.8408964152537145 0e92 995a d3ad | Z | 0e94 3fed 5818 |? X | .DBL 0.9170040432046712 0e96 dcfb a487 | | 0e98 3ff0 0000 |? | .DBL 1.0 0e9a 0000 0000 | | 0e9c 0000 0000 | | .BLANK 0000[0x4] 0ea0 ; -------------------------------------------------------------------------------------- 0ea0 ; SUBPROGRAM 0ea0 ; -------------------------------------------------------------------------------------- 0ea0 0ea3 | | .CONST 0x0ea3 ; Address of begin 0ea1 0eb3 | | .CONST 0x0eb3 ; Address of exception handler 0ea2 0001 | | .CONST 0x0001 ; Number of locals 0ea3 BODY_0ea0: 0ea3 INIT_0ea0: 0ea3 00cf | | Action Mark_Auxiliary 0ea4 7809 |x | Jump 0xeae 0ea5 e406 | | Load 0x2,0x6 0ea6 e403 | | Load 0x2,0x3 0ea7 023d | = | Execute Float,Plus 0ea8 a406 | | Store_Unchecked 0x2,0x6 0ea9 e406 | | Load 0x2,0x6 0eaa 00d8 | | Load_Top At_Offset_0 0eab 023b | ; | Execute Float,Times 0eac a404 | | Store_Unchecked 0x2,0x4 0ead 00c9 | | Action Pop_Auxiliary_Loop 0eae e404 | | Load 0x2,0x4 0eaf e402 | | Load 0x2,0x2 0eb0 0244 | D | Execute Float,Less 0eb1 77f3 |w | Jump_Nonzero 0xea5 0eb2 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0eb3 TRAP_0ea0: 0eb3 010d | | Execute Exception,Is_Numeric_Error 0eb4 7002 |p | Jump_Nonzero 0xeb7 0eb5 010e | | Execute Exception,Is_Constraint_Error 0eb6 680c |h | Jump_Zero 0xec3 0eb7 e406 | | Load 0x2,0x6 0eb8 e403 | | Load 0x2,0x3 0eb9 023c | < | Execute Float,Minus 0eba a406 | | Store_Unchecked 0x2,0x6 0ebb e406 | | Load 0x2,0x6 0ebc 00d8 | | Load_Top At_Offset_0 0ebd e20e | | Load 0x1,0xe 0ebe 0234 | 4 | Execute Float,In_Type 0ebf 7001 |p | Jump_Nonzero 0xec1 0ec0 0801 | | Execute_Immediate Raise,0x1 0ec1 00cb | | Action Pop_Block_With_Result 0ec2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0ec3 0100 | | Execute Exception,Raise 0ec4 0000 0000 | | .BLANK 0000[0x4] 0ec8 ; -------------------------------------------------------------------------------------- 0ec8 ; SUBPROGRAM 0ec8 ; -------------------------------------------------------------------------------------- 0ec8 0ecd | | .CONST 0x0ecd ; Address of begin 0ec9 0004 | | .CONST 0x0004 ; Address of exception handler 0eca 0003 | | .CONST 0x0003 ; Number of locals 0ecb INIT_0ec8: 0ecb 00e2 | | Load_Encached Integer_Cache 0ecc 00e2 | | Load_Encached Integer_Cache 0ecd BODY_0ec8: 0ecd 4835 |H5 | Short_Literal 0x35 0ece 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0ecf 4801 |H | Short_Literal 0x1 0ed0 e7ff | | Load 0x3,-0x1 0ed1 01d7 | | Execute Vector,Field_Read 0ed2 0237 | 7 | Execute Float,Convert_From_Discrete 0ed3 5830 |X0 | Indirect_Literal Float,0xf04,1073741824.0 0ed4 023a | : | Execute Float,Divide 0ed5 a7fe | | Store_Unchecked 0x3,-0x2 0ed6 4802 |H | Short_Literal 0x2 0ed7 483c |H< | Short_Literal 0x3c 0ed8 00db | | Load_Top At_Offset_3 0ed9 0272 | r | Execute Discrete,Minus 0eda 026d | m | Execute Discrete,Exponentiate 0edb 0059 | Y | Store_Top Discrete,At_Offset_1 0edc e7fe | | Load 0x3,-0x2 0edd 4802 |H | Short_Literal 0x2 0ede e7ff | | Load 0x3,-0x1 0edf 01d7 | | Execute Vector,Field_Read 0ee0 4802 |H | Short_Literal 0x2 0ee1 e7ff | | Load 0x3,-0x1 0ee2 01d7 | | Execute Vector,Field_Read 0ee3 00db | | Load_Top At_Offset_3 0ee4 026f | o | Execute Discrete,Remainder 0ee5 0272 | r | Execute Discrete,Minus 0ee6 0237 | 7 | Execute Float,Convert_From_Discrete 0ee7 5818 |X | Indirect_Literal Float,0xf00,1.152921504606847e+18 0ee8 023a | : | Execute Float,Divide 0ee9 023d | = | Execute Float,Plus 0eea a7fe | | Store_Unchecked 0x3,-0x2 0eeb 4802 |H | Short_Literal 0x2 0eec e7ff | | Load 0x3,-0x1 0eed 01d7 | | Execute Vector,Field_Read 0eee 00d9 | | Load_Top At_Offset_1 0eef 026f | o | Execute Discrete,Remainder 0ef0 0237 | 7 | Execute Float,Convert_From_Discrete 0ef1 580e |X | Indirect_Literal Float,0xf00,1.152921504606847e+18 0ef2 023a | : | Execute Float,Divide 0ef3 4803 |H | Short_Literal 0x3 0ef4 e7ff | | Load 0x3,-0x1 0ef5 01d7 | | Execute Vector,Field_Read 0ef6 0237 | 7 | Execute Float,Convert_From_Discrete 0ef7 5804 |X | Indirect_Literal Float,0xefc,1.2379400392853803e+27 0ef8 023a | : | Execute Float,Divide 0ef9 023d | = | Execute Float,Plus 0efa a7fd | | Store_Unchecked 0x3,-0x3 0efb 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0efc 4590 0000 |E | .DBL 1.2379400392853803e+27 0efe 0000 0000 | | 0f00 43b0 0000 |C | .DBL 1.152921504606847e+18 0f02 0000 0000 | | 0f04 41d0 0000 |A | .DBL 1073741824.0 0f06 0000 0000 | | 0f08 ; -------------------------------------------------------------------------------------- 0f08 ; Debug Table 0f08 ; -------------------------------------------------------------------------------------- 0f08 0004 0010 | | .DEBUG4 0x0004,0x0010,0x6a76,0x0000,0x0001,0x0000 0f0e 0000 0000 | | .BLANK 0000[0xf2]